Ako neko vrijeme radite s Microsoft Excelom, znate koliko je automatsko popunjavanje. Da bismo kopirali formulu preko reda ili kolone, koristimo ovu metodu. Sada ovo možemo koristiti ručno pomoću miša. Ali, ako imate veliki red sa podacima, biće teško kopirati bilo koju formulu u zadnji red ili kolonu. Možete koristiti VBA kod za automatsko popunjavanje formule do posljednjeg reda ili stupca s lakoćom.

U ovom vodiču naučit ćete da automatski popunite formulu do posljednjeg reda u Excelu koristeći VBA kodove. Ovaj vodič će biti na pravom mjestu s odgovarajućim primjerima i odgovarajućim ilustracijama. Dakle, ostanite s nama.

Preuzmite Vježbenicu

Automatsko popunjavanje formule do posljednjeg reda.xlsm

Šta je automatsko popunjavanje Excel?

Sada je automatsko popunjavanje ugrađena funkcija Microsoft Excel-a koja omogućava korisnicima da automatski popune ostale redove ili stupce vrijednostima, formatima ili formulama. Možete ga prepoznati kada postavite kursor u desni donji ugao bilo koje ćelije. Mi to zovemo automatskim popunjavanjem u Excel-u.

Pogledajte sljedeći snimak ekrana:

Ovdje možete vidjeti dva broja. Ostale redove ćemo popuniti pomoću automatskog popunjavanja u Excel-u.

Prvo, odaberite raspon ćelija B5:B6. Nakon toga, vidjet ćete ručicu za automatsko popunjavanje u desnom donjem kutu.

Sada povucite ovu ručicu automatskog popunjavanja prema dolje.

Kao što vidite, Excel je automatski popunioostatak ćelija. Ovo je osnovna upotreba automatskog popunjavanja u Excelu.

Kako koristiti automatsko popunjavanje s Excel VBA

Ako imate veliki broj redaka ili stupaca u datom rasponu, morate povući prema dolje ručicu za automatsko popunjavanje do posljednjeg reda ili stupca. To je veoma naporan proces. Srećom, možete ga minimizirati pomoću VBA kodova u Excelu. Možete koristiti VBA kod za automatsko popunjavanje ćelija vrijednostima, formulama ili formatima.

Generička sintaksa:

Raspon .AutoFill Destination, Type

Ovdje,

Raspon(“B5”): Ćelija koja ima glavni uzorak za popunjavanje ostatka serije.

Odredište: Opseg ćelija u koje želite da popunite nizom uzoraka.

Upišite kao xlAutoFillType: Vrsta punjenja serije. Postoje različite vrste automatskog popunjavanja koje možete izabrati.

Pročitajte više: Kako koristiti VBA automatsko popunjavanje u Excelu

4 vrste automatskog popunjavanja u Excelu VBA

U ovom odeljku govoriću o nekim tipovima automatskog popunjavanja. Već smo vidjeli da možemo odabrati bilo koju vrstu automatskog popunjavanja pomoću xlAutoFillType. Evo, pokazujem vam neke primjere toga.

1. xlFillDefault

Ovu vrstu automatskog popunjavanja smo već vidjeli u prethodnom primjeru.

Pogledajte snimak ekrana:

Unesite sljedeći VBA kod da automatski popunite ostale ćelije:

6454

Sada pokrenite VBA makro i nakon toga ćete vidjetisljedeće:

Automatski popunjava preostale ćelije koristeći VBA makro.

2. xlFillCopy

Za kopiranje istih vrijednosti možete koristiti tip xlFillCopy u tipu automatskog popunjavanja.

Pogledajte snimak ekrana:

Upišite sljedeći VBA kod da biste automatski popunili ostale ćelije:

4170

Sada pokrenite VBA makro i nakon toga ćete vidjeti sljedeće:

Excel ispunjava ostale ćelije istim uzorkom vrijednosti.

3. xlFillMonths

Možete popuniti i mjesece koristeći tip automatskog popunjavanja xlFillMonths .

Pogledajte snimak ekrana:

Ovdje smo unijeli dva mjeseca januar i februar.

Upišite sljedeći VBA kod da biste automatski popunili ostale ćelije:

8806

Sada pokrenite VBA makro i poslije tada ćete vidjeti sljedeće:

Excel automatski razumije obrasce i ispunjava ih njima.

4. xlFillFormats

Možete i kopirati formate u druge ćelije koristeći VBA automatsko popunjavanje. Za to morate koristiti tip automatskog popunjavanja xlFillFormats .

Pogledajte snimak ekrana:

Evo, imamo ispunio dvije ćelije nekim bojama.

Sada upišite sljedeći VBA kod da automatski popunite ostale ćelije:

5961

Sada pokrenite VBA makro i nakon toga ćete vidjeti sljedeće:

Kao što vidite, naš VBA makro koristi automatsko popunjavanje zaefektivno ispunite redove kolone B.

Pročitajte više: Kako automatski popuniti mjesece u Excelu

5 primjera sa formulom automatskog popunjavanja do posljednjeg reda u Excel VBA

1. VBA za automatsko popunjavanje formule u zadnji korišćeni red

Slično, možete automatski popunjavati formulu koristeći VBA. ako ste pročitali prethodne odeljke, ovo možete lako izvesti. Problem nastaje kada morate automatski popuniti formulu do posljednjeg reda. Prvo morate identificirati zadnji korišteni red. Nakon toga, VBA kod će ih automatski popuniti.

Pogledajte sljedeći skup podataka:

Ovdje imamo skup podataka o prodaji nekih prodavača . Naš cilj je da u kolonu Ukupno dodamo prodaju za januar i februar. Nakon toga ćemo koristiti metodu automatskog popunjavanja koristeći VBA do posljednjeg korišćenog reda u Excel-u.

Da biste ovo izvršili, upišite sljedeći kod:

4594

last_row = Cells(Rows.Count, 2).End(xlUp).Row: Vraća zadnji korišteni red iz kolone B. Možete odabrati bilo koju kolonu iz vašeg skupa podataka.

Raspon(“E5”).Formula = “=SUM(C5:D5)”: Dodajemo prodaju ćelije C5 i D5.

Range(“E5”).AutoFill Destination:=Range(“E5:E” & last_row): Nakon što dobijemo rezultat, koristimo automatsko popunjavanje. Počinje automatsko popunjavanje od Ćelije E5 do posljednjeg korištenog reda koji smo prethodno dobili.

Sada pokrenite VBA makro. Nakon toga, vidjet ćete sljedeći izlaz:

Kaomožete vidjeti, naš VBA kod dodaje prvi rezultat i automatski popunjava formulu u posljednji red u Excel-u.

Pročitajte više: Kako popuniti do posljednjeg reda podacima u Excel

2. VBA automatsko popunjavanje od ActiveCell do posljednjeg reda

Sada, ako ne želite koristiti određeni raspon u metodi automatskog popunjavanja, možete koristiti vrijednosti aktivne ćelije , formule ili formate. Kada kliknete na ćeliju i želite automatski popuniti ostale redove formulom aktivne ćelije, koristite ovu metodu.

Ona je slična prethodnom primjeru. Koristimo prethodni skup podataka:

Sada ćemo dodati prodaju za januar i februar i automatski popuniti formulu u zadnji red koristeći Excel VBA.

Sada upišite sljedeći kod:

5297

zadnji_red = Ćelije(Rows.Count, 2).End(xlUp).Row: Vraća zadnji korišteni red iz kolone B. Možete odabrati bilo koju kolonu iz vašeg skupa podataka.

ActiveCell.Formula = “=SUM(C5:D5)”: Dodajemo prodaju Cell C5 i D5 u vašoj odabranoj ćeliji.

ActiveCell.AutoFill Destination:=Range(ActiveCell.Address & “:E” & last_row): Nakon što dobijemo rezultat, koristimo autofill. Počinje automatsko popunjavanje od aktivne ćelije do posljednjeg korištenog reda koji smo prethodno dobili.

Sada odaberite Ćelija E5 .

Nakon toga, pokrenite VBA makro da dodate formulu i automatsko popunjavanje u zadnji red.

Kao što vidite, miuspješno koristio VBA makro za automatsko popunjavanje formule do posljednjeg reda.

Slična očitanja

• Kako ponoviti redove određeni broj puta u Excel (4 načina)
• Automatski broj redova u Excelu (8 metoda)
• Kako popuniti stupac u Excelu istom vrijednošću (9 trikova) )
• Primijenite prečicu za automatsko popunjavanje u Excelu (7 metoda)

3. Automatsko popunjavanje do posljednjeg reda koristeći dinamički raspon s Excel VBA

Ranije smo vam pokazali neke VBA makroe za automatsko popunjavanje do posljednjeg reda u Excel-u. Sada, u tim primjerima, već smo koristili dinamičke raspone.

Da biste razumjeli statičke raspone, pogledajte sljedeći kod:

3301

U osnovi smo rekli Excelu da unese formulu u Ćelija E5 i automatski je ispunite od ćelije E5 u ćelije E11 . Ovdje smo specificirali raspon. Šta ako dodate još redova? U tom slučaju, naš VBA neće automatski popuniti te dodatne redove jer smo mu već rekli da automatski popuni određeni raspon.

Da riješim ovaj problem, došao sam do rješenja koje može uzeti dinamički raspon:

9782

Kao što vidite, prvi red nalazimo po ovom redu koda:

1748

Nakon toga, automatski popunjavamo zadnji red koristeći dinamički raspon:

2502

Ne bez obzira koliko redova dodate svom skupu podataka, ovaj VBA kod će biti uspješan da ih identifikuje. I automatski će ih ispuniti formulom.

Dinamički raspon u osnovi znači da ne morate unositi rasponručno. Excel će ga ažurirati s vremena na vrijeme.

Pročitajte više: Excel VBA: Autofill Method of Range Class Failed

4. AutoFill to Last Kolona u Excelu pomoću VBA

Ako ste pročitali prethodne odjeljke za automatsko popunjavanje do posljednjeg reda, onda možete lako automatski popuniti zadnji stupac. Morate samo pronaći zadnji broj kolone i automatski ga popuniti pomoću Excel VBA.

Pogledajte sljedeći skup podataka:

Ovdje imamo skup podataka koji predstavlja tromjesečni budžet osobe. Sada ćemo dodati troškove svih mjeseci i automatski popuniti formulu u posljednju kolonu koristeći Excel VBA.

Sada upišite sljedeći kod:

5159

last_column = Cells(6, Columns.Count).End(xlToLeft).Column: Vraća posljednju korišćenu kolonu iz reda 6. Možete odabrati bilo koji red za početak od vašeg skupa podataka.

Raspon(“D9”).Formula = “=SUM(D6:D8)”: Dodajemo troškove tri mjeseca (januar, februar mart).

Range(“D9”).AutoFill Destination:=Range(“D9”, Cells(9, last_column)): Nakon što dobijemo rezultat, koristimo automatsko popunjavanje. Ovdje je naš glavni red Red broj 9. Svi naši podaci će biti u ovom redu. Počinje automatsko popunjavanje od stupca D do posljednje korištene kolone koju smo prethodno dobili pomoću last_column .

Nakon pokretanja makronaredbe, vidjet ćete sljedeći izlaz :

Kao što vidite, uspješno smo koristili VBA za automatsko popunjavanjeformule do posljednje kolone u Excelu.

Pročitajte više: Kako automatski popuniti kolonu u Excelu

5. Automatsko popunjavanje sekvencijalnih brojeva do posljednjeg reda u Excelu pomoću VBA

Možete i automatski popunjavati sekvencijalne brojeve pomoću automatskog popunjavanja u VBA. Ovdje morate koristiti xlFillSeries u tipu automatskog popunjavanja. Excel će razumjeti obrazac i ispuniti ih njime.

Pogledajte sljedeći snimak ekrana:

Ovdje imamo neka imena. I želimo da im damo identifikaciju na sekvencijalni način. Da bismo to uradili, koristićemo VBA autofill.

Automatsko popunjavanje sekvencijalnih brojeva sa statičkim opsegom:

3530

Nakon pokretanja koda, videćete izlaz:

Ako želite koristiti dinamički raspon, tada koristite sljedeći kod:

5499

zadnji_red = Ćelije(Redovi. Count, 2).End(xlUp).Row: Vraća zadnji korišteni red iz stupca B.

Range(“C5”).AutoFill Destination:=Range(“C5 :C” & last_row), Type:=xlFillSeries: To će uzeti ID Cell C5 i automatski ispuniti zadnji korišteni red u koloni C koristeći xlFillSeries ,

U oba slučaja, dobićete isti izlaz:

Kao što vidite, uspešno smo koristili VBA kod za automatsko popunjavanje sekvencijalnih brojeva u Excelu.

Pročitajte više: Excel formule za popunjavanje niza brojeva Preskoči skrivene redove

💬 Stvari koje treba zapamtiti

✎ Možete zaustaviti automatsko popunjavanje Različiti načini ako to ne želite .

✎ Ne možete automatski popunjavati više redova i kolona istovremeno. Uradite to jedan po jedan.

Zaključak

Da zaključimo, nadam se da vam je ovaj vodič pružio dio korisnog znanja za automatsko popunjavanje formule do posljednjeg reda koristeći VBA kodove. Preporučujemo da naučite i primijenite sve ove upute na svoj skup podataka. Preuzmite radnu svesku i isprobajte ih sami. Također, slobodno dajte povratne informacije u odjeljku za komentare. Vaše vrijedne povratne informacije nas motiviraju za kreiranje ovakvih tutorijala.

Ne zaboravite provjeriti našu web stranicu Exceldemy.com za različite probleme i rješenja u vezi s Excelom.

Nastavite da učite nove metode i nastavite da rastete!