Az alábbiakban bemutatjuk, hogyan kell makróval kitölteni egy cellatartományt egy választott képlettel
Másolás vagy az Automatikus kitöltés funkció használatával az Excel számos lehetőséget kínál a képletek cellából egy cellatartományba történő átviteléhez. De hogyan lehet ezt megtenni egy makrón keresztül?
Ez különösen akkor hasznos, ha táblázatokat vagy listákat szeretne létrehozni makró használatával. Itt szüksége van arra, hogy a cellákat képletekkel töltse ki.
Az alábbi ábra az üzleti számok listáját mutatja. Összegfüggvényeket szeretne hozzáadni a lista D oszlopához, amelyekkel az A, B és C oszlop értékei hozzáadódnak.
Ehhez a feladathoz használjon VBA makrót. Először nyissa meg azt a munkafüzetet, amelybe bele szeretné foglalni a makrót. Ezután nyomja meg az ALT F11 billentyűkombinációt a VBA szerkesztő elindításához. Ezután válassza ki az INSERT - MODULE funkciót. Ezután írja be a következő makrót:
Sub SummenPerMakro ()
Dim Cell as Range
Dim Nr
Az ActiveSheet.Range minden cellájához ("d2: d10")
Nem = Cella. Sor
Cell.FormulaLocal = "= SUM (A" & Nr & ": C" & Nr & ")"
Következő cella
End Sub
A Marko feldolgozza a D2: D10 cellatartományt az aktív munkalapon. A sejteket sejtről cellára hurkolják. A makró a FORMULALOCAL tulajdonság segítségével megad egy összegképletet minden ilyen cellában.
Ebben a képletben a hozzáadott területek minden sorban módosulnak. A 2. sorban az A2: C2, a 3. sorban az A3: C3 stb.
A képlet ezt úgy teszi meg, hogy az NR változót használja a cikluson belüli aktuális sorszám lekérdezéséhez a ROW tulajdonság használatával. A makró ezután fokozatosan összeállítja az összegképletet az egyes szövegösszetevőkből.
Az alábbi ábra a makró indítása utáni eredményt mutatja. A kezdéshez használja az ALT F8 billentyűkombinációt az Excelben, és válassza ki a SUMMENPERMAKRO makrót.
Más módon is elvégezheti a munkát makrón keresztül. Az egyik változat az, hogy a makró segítségével írja be a képletet csak egy cellába, majd másolja le, hogy az Excel függetlenül módosítsa a hivatkozásokat.