Tabla de contenido
Si usted está trabajando con Microsoft Excel por un tiempo, usted sabe la importancia de Autocompletar. Con el fin de copiar una fórmula a través de la fila o la columna, utilizamos este método. Ahora, podemos utilizar esto manualmente por el ratón. Pero, si usted tiene una gran fila con los datos, será difícil de copiar cualquier fórmula a la última fila o columna. Puede utilizar el código VBA para Autocompletar una fórmula a la última fila o columna confacilidad.
En este tutorial, usted aprenderá a Autocompletar una fórmula a la última fila en Excel utilizando códigos VBA. Este tutorial será en el punto con ejemplos adecuados e ilustraciones apropiadas. Así que, quédate con nosotros.
Descargar el cuaderno de prácticas
Autocompletar fórmula hasta la última fila.xlsm
¿Qué es el Autorrelleno en Excel?
Ahora bien, el autorrelleno es una característica incorporada de Microsoft Excel que permite a los usuarios rellenar automáticamente el resto de las filas o columnas con valores, formatos o fórmulas. Puedes identificarlo cuando llevas el cursor a la esquina inferior derecha de cualquier celda. Lo llamamos manejador de autorrelleno de Excel.
Eche un vistazo a la siguiente captura de pantalla:
Aquí puede ver dos números. Rellenaremos el resto de las filas utilizando el autorrelleno de Excel.
Primero, seleccione el rango de celdas B5:B6. Después, verá el tirador de autorrelleno en la esquina inferior derecha.
Ahora, arrastra este tirador de autorrelleno hacia abajo.
Como puede ver, Excel rellenó automáticamente el resto de las celdas. Este es el uso básico del autorrelleno en Excel.
Cómo utilizar Autocompletar con Excel VBA
Si tienes un gran número de filas o columnas en un rango dado, tienes que arrastrar el tirador de autorrelleno hasta la última fila o columna. Es un proceso muy agitado. Afortunadamente puedes minimizarlo usando los códigos VBA en Excel. Puedes usar el código VBA para autorrellenar las celdas con valores, fórmulas o formatos.
La sintaxis genérica:
Rango.AutoRelleno Destino, Tipo
Toma,
Range("B5"): La celda que tiene el patrón principal para rellenar el resto de la serie.
Destino: Rango de celdas donde desea rellenar con la serie patrón.
Tipo como xlAutoFillType: El tipo de relleno de la serie. Hay varios tipos de relleno automático que puede elegir.
Más información: Cómo utilizar VBA AutoFill en Excel
4 Tipos de Autocompletar en Excel VBA
En esta sección, hablaré de algunos de los tipos de autorrelleno. Ya vimos que podemos elegir cualquier tipo de autorrelleno mediante la opción xlAutoFillType. Aquí les muestro algunos ejemplos de ello.
1. xlFillDefault
Ya vimos este tipo de autorrelleno en el ejemplo anterior.
Echa un vistazo a la captura de pantalla:
Escriba el siguiente código VBA para autocompletar el resto de las celdas:
Sub xlDefault_type() Range("B5:B6").AutoFill Destination:=Range("B5:B11"), Type:=xlFillDefault End Sub
Ahora, ejecute la macro VBA y después de eso, usted verá lo siguiente:
Rellena automáticamente el resto de las celdas utilizando la macro VBA.
2. xlFillCopy
Para copiar los mismos valores puede utilizar el tipo xlFillCopy en el tipo de autorrelleno.
Echa un vistazo a la captura de pantalla:
Escriba el siguiente código VBA para autocompletar el resto de las celdas:
Sub xlFillCopy_type() Rango("B5:B6").AutoFill Destino:=Rango("B5:B11"), Tipo:=xlFillCopy End Sub
Ahora, ejecute la macro VBA y después de eso, usted verá lo siguiente:
Excel rellena el resto de las celdas con el mismo patrón de valores.
3. xlFillMonths
También puede rellenar los meses utilizando el botón xlFillMonths tipo de autorrelleno.
Echa un vistazo a la captura de pantalla:
Aquí hemos introducido los meses de enero y febrero.
Escriba el siguiente código VBA para autocompletar el resto de las celdas:
Sub xlFillMonths_type() Rango("B5:B6").AutoFill Destino:=Rango("B5:B11"), Tipo:=xlFillMonths End Sub
Ahora, ejecute la macro VBA y después de eso, usted verá lo siguiente:
Excel entiende automáticamente los patrones y los rellena con ellos.
4. xlFillFormats
También puede copiar formatos a otras celdas utilizando el autorrelleno de VBA. Para ello, debe utilizar la función xlFillFormats tipo de autorrelleno.
Echa un vistazo a la captura de pantalla:
Aquí, hemos rellenado las dos celdas con algunos colores.
Ahora, escriba el siguiente código VBA para autocompletar el resto de las celdas:
Sub xlFillFormats_type() Rango("B5:B6").AutoFill Destino:=Rango("B5:B11"), Tipo:=xlFillFormats End Sub
Ahora, ejecute la macro VBA y después de eso, usted verá lo siguiente:
Como puede ver, nuestra macro VBA utiliza el autorrelleno para rellenar las filas de la columna B de forma eficaz.
Más información: Cómo Autocompletar Meses en Excel
5 Ejemplos con Autocompletar fórmula a la última fila en Excel VBA
1. VBA para Autocompletar una Fórmula en la Última Fila Utilizada
Del mismo modo, puede autocompletar una fórmula utilizando el VBA. si ha leído las secciones anteriores, podrá realizarlo fácilmente. el problema surge cuando tiene que autocompletar la fórmula hasta la última fila. primero tiene que identificar la última fila utilizada. después, el código VBA las rellenará automáticamente.
Eche un vistazo al siguiente conjunto de datos:
Aquí, tenemos un conjunto de datos de ventas de algunos vendedores. Nuestro objetivo es añadir las ventas de enero y febrero a la columna Total. Después de eso, vamos a utilizar el método de autorrelleno utilizando el VBA a la última fila utilizada en Excel.
Para ejecutarlo, escriba el siguiente código:
Sub ultima_fila_utilizada() Dim ultima_fila As Long ultima_fila = Cells(Rows.Count, 2).End(xlUp).Row Range("E5").Formula = "=SUMA(C5:D5)" Range("E5").AutoFill Destination:=Range("E5:E" & ultima_fila) End Sub
última_fila = Cells(Rows.Count, 2).End(xlUp).Row: Devuelve la última fila utilizada de la columna B. Puede elegir cualquier columna de su conjunto de datos.
Range("E5").Formula = "=SUMA(C5:D5)": Añadimos las ventas de Célula C5 y D5.
Range("E5").AutoRellenar Destino:=Range("E5:E" & last_row): Después de obtener el resultado, utilizamos el autocompletado. Se inicia el autocompletado desde Célula E5 a la última fila utilizada que obtuvimos anteriormente.
Ahora, ejecute la macro VBA. Después de eso, verá la siguiente salida:
Como puede ver, nuestro código VBA añade el primer resultado y autocompleta la fórmula en la última fila de Excel.
Más información: Cómo rellenar hasta la última fila con datos en Excel
2. Autocompletar VBA desde ActiveCell hasta la última fila
Ahora, si no desea utilizar el rango concreto en el método de autorrelleno, puede utilizar los valores, fórmulas o formatos de la celda activa. Cuando haga clic en una celda y desee autorrellenar el resto de las filas con la fórmula de la celda activa, utilice este método.
Es similar al ejemplo anterior. Estamos utilizando el conjunto de datos anterior:
Ahora, añadiremos las ventas de enero y febrero y autorellenaremos la fórmula en la última fila utilizando Excel VBA.
Ahora, escriba el siguiente código:
Sub autofill_active_cell() Dim last_row As Long last_row = Cells(Rows.Count, 2).End(xlUp).Row ActiveCell.Formula = "=SUMA(C5:D5)" ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & ":E" & last_row) End Sub
última_fila = Cells(Rows.Count, 2).End(xlUp).Row: Devuelve la última fila utilizada de la columna B. Puede elegir cualquier columna de su conjunto de datos.
ActiveCell.Formula = "=SUMA(C5:D5)": Añadimos las ventas de Célula C5 y D5 en la celda seleccionada.
ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & ":E" & last_row): Después de obtener el resultado, utilizamos el autocompletado. Comienza el autocompletado desde la celda activa hasta la última fila utilizada que obtuvimos anteriormente.
Ahora, seleccione Célula E5 .
A continuación, ejecute la macro VBA para añadir la fórmula y el autorrelleno a la última fila.
Como puede ver, hemos utilizado con éxito la macro VBA para autocompletar la fórmula hasta la última fila.
Lecturas similares
- Cómo Repetir Filas un Número Especificado de Veces en Excel (4 Formas)
- Numerar Filas Automáticamente en Excel (8 Métodos)
- Cómo Rellenar Columna en Excel con el Mismo Valor (9 Trucos)
- Aplicar Atajo de Autorrelleno en Excel (7 Métodos)
3. Autocompletar hasta la última fila usando Rango Dinámico con Excel VBA
Anteriormente le mostramos algunas macros VBA para autocompletar hasta la última fila en Excel. Ahora bien, en esos ejemplos ya utilizábamos rangos dinámicos.
Para entender los rangos estáticos, eche un vistazo al siguiente código:
Sub last_used_row() Range("E5").Formula = "=SUMA(C5:D5)" Range("E5").AutoFill Destination:=Range("E5:E11") End Sub
Básicamente le dijimos a Excel que introdujera una fórmula en Célula E5 y autocompletarlo desde Célula E5 a Celda E11 Aquí, especificamos el rango. ¿Qué pasa si agrega más filas? En ese caso, nuestro VBA no autocompletará esas filas adicionales porque ya le dijimos que autocompletara un rango específico.
Para resolver este problema se me ocurrió una solución que puede tomar un rango dinámico:
Sub ultima_fila_utilizada() Dim ultima_fila As Long ultima_fila = Cells(Rows.Count, 2).End(xlUp).Row Range("E5").Formula = "=SUMA(C5:D5)" Range("E5").AutoFill Destination:=Range("E5:E" & ultima_fila) End Sub
Como puede ver, primero encontramos la última fila mediante esta línea de código:
última_fila = Cells(Rows.Count, 2).End(xlUp).Row
Después, autocompletamos hasta la última fila utilizando el rango dinámico:
Range("E5").AutoRellenar Destino:=Range("E5:E" & ultima_fila)
No importa cuántas filas añada a su conjunto de datos, este código VBA conseguirá identificarlas y las rellenará automáticamente con la fórmula.
Rango dinámico significa básicamente que no tienes que introducir el rango manualmente, Excel lo actualizará cada cierto tiempo.
Más información: Excel VBA: Autocompletar método de rango de clase fallado
4. Autocompletar hasta la última columna en Excel usando VBA
Si ha leído las secciones anteriores para autocompletar hasta la última fila, entonces puede autocompletar hasta la última columna fácilmente. Sólo tiene que encontrar el número de la última columna y autocompletarlo con Excel VBA.
Eche un vistazo al siguiente conjunto de datos:
Aquí, tenemos un conjunto de datos que representa el presupuesto de 3 meses de una persona. Ahora, sumaremos los gastos de todos los meses y autocompletaremos la fórmula en la última columna utilizando el VBA de Excel.
Ahora, escriba el siguiente código:
Sub ultima_columna_utilizada() Dim ultima_fila As Long ultima_columna = Cells(6, Columns.Count).End(xlToLeft).Column Range("D9").Formula = "=SUMA(D6:D8)" Range("D9").AutoFill Destination:=Range("D9", Cells(9, ultima_columna)) End Sub
ultima_columna = Cells(6, Columns.Count).End(xlToLeft).Column: Devuelve la última columna utilizada de la fila 6. Puede elegir cualquier fila para empezar de su conjunto de datos.
Range("D9").Formula = "=SUMA(D6:D8)": Añadimos los gastos de tres meses (enero, febrero y marzo).
Rango("D9").Autorelleno Destino:=Rango("D9", Cells(9, ultima_columna)): Después de obtener el resultado, utilizamos el autocompletado. Aquí, nuestra fila principal es la Fila número 9. Todos nuestros datos estarán en esta fila. Comienza el autocompletado desde la columna D a la última columna utilizada que obtuvimos anteriormente mediante la función última_columna .
Después de ejecutar la macro, verá la siguiente salida:
Como se puede ver, hemos utilizado con éxito el VBA para autocompletar la fórmula a la última columna en Excel.
Más información: Cómo autocompletar una columna en Excel
5. Autocompletar Números Secuenciales hasta la Última Fila en Excel Usando VBA
También puede autocompletar números secuenciales utilizando el autocompletado en VBA. Aquí, tiene que utilizar xlFillSeries en el tipo de autorrelleno. Excel entenderá el patrón y los rellenará con él.
Eche un vistazo a la siguiente captura de pantalla:
Aquí, tenemos algunos nombres. Y queremos darles un ID de forma secuencial. Para ello, vamos a utilizar el autocompletar VBA.
Autocompletar números secuenciales con rango estático:
Sub sequential_number_2() Range("C5").AutoFill Destination:=Range("C5:C11"), Type:=xlFillSeries End Sub
Después de ejecutar el código, verá la salida:
Si desea utilizar el rango dinámico, utilice el siguiente código:
Sub sequential_number_1() Dim last_row As Long last_row = Cells(Rows.Count, 2).End(xlUp).Row Range("C5").AutoFill Destination:=Range("C5:C" & last_row), Type:=xlFillSeries End Sub
última_fila = Cells(Rows.Count, 2).End(xlUp).Row: Devuelve la última fila utilizada de la columna B.
Range("C5").AutoFill Destination:=Range("C5:C" & last_row), Type:=xlFillSeries: Tomará el ID de Célula C5 y autocompletar hasta la última fila utilizada en la columna C utilizando el xlFillSeries ,
En ambos casos, obtendrá el mismo resultado:
Como puede ver, hemos utilizado con éxito el código VBA para autocompletar números secuenciales en Excel.
Más información: Fórmulas Excel para Rellenar Números de Secuencia Omitir Filas Ocultas
💬 Cosas para recordar
✎ Puede detener el autorrelleno de varias maneras si no lo quieres .
✎ No puede autorrellenar varias filas y columnas simultáneamente. Hágalo una a una.
Conclusión
Para concluir, espero que este tutorial le haya proporcionado un conocimiento útil para autorellenar la fórmula hasta la última fila utilizando los códigos VBA. Le recomendamos que aprenda y aplique todas estas instrucciones a su conjunto de datos. Descargue el libro de ejercicios de práctica y pruébelas usted mismo. Además, no dude en darnos su opinión en la sección de comentarios. Su valiosa opinión nos mantiene motivados para crear tutoriales como los siguientesesto.
No olvide consultar nuestro sitio web Exceldemy.com para diversos problemas y soluciones relacionados con Excel.
Siga aprendiendo nuevos métodos y siga creciendo.