Fórmula d'emplenament automàtic a l'última fila amb Excel VBA (5 exemples)

  • Comparteix Això
Hugh West

Si esteu treballant amb Microsoft Excel durant un temps, coneixeu la importància de l'emplenament automàtic. Per copiar una fórmula a través de la fila o la columna, utilitzem aquest mètode. Ara, podem utilitzar-ho manualment amb el ratolí. Però, si teniu una fila gran amb dades, serà difícil copiar qualsevol fórmula a l'última fila o columna. Podeu utilitzar el codi VBA per emplenar automàticament una fórmula fins a l'última fila o columna amb facilitat.

En aquest tutorial, aprendràs a emplenar automàticament una fórmula fins a l'última fila d'Excel mitjançant codis VBA. Aquest tutorial serà adequat amb exemples adequats i il·lustracions adequades. Per tant, roman amb nosaltres.

Baixeu el quadern de pràctiques

Emplenar automàticament la fórmula a l'última fila.xlsm

Què és l'emplenament automàtic Sobresortir?

Ara, l'emplenament automàtic és una funció integrada de Microsoft Excel que permet als usuaris omplir automàticament la resta de files o columnes amb valors, formats o fórmules. Podeu identificar-lo quan porteu el cursor a l'extrem inferior dret de qualsevol cel·la. L'anomenem gestor d'emplenament automàtic d'Excel.

Feu una ullada a la captura de pantalla següent:

Aquí podeu veure dos números. Omplirem la resta de files mitjançant l'emplenament automàtic d'Excel.

Primer, seleccioneu l'interval de cel·les B5:B6. Després d'això, veureu el controlador d'emplenament automàtic a l'extrem inferior dret.

Ara, arrossegueu aquest controlador d'emplenament automàtic cap avall.

Com podeu veure, Excel va omplir automàticament el fitxerresta de cèl·lules. Aquest és l'ús bàsic de l'emplenament automàtic a Excel.

Com utilitzar l'emplenament automàtic amb Excel VBA

Si teniu un gran nombre de files o columnes en un interval determinat, haureu d'arrossegar cap avall el controlador d'emplenament automàtic fins a l'última fila o columna. És un procés molt agitat. Afortunadament, podeu minimitzar-lo mitjançant els codis VBA a Excel. Podeu utilitzar el codi VBA per omplir automàticament les cel·les amb valors, fórmules o formats.

La sintaxi genèrica:

Interval .Destinació d'emplenament automàtic, escriviu

Aquí,

Interval ("B5"): La cel·la que té el patró principal per omplir la resta de la sèrie.

Destinació: Interval de cel·les on voleu omplir amb la sèrie de patrons.

Escriviu com a xlAutoFillType: El tipus d'emplenament de la sèrie. Hi ha diversos tipus d'emplenament automàtic que podeu triar.

Llegiu més: Com utilitzar l'emplenament automàtic de VBA a Excel

4 tipus d'emplenament automàtic a Excel VBA

En aquesta secció, parlaré d'alguns dels tipus d'emplenament automàtic. Ja hem vist que podem triar qualsevol tipus d'emplenament automàtic mitjançant el xlAutoFillType. Aquí us en mostro alguns exemples.

1. xlFillDefault

Ja vam veure aquest tipus d'emplenament automàtic a l'exemple anterior.

Feu una ullada a la captura de pantalla:

Escriviu el següent codi VBA per omplir automàticament la resta de cel·les:

9796

Ara, executeu la macro VBA i després veureu elsegüent:

Omple automàticament la resta de cel·les mitjançant la macro VBA.

2. xlFillCopy

Per copiar els mateixos valors, podeu utilitzar el tipus xlFillCopy al tipus d'emplenament automàtic.

Feu una ullada a la captura de pantalla:

Escriviu el següent codi VBA per omplir automàticament la resta de cel·les:

9543

Ara, executeu la macro VBA i després veureu el següent:

Excel omple la resta de cel·les amb el mateix patró de valors.

3. xlFillMonths

També podeu omplir mesos amb el tipus d'emplenament automàtic xlFillMonths .

Feu una ullada a la captura de pantalla:

Aquí hem introduït dos mesos de gener i febrer.

Escriviu el codi VBA següent per omplir automàticament la resta de cel·les:

8430

Ara, executeu la macro VBA i després això, veureu el següent:

Excel entén automàticament els patrons i els omple amb ells.

4. xlFillFormats

També podeu copiar formats a altres cel·les mitjançant l'emplenament automàtic de VBA. Per això, heu d'utilitzar el tipus d'emplenament automàtic xlFillFormats .

Feu una ullada a la captura de pantalla:

Aquí tenim ha omplert les dues cel·les amb alguns colors.

Ara, escriviu el següent codi VBA per omplir automàticament la resta de cel·les:

5543

Ara, executeu la macro VBA i després veureu el següent:

Com podeu veure, la nostra macro VBA utilitza l'emplenament automàtic perompliu les files de la columna B de manera efectiva.

Llegiu més: Com omplir automàticament els mesos a Excel

5 exemples amb la fórmula d'emplenament automàtic a l'última fila de Excel VBA

1. VBA per emplenar automàticament una fórmula fins a la darrera fila utilitzada

De la mateixa manera, podeu omplir automàticament una fórmula amb el VBA. si heu llegit les seccions anteriors, podeu fer-ho fàcilment. El problema sorgeix quan heu d'omplir automàticament la fórmula fins a l'última fila. Primer heu d'identificar l'última fila utilitzada. Després d'això, el codi VBA els omplirà automàticament.

Feu una ullada al conjunt de dades següent:

Aquí tenim un conjunt de dades de vendes d'alguns venedors . El nostre objectiu és afegir les vendes de gener i febrer a la columna Total. Després d'això, utilitzarem el mètode d'emplenament automàtic mitjançant el VBA a l'última fila utilitzada a Excel.

Per executar-ho, escriviu el codi següent:

6752

last_row = Cel·les(Rows.Count, 2).End(xlUp).Row: Retorna l'última fila utilitzada de la columna B. Podeu triar qualsevol columna del vostre conjunt de dades.

Rang(“E5”). Fórmula = “=SUMA(C5:D5)”: Afegim les vendes de Cel·la C5 i D5.

Range(“E5”).AutoFill Destination:=Range(“E5:E” i darrera_fila): Després d'obtenir el resultat, fem servir l'emplenament automàtic. Comença a omplir automàticament des de la Cel·la E5 fins a l'última fila utilitzada que hem obtingut anteriorment.

Ara, executeu la macro VBA. Després d'això, veureu la sortida següent:

Aspodeu veure, el nostre codi VBA afegeix el primer resultat i emplena automàticament la fórmula a l'última fila d'Excel.

Llegiu més: Com omplir fins a l'última fila amb dades a Excel

2. Emplenament automàtic de VBA des de la cèl·lula activa fins a l'última fila

Ara, si no voleu utilitzar l'interval concret del mètode d'emplenament automàtic, podeu utilitzar els valors de la cel·la activa , fórmules o formats. Quan feu clic a una cel·la i voleu omplir automàticament la resta de files amb la fórmula de la cel·la activa, feu servir aquest mètode.

És similar a l'exemple anterior. Estem utilitzant el conjunt de dades anterior:

Ara, afegirem les vendes de gener i febrer i omplirem automàticament la fórmula a l'última fila amb Excel VBA.

Ara, escriviu el codi següent:

5123

last_row = Cel·les(Rows.Count, 2).End(xlUp).Row: Retorna l'última fila usada fila de la columna B. Podeu triar qualsevol columna del vostre conjunt de dades.

ActiveCell.Formula = “=SUM(C5:D5)”: Afegim les vendes de Cell C5 i D5 a la cel·la seleccionada.

ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & ":E" & last_row): Després d'obtenir el resultat, fem servir l'emplenament automàtic. Comença a omplir automàticament des de la cel·la activa fins a l'última fila utilitzada que hem obtingut anteriorment.

Ara, seleccioneu Cel·la E5 .

Després, executeu la macro VBA per afegir la fórmula i emplenament automàtic a l'última fila.

Com podeu veure,va utilitzar correctament la macro VBA per omplir automàticament la fórmula fins a l'última fila.

Lectures similars

  • Com repetir files un nombre determinat de vegades a Excel (4 maneres)
  • Numeració de files automàticament a Excel (8 mètodes)
  • Com omplir la columna a Excel amb el mateix valor (9 trucs) )
  • Aplica la drecera d'emplenament automàtic a Excel (7 mètodes)

3. Emplenament automàtic a l'última fila mitjançant el rang dinàmic amb Excel VBA

Anteriorment us vam mostrar algunes macros VBA per emplenar automàticament fins a l'última fila d'Excel. Ara, en aquests exemples, ja hem utilitzat intervals dinàmics.

Per entendre els intervals estàtics, mireu el codi següent:

8326

Bàsicament vam dir a Excel que introduís una fórmula a Cel·la E5 i empleneu-la automàticament des de Cel·la E5 a Cel·la E11 . Aquí, hem especificat el rang. Què passa si afegiu més files? En aquest cas, el nostre VBA no omplirà automàticament aquestes files addicionals perquè ja li vam dir que omplirà automàticament un interval específic.

Per resoldre aquest problema, vaig trobar una solució que pot tenir un rang dinàmic:

7511

Com podeu veure, primer trobem l'última fila per aquesta línia de codi:

4125

Després d'això, omplim automàticament fins a l'última fila utilitzant l'interval dinàmic:

6010

No independentment de quantes files afegiu al vostre conjunt de dades, aquest codi VBA tindrà èxit per identificar-les. I els omplirà automàticament amb la fórmula.

L'interval dinàmic significa bàsicament que no cal que introduïu l'interval.manualment. Excel l'actualitzarà de tant en tant.

Llegiu més: Excel VBA: el mètode d'emplenament automàtic de la classe d'interval ha fallat

4. Emplenament automàtic fins a l'últim Columna a Excel mitjançant VBA

Si heu llegit les seccions anteriors per omplir automàticament fins a l'última fila, podeu omplir automàticament fins a l'última columna fàcilment. Només heu de trobar l'últim número de columna i omplir-lo automàticament amb Excel VBA.

Feu una ullada al conjunt de dades següent:

Aquí tenim un conjunt de dades que representa un pressupost de 3 mesos d'una persona. Ara, afegirem les despeses de tots els mesos i omplirem automàticament la fórmula a l'última columna amb Excel VBA.

Ara, escriviu el codi següent:

9014

última_columna = Cel·les(6, Columns.Count).End(xlToLeft).Column: Retorna l'última columna utilitzada de la fila 6. Podeu triar qualsevol fila per començar des del vostre conjunt de dades.

Interval(“D9”). Fórmula = “=SUMA(D6:D8)”: Afegim les despeses de tres mesos (gen, febrer, març).

Range(“D9”).AutoFill Destination:=Range(“D9”, Cel·les(9, darrera_columna)): Després d'obtenir el resultat, fem servir l'emplenament automàtic. Aquí, la nostra fila principal és la fila número 9. Totes les nostres dades estaran en aquesta fila. Comença a omplir automàticament des de la columna D fins a l'última columna utilitzada que hem obtingut anteriorment per la última_columna .

Després d'executar la macro, veureu la següent sortida :

Com podeu veure, hem utilitzat correctament el VBA per omplir automàticament elfórmula a l'última columna d'Excel.

Llegir més: Com omplir automàticament una columna a Excel

5. Emplenament automàtic de números seqüencials a l'última fila a Excel mitjançant VBA

També podeu omplir automàticament números seqüencials mitjançant l'emplenament automàtic de VBA. Aquí, heu d'utilitzar xlFillSeries en el tipus d'emplenament automàtic. Excel entendrà el patró i l'omplirà.

Feu una ullada a la captura de pantalla següent:

Aquí tenim alguns noms. I volem donar-los una identificació de manera seqüencial. Per fer-ho, utilitzarem l'emplenament automàtic de VBA.

Emplenament automàtic de números seqüencials amb rang estàtic:

8879

Després d'executar el codi, veureu la sortida:

Si voleu utilitzar l'interval dinàmic, feu servir el codi següent:

8568

última_fila = Cel·les(Files. Count, 2).End(xlUp).Row: Retorna l'última fila utilitzada de la columna B.

Range(“C5”).AutoFill Destination:=Range(“C5”) :C” & last_row), Tipus:=xlFillSeries: Prengui l'ID de la Cel·la C5 i s'emplenarà automàticament fins a l'última fila utilitzada a la Columna C utilitzant el xlFillSeries ,

En ambdós casos, obtindreu la mateixa sortida:

Com podeu veure, hem utilitzat correctament el codi VBA per emplenament automàtic de números seqüencials a Excel.

Llegiu més: Fórmules d'Excel per omplir números de seqüència Omet les files ocultes

💬 Coses per recordar

Podeu aturar l'emplenament automàtic Diverses maneres si no ho voleu .

No podeu omplir automàticament diverses files i columnes simultàniament. Feu-ho un per un.

Conclusió

Per concloure, espero que aquest tutorial us hagi proporcionat un coneixement útil per omplir automàticament la fórmula fins a l'última fila mitjançant els codis VBA. Us recomanem que apreneu i apliqueu totes aquestes instruccions al vostre conjunt de dades. Descarrega el quadern de pràctiques i prova-los tu mateix. A més, no dubteu a fer comentaris a la secció de comentaris. Els vostres valuosos comentaris ens mantenen motivats per crear tutorials com aquest.

No oblideu consultar el nostre lloc web Exceldemy.com per trobar diversos problemes i solucions relacionats amb Excel.

Segueix aprenent nous mètodes i segueix creixent!

Hugh West és un entrenador i analista d'Excel molt experimentat amb més de 10 anys d'experiència en el sector. És llicenciat en Comptabilitat i Finances i Màster en Administració i Direcció d'Empreses. Hugh té una passió per l'ensenyament i ha desenvolupat un enfocament pedagògic únic que és fàcil de seguir i entendre. El seu coneixement expert d'Excel ha ajudat a milers d'estudiants i professionals de tot el món a millorar les seves habilitats i a destacar en les seves carreres. A través del seu bloc, Hugh comparteix els seus coneixements amb el món, oferint tutorials d'Excel gratuïts i formació en línia per ajudar les persones i les empreses a assolir tot el seu potencial.