Zadajte vzorce do rozsahu buniek pomocou makier VBA

Anonim

Tu je návod, ako použiť makro na vyplnenie radu buniek vzorcom, ktorý si vyberiete

Skopírovaním alebo použitím funkcie Automatické dopĺňanie vám Excel ponúka mnoho možností na prenos vzorcov z bunky do oblasti buniek. Ako to však urobiť prostredníctvom makra?

To je obzvlášť užitočné, ak chcete automaticky vytvárať tabuľky alebo zoznamy pomocou makra. Tu potrebujete spôsob, ako vyplniť bunky vzorcami.

Nasledujúci obrázok zobrazuje zoznam obchodných čísel. Do stĺpca D tohto zoznamu chcete pridať súčtové funkcie, pomocou ktorých sa sčítajú hodnoty zo stĺpcov A, B a C.

Na vykonanie tejto úlohy použite makro VBA. Najprv otvorte zošit, do ktorého chcete zahrnúť makro. Potom stlačením kombinácie klávesov ALT F11 spustite editor VBA. Potom zvoľte funkciu VLOŽIŤ - MODUL. Potom zadajte nasledujúce makro:

Sub SummenPerMakro ()
Dim Cell as Range
Dim Nr As Long
Pre každú bunku v ActiveSheet.Range ("d2: d10")
Nie = bunka. Riadok
Cell.FormulaLocal = "= SUM (A" & Nr & ": C" & Nr & ")"
Ďalšia bunka
Koniec pod

Marko spracováva rozsah buniek D2: D10 v aktívnom pracovnom hárku. Bunky sa cyklicky prechádzajú bunkou po bunke. Makro používa vlastnosť FORMULALOKÁLNY na zadanie súčtového vzorca v každej z týchto buniek.

V tomto vzorci sa pridané oblasti upravia v každom riadku. V riadku 2 je to A2: C2, v riadku 3 je to A3: C3 atď.

Vzorec to robí pomocou premennej NR na dotaz na aktuálne číslo riadku v slučke pomocou vlastnosti ROW. Makro potom postupne skladá súčtový vzorec z jednotlivých textových zložiek.

Nasledujúci obrázok ukazuje výsledok po spustení makra. Na začiatku použite kombináciu klávesov ALT F8 v programe Excel a vyberte makro SUMMENPERMAKRO.

Existujú aj iné spôsoby, ako vykonať prácu prostredníctvom makra. Jeden z variantov je použiť makro na zadanie vzorca iba do jednej bunky a potom ho skopírovať, aby Excel mohol nezávisle upravovať odkazy.