Acesta este modul în care atașați un factor fiecărei formule
Dacă modificați datele din tabelele dvs. la nivel global, puteți face creșteri sau scăderi de preț sau alte ajustări de calcul la viteza fulgerului.
Puteți adăuga un factor la toate formulele din listele dvs. O macro rezolvă această sarcină și atașează un factor de multiplicare tuturor formulelor dintr-o zonă de date selectată. În acest fel, puteți adapta rapid și eficient listele de prețuri și altele asemenea la noile condiții.
Următoarea figură arată un astfel de tabel. Există constante în celulele B1: B3 și o formulă în celula B4. Celula formulă se referă la celulele cu constante.
Pentru a adăuga factorul 110% la toate formulele din această listă, marcați mai întâi zona de date B1: A4 și apoi apelați următoarea macro:
Sub factorAnFormelnAnhaengen ()
Dim Cell As Range
Dim factor As String
Factor = "110%"
Pentru fiecare celulă selectată
Cu celulă
Dacă .HasFormula Atunci .Formula = _
"= (" & Right $ (. Formula, Len (.Formula) - 1) & ") *" & factor
Se termina cu
Următoarea celulă
Sfârșitul Sub
După pornirea macro-ului, toate celulele de formulă din zona de celule marcate sunt înmulțite cu un factor de 110%. Următoarea figură arată rezultatul
Macrocomanda introduce factorul pe care l-ați specificat în atribuirea valorii pentru variabilă factor au definit. Expresia „110%” este stocată acolo ca text. Acest lucru duce la o creștere a rezultatelor formulei cu 10%. Schimbați acest număr pentru un alt factor. Folosind factori sub 1, puteți face și diviziuni.
În DacăLinia macro-ului, textul formulelor existente este plasat între paranteze și apoi se adaugă un factor de multiplicare după acesta.
Desigur, puteți utiliza și macro-ul pentru toate celulele dintr-un tabel. Pentru a face acest lucru, selectați toate celulele tabelului utilizând combinația de taste CTRL A înainte de a apela macrocomanda.
