VBA AutoFill (trinnvis guide) - Eksempler på bruk av autofyll i Excel VBA

Innholdsfortegnelse

Hva gjør autofyll i Excel VBA?

Vi har sett autofyll i regnearket der cellene fylles automatisk basert på verdiene i de forrige cellene over det, vi kan bruke VBA slik at excel gjør oppgaven for oss, for å gjøre dette bruker vi Selection.Autofill-metoden og vi gir destinasjon dvs. opp til hvilke celler verdiene må fylles ut.

Den beste bruken av VBA autofyll kommer når vi trenger å fylle formelen til den første cellen til cellen i kolonnen. Vi bruker vanligvis formelen i den første cellen. Enten kopierer og limer vi inn til den siste cellen, eller bare fyller vi automatisk ved å dobbeltklikke på den lille piltasten. Et annet beste eksempel på å bruke autofyll i excel er når vi trenger å sette inn serienumre. Vi skriver vanligvis de tre første tallene; deretter drar vi ned til den nødvendige siste cellen.

I VBA kan vi utføre oppgaven med AutoFill-metoden. I denne artikkelen vil vi vise deg hvordan vi kan bruke autofyllmetoden og måter å skrive koden på. Nå skal vi se hvordan vi kan bruke dette verktøyet i VBA-koding.

Hvordan bruke autofyll i VBA?

For å bruke autofyll i VBA, må vi forstå syntaksen til autofyll-metoden. Nedenfor er syntaksen til autofyllet.

  • Område (“A1”): Hva er cellene som identifiserer mønsteret i fyllserien?
  • Destinasjon: Till hvilken celle du vil fortsette fyllingsseriemønsteret. Her trenger vi å nevne hele spekteret av celler.
  • Skriv inn som xlAutoFillType: Her kan vi velge seriefyllingstype . Nedenfor er listen over elementer i denne parameteren - xlFillCopy, xlFillDays, xlFillDefault, xlFillFormats, xlFillMonths, xlFillSeries, xlFillValues, xlFillWeekdays, xlFillYears, xlFlashFill, xlGrowthTrend, xlFillYears, xlFlashFill, xlGrowthTrend,

Eksempler på autofyll i Excel VBA

La oss se noen enkle til avanserte eksempler på VBA AutoFill i Excel.

Eksempel # 1 - xlFillDefault

Først skriver du inn 3 serienumre i de tre første cellene.

I VBA-delprosedyren, nevn VBA-serien som Range (“A1: A3”)

Kode:

Sub AutoFill_Example1 () Range ("A1: A3"). Slutt Sub

Nå får du tilgang til AutoFill-metoden.

Angi destinasjonen som Område (“A1: A10”)

Kode:

Område ("A1: A3"). Autofyll destinasjon: = Område ("A1: A10")

Velg Type som xlFillDefault .

Kode:

Område ("A1: A3"). Autofyll destinasjon: = Område ("A1: A10"), Type: = xlFillDefault

Kjør nå koden vi får serienumrene fra 1 til 10.

Siden vi nevnte målmålcellen som A10, har den stoppet der, og vi kan gå inn i målcellen som den siste cellen i excel.

Eksempel # 2 - xlFillCopy

For de samme tallene vil vi bruke typen som xlFillCopy.

Kode:

Sub AutoFill_Example1 () Range ("A1: A3"). AutoFill Destination: = Range ("A1: A10"), Type: = xlFillCopy End Sub

Jeg har en kopi av de tre første cellene til de gjenværende cellene.

Eksempel # 3 - xlFillMonths

For dette eksemplet har jeg lagt inn de tre første månedene i de tre første cellene.

Endre autofylltypen til xlFillMonths.

Kode:

Sub AutoFill_Example1 () Range ("A1: A3"). AutoFill Destination: = Range ("A1: A10"), Type: = xlFillMonths End Sub

Dette vil fylle månedsserien.

Eksempel 4 - xlFillFormats

For dette eksemplet har jeg skrevet inn tall og brukt formatering på disse cellene.

Nå vil jeg endre typen til xlFillFormats.

Kode:

Sub AutoFill_Example1 () Range ("A1: A3"). AutoFill Destination: = Range ("A1: A10"), Type: = xlFillFormats End Sub

Kjør denne koden og se hva som skjer.

Den har fylt formater av de tre første cellene til de neste tre cellene, og igjen, de neste tre cellene og så videre.

Eksempel # 5 - xlFlashFill

For dette eksemplet har jeg lagt inn noen få verdier fra celle A1 til A10, som vist på bildet nedenfor.

Fra denne listen vil jeg trekke ut den numeriske delen. For å fortelle excel om mønsteret, i den første cellen, vil jeg manuelt angi den numeriske delen av den første cellen.

Nå skal jeg skrive koden som vanlig og endre typen til xlFlashFill. Denne gangen vil vi bruke B-kolonneområdet.

Kode:

Sub AutoFill_Example1 () Range ("B1"). AutoFill Destination: = Range ("B1: B10"), Type: = xlFlashFill End Sub

Hvis jeg kjører denne koden, får vi resultatet som nedenfor.

Dette er oversikten over VBA AutoFill-metoden. Jeg håper du har hatt det.

Du kan laste ned denne VBA AutoFill Excel-malen herfra - VBA AutoFill Excel-mal

Interessante artikler...