Z makrom preberite vse številke iz želenega obsega celic in vsebini dodajte številko
Pogosto je treba celicam na seznamu dodati oznako. Če želite to narediti, morate vsem konstantam v obsegu celic dodati fiksno vrednost.
Formule se ne sme spreminjati. Makro reši to nalogo in vsem konstantam v označenem podatkovnem območju doda številko po vaši izbiri.
Na ta način lahko na primer hitro in učinkovito prilagodite cene in podobno novim pogojem.
Naslednja slika prikazuje tabelo, ki jo je treba spremeniti. V celicah B1 in B2 so konstante, v celicah B3 in B4 pa formule. Dve formuli se nanašata na celice s konstantnimi vrednostmi.
Če želite številki 10 dodati vse konstante na tem seznamu, najprej označite podatkovno področje B1: B4 in nato pokličite naslednji makro:
Dodaj pod konstanto ()
Dim Cell As Range
Faktor zatemnitve tako dolgo
Dodatni znesek = 10
Za vsako izbrano celico
S celico
Če ne (.HasFormula) Potem je .Vrednost = .Vrednost + dodaten znesek
Končaj s
Naslednja celica
End Sub
Po zagonu makra se dodatna količina 10 doda vsem konstantnim celicam na označenem območju celic. Naslednja slika prikazuje rezultat:
Makro uporablja faktor, ki ste ga določili v dodelitvi vrednosti za spremenljivko "Dodatni znesek".
Če želite vnesti makro, pritisnite ALT F11 v Excelu, da odprete urejevalnik VBA. Z ukazom INSERT - MODULE vstavite prazen list modula. Za zagon makra neposredno iz Excela uporabite kombinacijo tipk ALT F8.
