Ko automātiskā aizpilde dara programmā Excel VBA?
Mēs esam redzējuši automātisko aizpildi darblapā, kur šūnas tiek automātiski aizpildītas, pamatojoties uz vērtībām iepriekšējās šūnās virs tā, mēs varam izmantot VBA, lai Excel paveiktu mums uzdevumu, lai to izdarītu, mēs izmantojam atlasi. Automātiskā aizpildīšana un mēs piedāvājam ti, līdz kuram šūnām vērtības jāaizpilda.
Vislabāk VBA automātisko aizpildīšanu izmanto tad, kad mums ir jāaizpilda pirmās šūnas formula līdz kolonnas šūnai. Parasti mēs izmantojam formulu pirmajā šūnā. Vai nu mēs kopējam un ielīmējam pēdējo šūnu, vai arī mēs vienkārši automātiski aizpildām, veicot dubultklikšķi uz mazā bultiņas taustiņa. Vēl viens labākais piemērs automātiskās aizpildes izmantošanai programmā Excel ir tas, kad mums jāievieto sērijas numuri. Mēs parasti ierakstām pirmos trīs ciparus; pēc tam mēs velkamies uz leju līdz vajadzīgajai pēdējai šūnai.
VBA mēs varam izpildīt AutoFill metodes uzdevumu. Šajā rakstā mēs parādīsim, kā mēs varam izmantot automātiskās aizpildīšanas metodi un koda rakstīšanas veidus. Tagad mēs redzēsim, kā mēs varam izmantot šo rīku VBA kodēšanā.

Kā izmantot automātisko aizpildi VBA?
Lai izmantotu automātisko aizpildīšanu VBA, mums ir jāsaprot automātiskās aizpildīšanas metodes sintakse. Zemāk ir automātiskās aizpildes sintakse.

- Diapazons (“A1”): kādas ir šūnas, lai identificētu aizpildīšanas sērijas modeli.
- Galamērķis: aizpildiet šūnu, kurā vēlaties turpināt aizpildīšanas sērijas modeli. Šeit mums jāpiemin viss šūnu diapazons.
- Ierakstiet kā xlAutoFillType: Šeit mēs varam izvēlēties sērijas aizpildīšanas veidu. Tālāk ir sniegts šī parametra vienumu saraksts - xlFillCopy, xlFillDays, xlFillDefault, xlFillFormats, xlFillMonths, xlFillSeries, xlFillValues, xlFillWeekdays, xlFillYears, xlFlashFill, xlGrowinearTrend.
Automātiskās aizpildes piemēri programmā Excel VBA
Apskatīsim dažus vienkāršus un uzlabotus VBA automātiskās aizpildes piemērus programmā Excel.
1. piemērs - xlFillDefault
Vispirms pirmajās trīs šūnās ievadiet 3 sērijas numurus.

VBA apakškārtā kā diapazonu miniet VBA diapazonu (“A1: A3”)
Kods:
Automātiskās aizpildes_piemērs1 () apakšdaļa ("A1: A3"). Beigu apakšnodaļa![]()
Tagad piekļūstiet automātiskās aizpildes metodei.

Ievadiet galamērķi kā diapazonu (“A1: A10”)
Kods:
Diapazons ("A1: A3"). Automātiskās aizpildīšanas galamērķis: = Diapazons ("A1: A10")
Atlasiet Tips kā xlFillDefault .
Kods:
Diapazons ("A1: A3"). Automātiskās aizpildes galamērķis: = Diapazons ("A1: A10"), Tips: = xlFillDefault
Tagad palaidiet kodu, mēs saņemsim sērijas numurus no 1 līdz 10.

Tā kā mēs pieminējām galamērķa šūnu kā A10, tā tur ir apstājusies, un mēs varam ievadīt mērķa šūnu kā pēdējo Excel šūnu.
2. piemērs - xlFillCopy
Tiem pašiem numuriem mēs izmantosim veidu kā xlFillCopy.
Kods:
Automātiskās aizpildes_piemērs1 () diapazons ("A1: A3"). Automātiskās aizpildes galamērķis: = diapazons ("A1: A10"), tips: = xlFillCopy End Sub

Man ir kopija no pirmajām trim šūnām uz atlikušajām šūnām.

3. piemērs - xlFillMonths
Šajā piemērā pirmos trīs mēnešus esmu ievadījis pirmajās 3 šūnās.

Mainiet automātiskās aizpildes veidu uz xlFillMonths.
Kods:
Automātiskās aizpildes_piemērs1 () diapazons ("A1: A3"). Automātiskās aizpildes galamērķis: = diapazons ("A1: A10"), tips: = xlFillMonths End Sub![]()
Tas aizpildīs mēneša sēriju.

4. piemērs - xlFillFormats
Šajā piemērā es esmu ievadījis skaitļus un lietojis formatējumu šīm šūnām.

Tagad es mainīšu veidu uz xlFillFormats.
Kods:
Automātiskās aizpildes_piemērs1 () diapazons ("A1: A3"). Automātiskās aizpildes galamērķis: = diapazons ("A1: A10"), tips: = xlFillFormats End Sub![]()
Palaidiet šo kodu un uzziniet, kas notiek.

Tas ir aizpildījis pirmo trīs šūnu formātus nākamajām trim šūnām un atkal nākamajām trim šūnām utt.
5. piemērs - xlFlashFill
Šajā piemērā esmu ievadījis dažas vērtības no šūnas A1 līdz A10, kā parādīts zemāk esošajā attēlā.

No šī saraksta es vēlos iegūt skaitlisko daļu. Lai pastāstītu Excel par modeli, pirmajā šūnā es manuāli ievadīšu pirmās šūnas skaitlisko daļu.

Tagad es uzrakstīšu kodu kā parasti un mainīšu veidu uz xlFlashFill. Šoreiz mēs izmantosim B kolonnu diapazonu.
Kods:
Automātiskās aizpildes_piemērs1 () diapazons ("B1"). Automātiskās aizpildes galamērķis: = diapazons ("B1: B10"), tips: = xlFlashFill beigu apakšdaļa![]()
Ja es palaidīšu šo kodu, mēs iegūsim tādu rezultātu kā zemāk.

Šis ir VBA automātiskās aizpildes metodes pārskats. Es ceru, ka jums tas ir paticis.
Šo VBA automātiskās aizpildīšanas Excel veidni varat lejupielādēt šeit - VBA automātiskās aizpildīšanas Excel veidne