Přečtěte si všechna čísla z požadovaného rozsahu buněk pomocí makra a přidejte číslo k obsahu
Do buněk v seznamu je často nutné přidat značku. K tomu je nutné přidat pevnou hodnotu ke všem konstantám v oblasti buněk.
Vzorce by neměly být měněny. Makro řeší tento úkol a přidá číslo podle vašeho výběru ke všem konstantám ve vyznačené datové oblasti.
Tímto způsobem můžete například rychle a efektivně přizpůsobit ceny a podobně novým podmínkám.
Následující obrázek ukazuje tabulku, kterou je třeba změnit. V buňkách B1 a B2 jsou konstanty a v buňkách B3 a B4 vzorce. Dvě buňky vzorce odkazují na buňky s konstantními hodnotami.
Chcete -li přidat číslo 10 ke všem konstantám v tomto seznamu, nejprve označte datovou oblast B1: B4 a poté zavolejte následující makro:
Přidat dílčí konstantu ()
Dim Cell jako rozsah
Dim Factor As Long
Dodatečná částka = 10
Pro každou buňku ve výběru
S buňkou
Pokud ne (.HasFormula), pak .Value = .Value + další částka
Konec s
Další buňka
End Sub
Po spuštění makra se do všech konstantních buněk ve vyznačené oblasti buněk přidá dodatečné množství 10. Následující obrázek ukazuje výsledek:
Makro používá faktor, který jste definovali v přiřazení hodnoty pro proměnnou "Dodatečná částka".
Chcete -li zadat makro, stisknutím klávesy ALT F11 v aplikaci Excel vyvolejte editor VBA. Pomocí příkazu VLOŽIT - MODUL vložte prázdný list modulu. Chcete -li spustit makro přímo z aplikace Excel, použijte kombinaci kláves ALT F8.