Samodejno izpolnjevanje VBA (vodnik po korakih) - Primeri uporabe samodejnega izpolnjevanja v Excelu VBA

Kaj naredi samodejno izpolnjevanje v Excelu VBA?

Na delovnem listu smo videli samodejno izpolnjevanje, kjer se celice samodejno napolnijo na podlagi vrednosti v prejšnjih celicah nad njim, lahko uporabimo VBA, tako da Excel opravi nalogo namesto nas, za to pa uporabimo metodo Selection.Autofill in nudimo cilj, tj. do katerih celic je treba izpolniti vrednosti.

Najbolje je uporabiti samodejno izpolnjevanje VBA, ko moramo formulo prve celice napolniti v celico stolpca. Formulo običajno uporabimo v prvi celici. Bodisi kopiramo in prilepimo v zadnjo celico bodisi samo samodejno izpolnimo z dvoklikom na puščično tipko. Drug najboljši primer uporabe samodejnega izpolnjevanja v Excelu je, ko moramo vstaviti serijske številke. Običajno vtipkamo prve tri številke; nato povlečemo navzdol do zahtevane zadnje celice.

V VBA lahko izvedemo nalogo metode samodejnega izpolnjevanja. V tem članku vam bomo pokazali, kako lahko uporabimo metodo samodejnega izpolnjevanja in načine za pisanje kode. Zdaj bomo videli, kako lahko to orodje uporabimo pri kodiranju VBA.

Kako uporabiti samodejno izpolnjevanje v VBA?

Za uporabo samodejnega izpolnjevanja v VBA moramo razumeti sintakso metode samodejnega izpolnjevanja. Spodaj je sintaksa samodejnega izpolnjevanja.

  • Obseg ("A1"): Katere celice določajo vzorec serije zapolnitve.
  • Cilj: Do katere celice želite nadaljevati vzorec polnjenja. Tu moramo omeniti celoten spekter celic.
  • Vnesite kot xlAutoFillType: Tu lahko izberemo vrsto zapolnitve serije. Spodaj je seznam elementov s tem parametrom - xlFillCopy, xlFillDays, xlFillDefault, xlFillFormats, xlFillMonths, xlFillSeries, xlFillValues, xlFillWeekdays, xlFillYears, xlFlashFill, xlGrowthTrendre xlGrowthTrendre xlGrowthTrendre.

Primeri samodejnega izpolnjevanja v Excelu VBA

Oglejmo si nekaj preprostih do naprednih primerov samodejnega izpolnjevanja VBA v Excelu.

Primer # 1 - xlFillDefault

Najprej v prve tri celice vnesite 3 serijske številke.

V podproceduri VBA navedite obseg VBA kot obseg (“A1: A3”)

Koda:

Podobmočje samodejnega izpolnjevanja_Primer1 () ("A1: A3"). Končaj pod

Zdaj odprite metodo samodejnega izpolnjevanja.

Vnesite cilj kot obseg (“A1: A10”)

Koda:

Obseg ("A1: A3"). Cilj samodejnega izpolnjevanja: = obseg ("A1: A10")

Izberite Type kot xlFillDefault .

Koda:

Obseg ("A1: A3"). Cilj samodejnega izpolnjevanja: = obseg ("A1: A10"), vrsta: = xlFillDefault

Zdaj zaženite kodo, dobili bomo serijske številke od 1 do 10.

Ker smo končno ciljno celico omenili kot A10, se je tam ustavila in v ciljno celico lahko vstopimo kot zadnja celica excela.

Primer # 2 - xlFillCopy

Za iste številke bomo uporabili vrsto kot xlFillCopy.

Koda:

Sub AutoFill_Example1 () Obseg ("A1: A3"). Cilj samodejnega izpolnjevanja: = obseg ("A1: A10"), vrsta: = xlFillCopy End Sub

Imam kopijo prvih treh celic do preostalih celic.

Primer # 3 - xlFillMonths

Za ta primer sem v prve tri mesece vstopil v prve 3 celice.

Spremenite vrsto samodejnega izpolnjevanja na xlFillMonths.

Koda:

Sub AutoFill_Example1 () Obseg ("A1: A3"). Cilj samodejnega izpolnjevanja: = obseg ("A1: A10"), vrsta: = xlFillMonths End Sub

To bo zapolnilo mesečno serijo.

Primer # 4 - xlFillFormats

V tem primeru sem vnesel številke in uporabil oblikovanje za te celice.

Zdaj bom tip spremenil v xlFillFormats.

Koda:

Sub AutoFill_Example1 () Obseg ("A1: A3"). Cilj samodejnega izpolnjevanja: = obseg ("A1: A10"), vrsta: = xlFillFormats End Sub

Zaženite to kodo in poglejte, kaj se bo zgodilo.

Zapolnil je formate prvih treh celic v naslednje tri celice in spet naslednje tri celice itd.

Primer # 5 - xlFlashFill

Za ta primer sem vnesel nekaj vrednosti od celice A1 do A10, kot je prikazano na spodnji sliki.

S tega seznama želim izvleči številčni del. Če želim Excelu povedati o vzorcu, bom v prvo celico ročno vnesel številčni del prve celice.

Zdaj bom napisal kodo kot ponavadi in jo spremenil v xlFlashFill. Tokrat bomo uporabili obseg stolpcev B.

Koda:

Sub AutoFill_Example1 () Obseg ("B1"). Cilj samodejnega izpolnjevanja: = obseg ("B1: B10"), vrsta: = xlFlashFill End Sub

Če zaženem to kodo, bomo dobili rezultat kot spodaj.

To je pregled metode samodejnega izpolnjevanja VBA. Upam, da ste uživali.

To predlogo VBA AutoFill Excel lahko prenesete od tukaj - Predloga VBA AutoFill Excel

Zanimive Članki...