Si no mal recuerdo... cuando eso sucede Err.Number = 71 Debes hacer una rutina de manejo de error. Private Sub ..... . . . Exit sub ErrorHandler: If Err.Number = 71 then MsgBox ......
Puedes usar Resume si le pides la direccion de nuevo al usuario en un InputBox o puedes salir y obligarlo a dar la orden de nuevo.
Si tienes otra duda o si interpreté mal tu pregunta, prefiero que dejes un mensaje en el foro de mi página en lugar del e-mail.