Visual Basic para Aplicaciones - error visual con excel

A ver si alguien sabe que ocurre. Gracias.
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.

-----------------------------
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)
.