Naudodami makrokomandą perskaitykite visus norimo langelių diapazono skaičius ir pridėkite skaičių prie turinio
Dažnai sąrašo langeliuose reikia pridėti ženklą. Norėdami tai padaryti, būtina pridėti pastovią reikšmę visoms ląstelių diapazono konstantoms.
Formulės neturėtų būti keičiamos. Makrokomanda išsprendžia šią užduotį ir prideda pasirinktą skaičių prie visų konstantų pažymėtoje duomenų srityje.
Tokiu būdu galite, pavyzdžiui, greitai ir efektyviai pritaikyti kainas ir panašiai prie naujų sąlygų.
Toliau pateiktame paveikslėlyje parodyta lentelė, kurią reikia pakeisti. B1 ir B2 ląstelėse yra konstantos, o ląstelėse B3 ir B4 - formulės. Dvi formulės ląstelės nurodo ląsteles su pastoviomis reikšmėmis.
Norėdami prie visų šio sąrašo konstantų pridėti skaičių 10, pirmiausia pažymėkite duomenų sritį B1: B4, tada iškvieskite šią makrokomandą:
Pridėti antrinę konstantą ()
„Dim Cell“ kaip diapazonas
„Dim Factor As Long“
Papildoma suma = 10
Už kiekvieną pasirinktą langelį
Su ląstelėmis
Jei ne (.HasFormula) Tada .Value = .Vertė + papildoma suma
Pabaiga su
Kitas langelis
Pabaiga Sub
Pradėjus makrokomandą, papildoma suma 10 pridedama prie visų pastovių langelių pažymėtoje langelio srityje. Toliau pateiktame paveikslėlyje parodytas rezultatas:
Makrokomanda naudoja koeficientą, kurį apibrėžėte kintamojo „Papildoma suma“ vertės priskyrimo metu.
Norėdami įvesti makrokomandą, „Excel“ paspauskite ALT F11, kad atidarytumėte VBA redaktorių. Norėdami įterpti tuščią modulio lapą, naudokite komandą INSERT - MODULE. Norėdami paleisti makrokomandą tiesiai iš „Excel“, naudokite klavišų kombinaciją ALT F8.
