Foros del Web » Soporte técnico » Ofimática »

rango rebelde

Estas en el tema de rango rebelde en el foro de Ofimática en Foros del Web. hola amigos, estoy trabajando con un rango con un tratamiento "loco", que me trae de cabeza, a ver si me podeis aclarar mis dudas. Trabajo ...
  #1 (permalink)  
Antiguo 10/01/2019, 08:49
 
Fecha de Ingreso: diciembre-2007
Mensajes: 293
Antigüedad: 11 años, 1 mes
Puntos: 2
Exclamación rango rebelde

hola amigos,
estoy trabajando con un rango con un tratamiento "loco", que me trae de cabeza, a ver si me podeis aclarar mis dudas.

Trabajo con este codigo en una macro:
Código vb:
Ver original
  1. Workbooks.Open (ThisWorkbook.Path & "\" & "XXX.xls")
  2. ActiveWorkbook.Worksheets("Hoja1").Range("E1").Select
  3. 'Bajamos hasta la última fila adyacente, que contenga datos
  4. Selection.End(xlDown).Select
  5. For contador = 1 To ActiveCell.Row
  6.         MsgBox Range("E" & contador).Value
  7. Next contador


Aunque el codigo no me da errores de ejecucion, y la variable contador recorre el rango deseado, el bucle(el msgbox) no me muestra nada!!! ¿Alguien me puede explicar que pasa?

Gracias, saludos:D
__________________
1os pasaos con xAMP en Windows
programando en PERL



La zona horaria es GMT -6. Ahora son las 14:10.