As jy vir 'n rukkie met Microsoft Excel werk, weet jy hoe belangrik outovul is. Om 'n formule oor die ry of die kolom te kopieer, gebruik ons ​​hierdie metode. Nou kan ons dit handmatig met die muis gebruik. Maar as jy 'n groot ry met data het, sal dit moeilik wees om enige formule na die laaste ry of kolom te kopieer. Jy kan die VBA-kode gebruik om 'n formule met gemak na die laaste ry of kolom te Outovul.

In hierdie tutoriaal sal jy leer om 'n formule outomaties in te vul tot by die laaste ry in Excel deur VBA-kodes te gebruik. Hierdie tutoriaal sal op die punt wees met geskikte voorbeelde en behoorlike illustrasies. So, bly by ons.

Laai Oefenwerkboek af

Outovul Formule tot Laaste Ry.xlsm

Wat is Outovul in Excel?

Nou is outovul 'n ingeboude kenmerk van Microsoft Excel wat gebruikers toelaat om die res van die rye of kolomme outomaties met waardes, formate of formules te vul. Jy kan dit identifiseer wanneer jy die wyser na die regter onderste hoek van enige sel neem. Ons noem dit outovul-hanteerder van Excel.

Kyk na die volgende skermkiekie:

Hier kan jy twee nommers sien. Ons sal die res van die rye vul deur die outovul in Excel te gebruik.

Kies eers die reeks selle B5:B6. Daarna sal jy die outovul-handvatsel in die regter onderste hoek sien.

Sleep nou hierdie outovul-handvatsel af.

Soos jy kan sien, het Excel outomaties dieres van die selle. Dit is die basiese gebruik van die outovul in Excel.

Hoe om outovul met Excel VBA te gebruik

As jy 'n groot aantal rye of kolomme in 'n gegewe reeks het, moet jy af sleep die outovul-handvatsel na die laaste ry of kolom. Dit is 'n baie gejaagde proses. Gelukkig kan u dit verminder deur die VBA-kodes in Excel te gebruik. Jy kan die VBA-kode gebruik om die selle outomaties in te vul met waardes, formules of formate.

Die generiese sintaksis:

Reik .Outovul-bestemming, tipe

Hier,

Bereik(“B5”): Die sel wat die hoofpatroon het om die res van die reeks te vul.

Bestemming: Reeks selle waar jy met die patroonreeks wil vul.

Tik as xlAutoFillType: Die reeksvultipe. Daar is verskeie outovul tipes wat jy kan kies.

Lees meer: Hoe om VBA Outovul in Excel te gebruik

4 Tipes Outovul in Excel VBA

In hierdie afdeling sal ek sommige van die tipes outovul bespreek. Ons het reeds gesien dat ons enige outovul tipe kan kies deur die xlAutoFillType te gebruik. Hier wys ek vir jou 'n paar voorbeelde daarvan.

1. xlFillDefault

Ons het reeds hierdie tipe outovul in die vorige voorbeeld gesien.

Kyk na die skermkiekie:

Tik die volgende VBA-kode om die res van die selle outomaties in te vul:

4065

Laat nou die VBA-makro uit en daarna sal jy dievolgende:

Dit vul outomaties die res van die selle met behulp van VBA-makro.

2. xlFillCopy

Om dieselfde waardes te kopieer kan jy die tipe xlFillCopy in die outovul tipe gebruik.

Kyk na die skermkiekie:

Tik die volgende VBA-kode om die res van die selle outomaties in te vul:

9437

Laat nou die VBA-makro uit en daarna sal jy die volgende sien:

Excel vul die res van die selle met dieselfde patroon van waardes.

3. xlFillMonths

Jy kan ook maande vul deur die xlFillMonths -outovul-tipe te gebruik.

Kyk na die skermkiekie:

Hier het ons twee maande Januarie en Februarie ingevoer.

Tik die volgende VBA-kode in om die res van die selle outomaties in te vul:

8945

Nou, hardloop die VBA-makro en daarna dat, sal jy die volgende sien:

Excel verstaan ​​outomaties die patrone en vul dit daarmee.

4. xlFillFormats

Jy kan ook formate na ander selle kopieer deur die VBA-outovul te gebruik. Daarvoor moet jy die xlFillFormats outovul tipe gebruik.

Kyk na die skermkiekie:

Hier het ons het die twee selle met 'n paar kleure gevul.

Tik nou die volgende VBA-kode in om die res van die selle outomaties in te vul:

3854

Nou, hardloop die VBA-makro en daarna sal jy die volgende:

Soos jy kan sien, gebruik ons ​​VBA-makro die outovul omvul die rye van kolom B effektief in.

Lees meer: Hoe om maande in Excel te outovul

5 voorbeelde met outovulformule tot laaste ry in Excel VBA

1. VBA om 'n formule te outovul na laasgebruikte ry

Net so kan jy 'n formule outovul deur die VBA te gebruik. as jy die vorige afdelings gelees het, kan jy dit maklik uitvoer. Die probleem ontstaan ​​wanneer jy die formule outomaties moet invul tot by die laaste ry. Jy moet eers die laas gebruikte ry identifiseer. Daarna sal die VBA-kode hulle outomaties invul.

Kyk na die volgende datastel:

Hier het ons 'n verkoopsdatastel van sommige verkoopspersone . Ons doelwit is om die verkope van Januarie en Februarie by die Totaal-kolom te voeg. Daarna sal ons die outovul-metode gebruik deur die VBA na die laaste gebruikte ry in Excel te gebruik.

Om dit uit te voer, tik die volgende kode:

1865

laaste_ry = Cells(Rows.Count, 2).End(xlUp).Row: Dit gee die laaste gebruikte ry uit die kolom B terug. Jy kan enige kolom uit jou datastel kies.

Bereik(“E5”).Formule = “=SOM(C5:D5)”: Ons voeg die verkope van Sel C5 en D5 by.

Range(“E5”).AutoVul Bestemming:=Reik(“E5:E” & laaste_ry): Nadat ons die resultaat gekry het, gebruik ons ​​die outovul. Dit begin outomaties invul vanaf Sel E5 tot by die laaste gebruikte ry wat ons voorheen gekry het.

Laat nou die VBA-makro uit. Daarna sal jy die volgende uitvoer sien:

Asjy kan sien, ons VBA-kode voeg die eerste resultaat by en vul die formule outomaties in tot die laaste ry in Excel.

Lees meer: Hoe om tot by die laaste ry in te vul met data in Excel

2. VBA Outovul van ActiveCell na Laaste Ry

As jy nou nie die spesifieke reeks in die outovulmetode wil gebruik nie, kan jy die aktiewe sel se waardes gebruik , formules of formate. Wanneer jy op 'n sel klik en die res van die rye met die aktiewe sel se formule wil outovul, gebruik hierdie metode.

Dit is soortgelyk aan die vorige voorbeeld. Ons gebruik die vorige datastel:

Nou sal ons die verkope van Januarie en Februarie byvoeg en die formule outovul tot die laaste ry met Excel VBA.

Tik nou die volgende kode:

3374

laaste_ry = Cells(Rows.Count, 2).End(xlUp).Row: Dit gee die laaste gebruik terug ry uit die kolom B. Jy kan enige kolom uit jou datastel kies.

ActiveCell.Formula = “=SUM(C5:D5)”: Ons voeg die verkope van Sel by C5 en D5 in jou geselekteerde sel.

ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & “:E” & last_row): Nadat ons die resultaat gekry het, gebruik ons ​​die outovul. Dit begin outomaties invul vanaf die aktiewe sel na die laaste gebruikte ry wat ons voorheen gekry het.

Kies nou Sel E5 .

Daarna, hardloop die VBA-makro om die formule by te voeg en outovul by die laaste ry.

Soos jy kan sien, onshet die VBA-makro suksesvol gebruik om die formule outomaties in te vul tot by die laaste ry.

Soortgelyke lesings

• Hoe om rye 'n gespesifiseerde aantal kere te herhaal Excel (4 maniere)
• Nommer rye outomaties in Excel (8 metodes)
• Hoe om kolom in Excel met dieselfde waarde te vul (9 truuks) )
• Pas outovul-kortpad toe in Excel (7 metodes)

3. Outovul na laaste ry met behulp van dinamiese reeks met Excel VBA

Voorheen het ons jou 'n paar VBA-makro's gewys om outomaties in te vul tot die laaste ry in Excel. Nou, in daardie voorbeelde, het ons reeds dinamiese reekse gebruik.

Om statiese reekse te verstaan, kyk na die volgende kode:

1303

Ons het basies vir Excel gesê om 'n formule in in te voer Sel E5 en outovul dit van Sel E5 na Sel E11 . Hier het ons die reeks gespesifiseer. Wat as jy meer rye byvoeg? In daardie geval sal ons VBA nie daardie ekstra rye outovul nie, want ons het reeds vir hom gesê om 'n spesifieke reeks te outovul.

Om hierdie probleem op te los, het ek met 'n oplossing vorendag gekom wat 'n dinamiese reeks kan neem:

6642

Soos jy kan sien, vind ons eers die laaste ry deur hierdie reël kode:

7009

Daarna vul ons outomaties tot by die laaste ry deur die dinamiese reeks te gebruik:

9376

Nee maak nie saak hoeveel rye jy by jou datastel voeg nie, hierdie VBA-kode sal suksesvol wees om hulle te identifiseer. En dit sal hulle outovul met die formule.

Dinamiese reeks beteken basies dat jy nie die reeks hoef in te voer niehandmatig. Excel sal dit van tyd tot tyd opdateer.

Lees meer: Excel VBA: Outovulmetode van reeksklas het misluk

4. Outovul tot laaste Kolom in Excel Gebruik VBA

As jy die vorige afdelings gelees het om outomaties in te vul tot die laaste ry, dan kan jy maklik outovul na die laaste kolom. Jy moet net die laaste kolomnommer vind en dit outovul met Excel VBA.

Kyk na die volgende datastel:

Hier het ons 'n datastel wat 'n 3-maande begroting van 'n persoon verteenwoordig. Nou sal ons die uitgawes van alle maande byvoeg en die formule outomaties invul tot die laaste kolom deur die Excel VBA te gebruik.

Tik nou die volgende kode in:

8110

last_column = Cells(6, Columns.Count).End(xlToLeft).Kolom: Dit gee die laaste gebruikte kolom van die ry 6 terug. Jy kan enige ry kies om vanaf jou datastel te begin.

Bereik(“D9”).Formule = “=SOM(D6:D8)”: Ons voeg die uitgawes van drie maande (Jan, Feb. Mrt.) by.

Reik(“D9”).Outovul-bestemming:=Reik(“D9”, Cells(9, laaste_kolom)): Nadat ons die resultaat gekry het, gebruik ons ​​die outovul. Hier is ons hoofry Ry nommer 9. Al ons data sal in hierdie ry wees. Dit begin outomaties invul van kolom D na die laaste gebruikte kolom wat ons voorheen gekry het deur die laaste_kolom .

Nadat die makro uitgevoer is, sal jy die volgende uitvoer sien :

Soos jy kan sien, het ons die VBA suksesvol gebruik om dieformule na die laaste kolom in Excel.

Lees meer: Hoe om 'n kolom in Excel te outovul

5. Outovul opeenvolgende nommers na laaste ry in Excel Gebruik VBA

Jy kan ook opeenvolgende nommers outovul deur die outovul in VBA te gebruik. Hier moet jy xlFillSeries in die outovul tipe gebruik. Excel sal die patroon verstaan ​​en dit daarmee vul.

Kyk na die volgende kiekie:

Hier het ons 'n paar name. En ons wil hulle 'n ID op 'n opeenvolgende wyse gee. Om dit te doen, sal ons die VBA outovul gebruik.

Outovul opeenvolgende nommers met statiese reeks:

7458

Nadat jy die kode uitgevoer het, sal jy die uitvoer sien:

As jy die dinamiese reeks wil gebruik, gebruik dan die volgende kode:

1673

laaste_ry = Cells(Rows. Tel, 2).End(xlUp).Row: Dit gee die laaste gebruikte ry terug uit die kolom B.

Reik(“C5”).Outovulbestemming:=Reik(“C5”). :C” & laaste_ry), Tipe:=xlFillSeries: Dit sal die ID van Sel C5 neem en outovul na die laas gebruikte ry in Kolom C met die xlFillSeries ,

In beide gevalle sal jy dieselfde uitvoer kry:

Soos jy kan sien, het ons die VBA-kode suksesvol gebruik om outovul opeenvolgende nommers in Excel.

Lees meer: Excel-formules om volgordenommers in te vul Slaan versteekte rye oor

💬 Dinge om te onthou

✎ Jy kan die outovul stop inVerskeie maniere as jy dit nie wil hê nie .

✎ Jy kan nie veelvuldige rye en kolomme gelyktydig outovul nie. Doen dit een vir een.

Gevolgtrekking

Om af te sluit, ek hoop dat hierdie tutoriaal jou 'n stukkie nuttige kennis verskaf het om die formule outomaties in te vul tot op die laaste ry deur die VBA-kodes te gebruik. Ons beveel aan dat jy al hierdie instruksies leer en toepas op jou datastel. Laai die oefenwerkboek af en probeer dit self. Gee ook gerus terugvoer in die kommentaarafdeling. Jou waardevolle terugvoer hou ons gemotiveerd om tutoriale soos hierdie te skep.

Moenie vergeet om ons webwerf Exceldemy.com na te gaan vir verskeie Excel-verwante probleme en oplossings nie.

Hou aan om nuwe metodes te leer en hou aan groei!