Macros para un número variable de filas

Estoy haciendo mis primeros pinitos en macros (sin entrar en programación de Visual Basic, solo "grabando") e incluso me he atrevido a alterar un poco el código de VB para ajustar lo que necesitaba. No obstante, me he quedado encallado pues tengo que trabajar con varias hojas que, según el día, tienen un número variable de filas. Por ejemplo, si quiero seleccionar todas las filas excepto la primera y la última (que puede ser la 4, la 15 o la 347, según el día), para hacer luego algo con ellas, ¿cómo puedo hacerlo? No sé como decirle "la última" a la macro. ¿Me puedes echar una mano?
Gracias anticipadas.
Respuesta
1
Podría ser:
Dim CantFilas As Long
Dim CantCol As Long
CantFilas = InputBox("¿Cuántas Filas quieres?")
CantCol = InputBox("¿Cuántas Columnas?")
Range(ActiveCell + CantFilas, CantCol).Select
Te posicionas en por celda y ejecutas el código.
Gracias por tu respuesta, pues con ella he aprendido a introducir valores dentro de la macro. No obstante, ¿no hay manera de automatizarlo de manera que el propio Excel detecte la última fila? Las columnas no son problema pues siempre son las mismas, pero si tengo que contar las filas e introducirlas a mano no me sale a cuenta, lo que necesitaría es que se automizara todo. Si se puede, bien, y si no, pues gracias igualmente, me has ayudado mucho.
Entonces podría ser:
Range(ActiveCell.End(xlDown) -1, 4).Select  'Suponiendo que son 4 columnas.
Te posicionas en A2 y ejecutas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas