lo que te puedo decir es que en la línea anterior a la expresión que tu creas puede generarce un error, antepongas On error goto "cualquier nombre". Por ejemplo:
private sub .....()
On error goto abortar
textbox1.text=textbox2.text
abortar:
msgbox "hubo un error"
exit sub
end sub
la expresión on error te sirve para que cuando estes ejecutando el programa, si ocurrio un error (en este caso en la expresión textbox1.text=textbox2.text) puedas darle un mensaje al usuario como en este caso y continues haciendo otras cosas y que no simplemente el programa se caiga.