Evo kako pomoću makronaredbe ispuniti raspon ćelija formulom po vašem izboru
Kopiranjem ili upotrebom funkcije automatskog popunjavanja Excel vam nudi mnoge mogućnosti za prijenos formula iz ćelije u raspon ćelija. Ali kako to učiniti putem makronaredbe?
To je osobito korisno ako želite stvoriti tablice ili popise automatski pomoću makronaredbe. Ovdje vam je potreban način popunjavanja ćelija formulama.
Sljedeća slika prikazuje popis poslovnih brojeva. Želite dodati zbrojne funkcije u stupac D ovog popisa kojima se dodaju vrijednosti iz stupaca A, B i C.
Za ovaj posao upotrijebite VBA makronaredbu. Prvo otvorite radnu knjigu u koju želite uključiti makronaredbu. Zatim pritisnite kombinaciju tipki ALT F11 za pokretanje VBA uređivača. Zatim odaberite funkciju UMETI - MODUL. Zatim unesite sljedeću makro:
Sub SummenPerMakro ()
Dim Cell As Range
Dim Nr As Long
Za svaku ćeliju u ActiveSheet.Range ("d2: d10")
Ne = Ćelija.Red
Cell.FormulaLocal = "= SUM (A" & Nr & ": C" & Nr & ")"
Sljedeća ćelija
Kraj podm
Marko obrađuje raspon ćelija D2: D10 na aktivnom radnom listu. Stanice se provlače kroz ćeliju po ćeliju. Makro koristi svojstvo FORMULALOCAL za unošenje formule zbroja u svaku od ovih ćelija.
U ovoj formuli, područja koja se dodaju prilagođena su u svakom retku. U retku 2 to je A2: C2, u retku 3 to je A3: C3 itd.
Formula to čini pomoću varijable NR za ispitivanje trenutnog broja retka unutar petlje pomoću svojstva ROW. Makro zatim postupno sastavlja formulu zbroja od pojedinačnih tekstualnih komponenti.
Sljedeća slika prikazuje rezultat nakon pokretanja makronaredbe. Za početak upotrijebite kombinaciju tipki ALT F8 u Excelu i odaberite makronaredbu SUMMENPERMAKRO.
Postoje i drugi načini obavljanja posla putem makronaredbi. Jedna je varijanta korištenje makronaredbe za unos formule u samo jednu ćeliju, a zatim je kopirajte tako da Excel može samostalno prilagoditi reference.