Ayuda con Userform Excel

Buenas noches:
Disculpen, me podrian ayudar? Tengo un textbox y un command button, y el command button con el click realiza el siguiente procedimiento escrito abajo que realiza cambios en el textbox para poder cambiarse a la celda de arriba y me arroja el valor en el text box.
ActiveCell.Offset(-1, 0).Select
Call TextBox1_Change
Que hago para poder evitar el error que es que cuando llege a la fila 1 si vuelvo a darle a un click entonces no me marque error ya que como no puedo subir otra fila me lo marca.
Alguien me puede ayudar con alguna opcion???
Gracias y Saludos
 
 

Excelente solucion, muchas gracias, funciono de maravilla.
Un saludo a toda la comunidad Excel
PLM