VBA/Excel - Seleccionar X columnas en Excel, X=Día actual

Question

el 16 abr. 18

Necesito seleccionar un rango de celdas y la columna tiene que coincidir con el día del mes. He intentado hacerlo así:

Columna = Day(Date)
Worksheets(Month(Date)).Range("B2:" & Columna & "23").Select

Y también así:

Columna = Day(Date)
Worksheets(Month(Date)). Range(Cells(2, 2), Cells(23, Columna)).Select

Pero me salta el error: 1004 en tiempo de ejecución. Error definido por la aplicación o el objeto.

Respuesta de jrgces

1

Prueba con

Worksheets("" & Month(Date) & ""). Range(Cells(2, 2), Cells(23, Day(Now))).Select

a ver si hace lo que necesitas.

Saludos_

el 16 abr. 18

Dani G. · Accepted Answer · 2018-04-16T12:44:14.0000000Z

Respuesta de Dani G.

1

He solucionado el problema. He tenido que desglosar e ir haciendo por partes la selección.

Worksheets(Month(Date)).Select
Range(Cells(2, 2), Cells(23, Columna)).Select

Escribiéndolo así ya no da fallo y la hoja hace lo que necesito.

No sé por qué mi propuesta inicial no funcionaba.

el 16 abr. 18