Sådan bruges en makro til at udfylde en række celler med en formel efter eget valg
Ved at kopiere eller bruge funktionen Autofyld giver Excel dig mange muligheder for at overføre formler fra en celle til et celleområde. Men hvordan gør du det gennem en makro?
Dette er især nyttigt, hvis du vil oprette tabeller eller lister automatisk ved hjælp af en makro. Her har du brug for en måde at fylde celler med formler på.
Følgende figur viser en liste over virksomhedsnumre. Du vil tilføje sumfunktioner i kolonne D på denne liste, hvormed værdierne fra kolonner A, B og C tilføjes.
Brug en VBA -makro til at udføre dette job. Åbn først den projektmappe, hvor du vil inkludere makroen. Tryk derefter på tastekombinationen ALT F11 for at starte VBA -editoren. Vælg derefter funktionen INSERT - MODULE. Indtast derefter følgende makro:
Sub SummenPerMakro ()
Dim celle som rækkevidde
Dim Nr As Long
For hver celle i ActiveSheet.Range ("d2: d10")
Nej = Cell.Række
Cell.FormulaLocal = "= SUM (A" & Nr & ": C" & Nr & ")"
Næste celle
Afslut Sub
Markoen behandler celleområdet D2: D10 i det aktive regneark. Cellerne sløjfes gennem celle for celle. Makroen bruger egenskaben FORMULALOKAL til at indtaste en sumformel i hver af disse celler.
I denne formel justeres de områder, der tilføjes, i hver linje. I linje 2 er det A2: C2, i linje 3 er det A3: C3 osv.
Formlen gør dette ved at bruge variablen NR til at forespørge på det aktuelle linjenummer inden for sløjfen ved hjælp af egenskaben ROW. Makroen danner derefter gradvist sumformlen fra de enkelte tekstkomponenter.
Følgende figur viser resultatet efter makroen er startet. For at starte skal du bruge tastekombinationen ALT F8 i Excel og vælge makroen SUMMENPERMAKRO.
Der er også andre måder at udføre jobbet på via en makro. En variant er at bruge makroen til at indtaste formlen i kun en celle og derefter kopiere den, så Excel kan justere referencerne uafhængigt.
