Ето как да използвате макрос, за да попълните диапазон от клетки с формула по ваш избор
Чрез копиране или използване на функцията за автоматично попълване Excel ви предлага много възможности за прехвърляне на формули от клетка в диапазон от клетки. Но как да направите това чрез макрос?
Това е особено полезно, ако искате да създавате таблици или списъци автоматично с помощта на макрос. Тук имате нужда от начин за попълване на клетките с формули.
Следващата фигура показва списък с бизнес номера. Искате да добавите функции за суми в колона D на този списък, с които се добавят стойностите от колони A, B и C.
Използвайте VBA макрос, за да свършите тази работа. Първо отворете работната книга, в която искате да включите макроса. След това натиснете клавишната комбинация ALT F11, за да стартирате редактора на VBA. След това изберете функцията INSERT - MODULE. След това въведете следния макрос:
Sub SummenPerMakro ()
Dim Cell As Range
Dim Nr As Long
За всяка клетка в ActiveSheet.Range ("d2: d10")
No = Cell.Row
Cell.FormulaLocal = "= SUM (A" & Nr & ": C" & Nr & ")"
Следващата клетка
End Sub
Marko обработва клетъчния диапазон D2: D10 в активния работен лист. Клетките се пренасят през клетка по клетка. Макросът използва свойството FORMULALOCAL, за да въведе формула за сума във всяка от тези клетки.
В тази формула добавените области се коригират във всеки ред. В ред 2 е A2: C2, в ред 3 е A3: C3 и т.н.
Формулата прави това, като използва променливата NR за запитване към текущия номер на ред в цикъла, използвайки свойството ROW. След това макросът постепенно съставя формулата за сумата от отделните текстови компоненти.
Следващата фигура показва резултата след стартиране на макроса. За да започнете, използвайте комбинацията от клавиши ALT F8 в Excel и изберете макроса SUMMENPERMAKRO.
Има и други начини да свършите работата чрез макрос. Един вариант е да използвате макроса, за да въведете формулата само в една клетка и след това да я копирате, така че Excel да може да коригира препратките независимо.
