Ciclo repetitivo si hay información en la fila

[fdotrujillo]

Buenas amigos foristas

Tengo una macro la cual toma los datos de una hoja y con eso se llena una base de datos de una aplicacion que tenemos, en la actualidad coloco

For i = 4 To 8

session.findById("wnd[1]/usr/cmbRF02D-KTOKD").Key = objSheet.Cells(i, 35)

session.findById("wnd[1]/usr/ctxtRF02D-BUKRS").Text = objSheet.Cells(i, 36)

Next i

Lo que deseo es que en la macro si existe informacion en la fila siguiente ejecuta el proceso sino pare

Agrdezco su colaboracion

Fernando Trujillo

[AlexanderS]

Deberías subir un archivo ejemplo es mas fácil, pero bueno prueba así:

For i = 4 To 8

if activecell = "" then

exit for

else

session.findById("wnd[1]/usr/cmbRF02D-KTOKD").Key = objSheet.Cells(i, 35)

session.findById("wnd[1]/usr/ctxtRF02D-BUKRS").Text = objSheet.Cells(i, 36)

end if

Next i

[fdotrujillo]

Riddle lo que deseo es no colocar en el for To 8, sino cambiarlo por otro comando o arreglarlo para que el vaya hasta donde haya informacion en las celdas, lo que quiero es no darle hasta tal celda, que el lo haga automatico

Gracias

DPRE.xls