Raimundo_Graciano publicó en la clase Caso práctico: Crear un índice de todas las hojas hace 16 horas
Hola buenas noches
En vez de pensar como eliminar la fila, podemos buscar como no agregar ese valor desde un inicio, Claro que nos daremos cuenta despues de haber ejecutado la primera idea de la macro. (Estoy seguro que con el tiempo, al estar practicando las macros podremos anticipar estos detalles)
Ya una vez claro, que deseamos hacer, podemos añadir mas variables para que nos ayuden a hacer la macro.
agregaria una variable
Dim Fila As Integer
'Posicion de inicio
Fila = 2
'For i (iniciamos en 2), para no tomar en cuenta (1) de hoja (indice)
For i = 2 To Cantidad_Hojas
'Usamos el valor de la variable fila
Hoja.Cells(Fila, 1).Value = Sheets(i).Name
'añade 1 posición ó se recorre 1 fila abajo
Fila = Fila + 1
Next i
Tengo que aclarar algo, Consulte AI. Pero lo bonito de esto es que lo entiendo.... Y no lo hubiera entendido sin este curso y/o la academia Deztaca...
A segur practicando y aprendiendo,
Saludos.
En vez de pensar como eliminar la fila, podemos buscar como no agregar ese valor desde un inicio, Claro que nos daremos cuenta despues de haber ejecutado la primera idea de la macro. (Estoy seguro que con el tiempo, al estar practicando las macros podremos anticipar estos detalles)
Ya una vez claro, que deseamos hacer, podemos añadir mas variables para que nos ayuden a hacer la macro.
agregaria una variable
Dim Fila As Integer
'Posicion de inicio
Fila = 2
'For i (iniciamos en 2), para no tomar en cuenta (1) de hoja (indice)
For i = 2 To Cantidad_Hojas
'Usamos el valor de la variable fila
Hoja.Cells(Fila, 1).Value = Sheets(i).Name
'añade 1 posición ó se recorre 1 fila abajo
Fila = Fila + 1
Next i
Tengo que aclarar algo, Consulte AI. Pero lo bonito de esto es que lo entiendo.... Y no lo hubiera entendido sin este curso y/o la academia Deztaca...
A segur practicando y aprendiendo,
Saludos.
Respuestas
