pitufo72

antares18 respondió: Si en vez de empty pones "" también te lo coge while(x="") x = InputBox("Nombre del archivo") If x = ""(Empty) Then MsgBox ("El archivo no está activo") End If Wend

Elsa Matilde respondió: Sin detenerme a crear 2 libros para probarlo, te sugiero 2 cosas: Cada vez que cambias de hojas, es mejor que hagas referencia a la misma al seleccionar una celda: Worksheets("Hoja1").Select ActiveSheet.Range("A2").Select 'es mejor que solo Range Y...