V tomto článku se naučíme, jak změnit vzorec v buňkách v rozsahu na hodnoty pomocí VBA v Microsoft Excelu.
Nezpracovaná data pro tento příklad se skládají z údajů o prodeji. Údaje o prodeji obsahují informace o počtu položek prodaných zaměstnanci v různých městech. Poslední řádek a sloupec obsahuje součet vzorce pro zjištění celkového počtu položek prodaných v konkrétním městě konkrétním zaměstnancem.
Chtěli bychom převést všechny vzorce v aktivním listu na hodnoty. Abychom převedli všechny vzorce na hodnoty, vytvořili jsme makro „ChangingFormulasToValue“. Toto makro lze spustit kliknutím na tlačítko „Převést vzorce na hodnoty“.
Na snímku je vidět vzorec v buňce H18 převeden na hodnotu.
Vysvětlení kódu
Nastavit SourceRng = rozsah ("A1", rozsah ("A1"). SpecialCells (xlCellTypeLastCell))
Výše uvedený kód se používá k přiřazení všech buněk počínaje buňkou A1 k poslední buňce v sešitu jako rozsahu.
SourceRng.Value = SourceRng.Value
Výše uvedený kód se používá k přiřazení hodnoty buňky přeskočení vzorce
Pro kód prosím postupujte níže
Možnost Explicitní Sub ChangingFormulasToValue () 'Deklarace proměnných Dim SourceRng jako rozsah' Zadejte všechny buňky v aktivním listu jako rozsah Nastavit SourceRng = Rozsah ("A1", Rozsah ("A1"). SpecialCells (xlCellTypeLastCell)) 'Přiřazení pouze hodnoty přeskakování buněk vzorec buňky SourceRng.Value = SourceRng.Value End Sub
Pokud se vám tento blog líbil, sdílejte ho se svými přáteli na Facebooku. Také nás můžete sledovat na Twitteru a Facebooku.
Rádi bychom od vás slyšeli, dejte nám vědět, jak můžeme zlepšit naši práci a zlepšit ji pro vás. Napište nám na e -mail