error visual basic importando de excel

Miguel
15 de Septiembre del 2005
Necesito ayuda con un problema con visual Basic 6.0 Estoy desesperado. Pleaseeeee.

El problema es el siguiente.

Pasamos datos desde un fichero excel a una base de datos access. Con este bucle que aparece vamos leyendo lineas de excel y cuando tenemos toda la linea la guardamos en access pero cuando llega a la línea 411 del excel, nada más entrar en el bucle y realizar la instrucción con los *******, el programa se queda colgado. No aparece ningún mensaje de error ni de visual ni de windows. Lo mejor es que solo pasa en window 98 y lo hemos probado en dos equipos distintos con 98 y ha dado el error en los dos y en la misma linea del excel. Lo raro es que no es al leer del excel ni al intentar guardar en la base de datos, es nada más entrar en el bucle en la primera instrucción. En Xp y 2000 funciona bien. El error deja colgado el equipo del todo, hay que reiniciar.
El excel en w98 es excel 97

-----------------------------
While ((objWork.Worksheets(1).Cells(i, 1).Value <> "") Or (objWork.Worksheets(1).Cells(i, 2).Value <> ""))
If ((objWork.Worksheets(1).Cells(i, 1).Value <> "") Or (objWork.Worksheets(1).Cells(i, 2).Value <> "")) Then
strCeldaA = "A" & j **********************
If (objWork.Worksheets(1).Range(strCeldaA) = "") Then
vrtValorceldaA = "-"
Else
vrtValorceldaA = objWork.Worksheets(1).Range(strCeldaA)
.



rafa
15 de Septiembre del 2005
Hola Miguel.
No se la solucion de tu problema, pero prueba a usar:
DoCmd.TransferDatabase
asi puede que no te de errores, pero lo que si te aseguro es que vas a ganar MUCHO tiempo en el proceso.
Rafa

esteban
15 de Septiembre del 2005
perdona rafa pero en el mensaje original especifica que necesita vb6 no vfox y este es un comando de vfox