Introduceți formule într-un interval de celule utilizând macrocomenzi VBA

Anonim

Iată cum puteți utiliza o macro pentru a completa o gamă de celule cu o formulă la alegere

Prin copiere sau folosind funcția de completare automată, Excel vă oferă multe opțiuni pentru transferul formulelor dintr-o celulă într-un interval de celule. Dar cum faci asta printr-un macro?

Acest lucru este deosebit de util dacă doriți să creați tabele sau liste folosind automat o macro. Aici aveți nevoie de o modalitate de a umple celulele cu formule.

Următoarea figură prezintă o listă a numerelor de afaceri. Doriți să adăugați funcții de sumă în coloana D a acestei liste cu care sunt adăugate valorile din coloanele A, B și C.

Utilizați o macrocomandă VBA pentru a face această treabă. Mai întâi deschideți registrul de lucru în care doriți să includeți macro-ul. Apoi apăsați combinația de taste ALT F11 pentru a porni editorul VBA. Apoi selectați funcția INSERT - MODUL. Apoi introduceți următoarea macro:

Sub SummenPerMakro ()
Dim Cell As Range
Dim Nr As Long
Pentru fiecare celulă din ActiveSheet.Range („d2: d10”)
Nu = Cell.Row
Cell.FormulaLocal = "= SUM (A" & Nr & ": C" & Nr & ")"
Următoarea celulă
Sfârșitul Sub

Marko procesează intervalul de celule D2: D10 în foaia de lucru activă. Celulele sunt buclate prin celulă cu celulă. Macrocomanda folosește proprietatea FORMULALOCAL pentru a introduce o formulă sumă în fiecare dintre aceste celule.

În această formulă, zonele care se adaugă sunt ajustate în fiecare linie. În linia 2 este A2: C2, în linia 3 este A3: C3 etc.

Formula face acest lucru utilizând variabila NR pentru a interoga numărul curent al liniei din buclă folosind proprietatea ROW. Macro compune apoi treptat formula de sumă din componentele individuale ale textului.

Următoarea figură arată rezultatul după pornirea macro-ului. Pentru a începe, utilizați combinația de taste ALT F8 în Excel și selectați macrocomanda SUMMENPERMAKRO.

Există și alte modalități de a face treaba și printr-o macro. O variantă este să utilizați macro-ul pentru a introduce formula într-o singură celulă și apoi să o copiați, astfel încât Excel să poată ajusta referințele independent.