Clases
1: Instrucción Select...Case para múltiples condiciones
2: Introducción a los Bucles en VBA: Bucle For...Next
3: Bucle For Each...Next para recorrer objetos de una colección
4: Bucle Do...While. Ejecutar mientras se cumple una condición
5: Bucle Do...Until . Ejecutar hasta que se cumpla una condición
6: Implementar un Controlador de errores
7: Procedimientos Sub públicos, privados y cómo ejecutarlos
8: Práctica: Agrupar tablas de varias hojas en una sola
9: Macro optimizada: Agrupar tablas de varias hojas en una sola
10: Funciones definidas por el usuario (UDF)
11: Funciones VBA para manejo de textos
12: Funciones VBA para manejo de Fecha y Hora
13: Funciones VBA de conversión, formato y evaluación
14: Usar Fórmulas y funciones de Excel desde VBA
15: Introducción a los Eventos en VBA y Eventos de libro
16: Introducción a los Eventos en VBA y Eventos de hoja
17: Eventos de Aplicación y eventos no asociados a objetos
Caso práctico: Crear un índice de todas las hojas
Participaciones
Raimundo_Graciano hace 17 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.
↳ Responder
Juan Alberto hace 7 meses
...Pero por lo visto no toma el último valor sino el primero, por lo que el For ... Next definitivo deberá ser: For I = 2 to Cantidad_Hojas) (...y el resto de las sentencias)
↳ Responder
Juan Alberto hace 7 meses
Si la idea es que la hoja no se trancriba (desde un principio), en el For ... Next pondría : For I = 1 to (Cantidad_Hojas - 1) , ya que fue la última en ser creada, por lo que el indice debe ser el número mayor.
↳ Responder
Juan Alberto hace 7 meses
Si la cuestión es escribirla y luego borrarla, entoces haría lo siguiente: Range("A2").select Selection.Delete Shift:=xlUp
↳ Responder
JuliaBravo490 hace 7 meses
De acuerdo, Juan. Ese código borra los datos de la celda seleccionada; en ese caso A2.
0
AbelEspi hace 7 meses
Buenas noches, en mi caso apenas estoy haciendo esta etapa del curso, pero yo eliminaría la fila con:
Rows("2:2").Select
Selection.Delete Shift:=xlUp
Saludos
Rows("2:2").Select
Selection.Delete Shift:=xlUp
Saludos
↳ Responder
nalattanzio hace 9 meses
Para no tener que eliminar la fila 2 podría inicializar la variable i=2 en el For
↳ Responder
Elena-G hace 1 año
Hola, buenas tardes,
Estoy muy emocionada de estar empezando por fin este Curso de Macros y VBA. Me encantan los macros y estoy feliz e impresionada de lo mucho que he resuelto con ellos desde que los conozco.
Una posible opción para eliminar la fila de la hoja índice del listado podría ser, justo antes del End Sub, como último código:
ActiveSheet.Range("A2").Delete
Seguimos aprendiendo!
Estoy muy emocionada de estar empezando por fin este Curso de Macros y VBA. Me encantan los macros y estoy feliz e impresionada de lo mucho que he resuelto con ellos desde que los conozco.
Una posible opción para eliminar la fila de la hoja índice del listado podría ser, justo antes del End Sub, como último código:
ActiveSheet.Range("A2").Delete
Seguimos aprendiendo!
↳ Responder
SusanaUztariz245 hace 1 año
Hola!
Otra manera de borrar la fila completa
Dim fila As Integer
fila = 2 ' el numero de fila en este caso
Rows(fila & ":" & fila). Delete
Un poco mas complicado pero puede servir para otros usos.
Otra manera de borrar la fila completa
Dim fila As Integer
fila = 2 ' el numero de fila en este caso
Rows(fila & ":" & fila). Delete
Un poco mas complicado pero puede servir para otros usos.
↳ Responder
JuliaBravo490 hace 1 año
Gracias, Susana, por el aporte.
Ver otras opciones es una buena forma de seguir aprendiendo.
Saludos,
Julia
Equipo Deztaca
Ver otras opciones es una buena forma de seguir aprendiendo.
Saludos,
Julia
Equipo Deztaca
1
Estás agregando un comentario en esta clase
Inicia sesión para dejar tu duda, comentario y/o respuesta