Visual Basic para Aplicaciones - Error 1004, error en el método Range del objeto _Global

Hola a Todos:
Para Insertar una columna y copiar el contenido de otra, utilicé excel 2007 para generar una macro, luego copié el código de esa macro en mi form de vb 6.
Selecciono una Option entre las tres que tengo y ejecuta la rutina perfectamente, pero si vuelvo a seleccionar otra option y tratar de ejecutar la rutina, me aparece:
"Error 1004, error en el método Range del objeto _Global"
Para tomar otra option y ejecutar la rutina debo cerrar completamente el formulario y luego volver a iniciarlo.
He buscado mucho por una solución pero no la encuentro
Muchas gracias por vuestro tiempo

A continuación el código:
Private Sub LimpiaCeldassPintadas_Click()

If Option1 = True Then Paso = 4: Inicio = 1: Archi = "Tra"
If Option2 = True Then Paso = 4: Inicio = 2: Archi = "Seg”
If Option3 = True Then Paso = 4: Inicio = 3: Archi = "Rev"
Set objExcel = New Excel.Application
Set xLibro1 = objExcel.Workbooks.Open(App.Path + "\" + "Nacho" + "\" & Archi)
objExcel.Visible = False

'A continuación el código que saqué de la macro: Inserta una columna E y luego copia en esa columna E, el contenido de la columna A (A1: A10)
Columns("E:E").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("A1:A10").Select
Selection.Copy
Range("E1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
'Fin del código que saque de la macro

xLibro1.Save
xLibro1.Close
Set xLibro1 = Nothing
End Sub

deberías colocar un break point y depurar el código, no creo que esté 'lejos' el problema...

El break point se produce en Columns("E:E").Select al efectuar una segunda option
Gracias por tu respuesta

quizá el error se debe a que no está definida explícitamente la
hoja sobre la cual se debe seleccionar la columna E

en lugar de Columns("E:E").Select

debería decir

Hoja1.Columns("E:E").Select

o

Hoja1.Activate
ActiveSheet.Columns("E:E").Select

Saludos, desde Baires, JuanC

Sigue apareciendo dicho error. Incluso si pongo Worksheets(1).Activate.
He notado que el proceso EXCEL queda activo para cada vez que ejecuto la rutina. Lo puedo ver en el Administrador de Tareas de Windows (CTRL + ALT + SUP).
No encuentro la manera de eliminar al EXCEL remanente con alguna orden dentro de la Sub en cuestión. Por ahí pasaría la solución
Saludos desde Posadas

Tengo esta macro que filtra entre fechas al ejecutarla me da error 1004 en FechaDesde.
Aguien sabe como solucionar.
Gracias

Me ha llevado un par de días pero al fin encontré causa y solución:
La causa era que la declaración Set objExcel = New Excel.Application me formaba una nueva aplicación cada ves que ejecutaba la rutina con las diferentes Option y Visual Basic (o Windows) guardaba cada uno de estos procesos vaya a saber donde.
La solución fue colocar Set objExcel = New Excel.Application cuando carga el form (Form Load)
y no descargar al proceso al final de la sub mediante 'Set objExcel = Nothing pues no me reconocería nuevamente Set xlibro1 = objExcel.Workbooks.Open(App.Path + "\" & Archi)

Al final de la rutina pongo :

La rutina queda entonces


Saludos

Jak excelente aporte
me sirvió para solucionar mi problema , felicitaciones por tu aporte

Hola Jak:
es exactamente eso lo que sucede. Con sacarlo al form ya funciona.
Saludos y mil gracias,