VBA automaatne täitmine (juhised sammhaaval) - Näited automaatse täitmise kasutamiseks Exceli VBA-s

Lang L: none (table-of-contents)

Mida teeb automaatne täitmine Exceli VBA-s?

Oleme näinud töölehel automaatset täitmist, kus lahtrid täidetakse automaatselt selle kohal olevate eelmiste lahtrite väärtuste põhjal, saame kasutada VBA-d, nii et excel teeb meie jaoks ülesande, selleks kasutame valikut. Automaatne täitmine ja pakume sihtkoht, st milliste lahtriteni tuleb väärtused täita.

Parim VBA automaatse täitmise võimalus on siis, kui peame täitma esimese lahtri valemi veeru lahtrisse. Valemit rakendame tavaliselt esimeses lahtris. Kas kopeerime ja kleepime viimasesse lahtrisse või lihtsalt täidame topeltklõpsuga väikesel nooleklahvil. Teine parim näide automaatse täitmise kasutamisest Excelis on see, kui peame sisestama seerianumbrid. Tavaliselt sisestame kolm esimest numbrit; seejärel lohistame vajaliku viimase lahtrini.

VBA-s saame täita automaatse täitmise meetodi ülesannet. Selles artiklis näitame teile, kuidas saame kasutada automaatse täitmise meetodit ja koodi kirjutamise viise. Nüüd näeme, kuidas saame seda tööriista VBA kodeerimisel kasutada.

Kuidas kasutada VBA-s automaatset täitmist?

Automaatse täitmise kasutamiseks VBA-s peame mõistma automaatse täitmise meetodi süntaksit. Allpool on automaatse täitmise süntaks.

  • Vahemik (“A1”): millised on lahtrid täiteseeria mustri tuvastamiseks.
  • Sihtkoht: kuni lahtrini soovite täiteseeria mustrit jätkata. Siinkohal peame mainima kõiki rakke.
  • Tippige kui xlAutoFillType: Siin saame valida seeria täitmise tüübi. Allpool on loetelu selle parameetri üksustest - xlFillCopy, xlFillDays, xlFillDefault, xlFillFormats, xlFillMonths, xlFillSeries, xlFillValues, xlFillWeekdays, xlFillYears, xlFlashFill, xlGrowinearTr

Automaatse täitmise näited Exceli VBA-s

Vaatame Excelis mõningaid lihtsaid ja täpsemaid näiteid VBA automaatse täitmise kohta.

Näide # 1 - xlFillDefault

Esmalt sisestage kolme seerianumbrit esimesse kolme lahtrisse.

Mainige VBA alamprotseduuris VBA vahemikku vahemikuna (“A1: A3”)

Kood:

Alamautomaatne täitmine_näide1 () vahemik ("A1: A3"). Lõpeta alam

Nüüd pöörduge automaatse täitmise meetodi poole.

Sisestage sihtkohaks vahemik („A1: A10”)

Kood:

Vahemik ("A1: A3"). Automaatse täitmise sihtkoht: = Vahemik ("A1: A10")

Valige tüüp xlFillDefault .

Kood:

Vahemik ("A1: A3"). Automaatse täitmise sihtkoht: = Vahemik ("A1: A10"), tüüp: = xlFillDefault

Nüüd käivitage kood, saame seerianumbrid 1 kuni 10.

Kuna me mainisime lõppsihtmärgi lahtrit kui A10, siis see on seal peatunud ja saame Exceli viimase lahtrina sisestada sihtkoha lahtri.

Näide # 2 - xlFillCopy

Samade numbrite puhul kasutame tüüpi xlFillCopy.

Kood:

Alamautomaatne täitmine_näide1 () vahemik ("A1: A3"). Automaatse täitmise sihtkoht: = vahemik ("A1: A10"), tüüp: = xlFillCopy End Sub

Mul on koopia esimesest kolmest lahtrist ülejäänud lahtritesse.

Näide # 3 - xlFillMonths

Selle näite jaoks olen sisestanud esimesed kolm kuud esimesse 3 lahtrisse.

Muutke automaatse täitmise tüübiks xlFillMonths.

Kood:

Alamautomaatne täitmine_näide1 () vahemik ("A1: A3"). Automaatse täitmise sihtkoht: = vahemik ("A1: A10"), tüüp: = xlFillMonths End Sub

See täidab kuuseeria.

Näide # 4 - xlFillFormats

Selle näite jaoks olen sisestanud arvud ja rakendanud nendele lahtritele vormingu.

Nüüd muudan tüübi xlFillFormatsiks.

Kood:

Alamautomaatne täitmine_näide1 () vahemik ("A1: A3"). Automaatse täitmise sihtkoht: = vahemik ("A1: A10"), tüüp: = xlFillFormats End Sub

Käivitage see kood ja vaadake, mis juhtub.

See on täitnud kolme esimese lahtri vormingud järgmisele kolmele lahtrile ja jälle järgmisele kolmele lahtrile ja nii edasi.

Näide # 5 - xlFlashFill

Selle näite jaoks olen sisestanud mõned väärtused lahtrist A1 kuni A10, nagu on näidatud alloleval pildil.

Sellest loendist tahan välja tuua arvulise osa. Et mustrist excelist rääkida, sisestan esimesse lahtrisse käsitsi esimese lahtri arvulise osa.

Nüüd kirjutan koodi nagu tavaliselt ja muudan tüübi xlFlashFill. Seekord kasutame veeru B vahemikku.

Kood:

Alamautomaatne täitmine_näide1 () Vahemik ("B1"). Automaatse täitmise sihtkoht: = Vahemik ("B1: B10"), tüüp: = xlFlashFill Lõpp alam

Kui ma selle koodi käivitan, saame tulemuse nagu allpool.

See on ülevaade VBA automaatse täitmise meetodist. Loodan, et teile on see meeldinud.

Selle VBA automaatse täitmise Exceli malli saate alla laadida siit - VBA automaatse täitmise Exceli mall

Huvitavad Artiklid...