Visual Basic - Se ha producido el error 13 en tiempo de ejecucion, No coinciden los tipos

Life is soft - evento anual de software empresarial
   
Vista:

Se ha producido el error 13 en tiempo de ejecucion, No coinciden los tipos

Publicado por Jorge Ortiz (1 intervención) el 03/11/2011 21:48:50
Estoy tratando de crear una macro en la que necesito abrir una seria de archivos que estan en otra pc, los archivos son de extension .csv y quiero que cuando yo escriba el nombre del archivo la macro abra el archivo, copie los datos, los pegue en mi hoja de calculo y luego cierre el archivo, el problema es que me manda el error: 13 en tiempo de ejecucion, que no coinciden los tipos, les anexo el codigo que utilize espero puedan ayudarme, gracias....

Sub Macro1()

Dim remi As Workbook
Set remi = ActiveWorkbook
nombre = Hoja1.Range("e3").Value 'Actualiza
ruta = "C:\Hola\"
Abrir = ruta + nombre
Workbooks.Open Filename:=Abrir
nuevo = ActiveWorkbook.Name
Workbooks(nuevo).Activate
Workbooks(nuevo).Sheets(1).Range("a2:h5000").Copy
remi.Activate
Workbooks(remi).Sheets("hoja2").Range("a2").Value = Workbooks(nuevo).Sheets(1).Range("a2:h5000").Value
Application.CutCopyMode = False
Workbooks(nuevo).Close

El texto que esta en negritas es el que me genera el error, gracias...

End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Se ha producido el error 13 en tiempo de ejecucion, No coinciden los tipos

Publicado por Christian (666 intervenciones) el 04/11/2011 20:39:22
Fijate los tipos de cada celda. Tanto el que lees del csv como la celda destino.

Porque no usas Range.Paste?

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar