Formátování účetních čísel pomocí formátování VBA

Anonim

Uveďme si příklad, abychom pochopili, jak a kde můžeme formátovat buňku pro účetnictví.

Máme údaje o množství produktu v rozsahu A1: B9, ve kterém sloupec A obsahuje název produktu a sloupec B obsahuje jeho množství. Chceme rozsah částek formátovat jako účetnictví. Formát vloží znak dolaru vlevo a k číslu přidá dvě desetinná místa. Tento formát má zobrazovat peníze.

Chcete-li napsat makro, postupujte podle níže uvedených kroků:-

  • Otevřete stránku VBA stisknutím klávesy Alt+F11.
  • Vložte modul.
  • Napište níže uvedený kód:

Podformát Účetnictví ()

Pracovní list Dim Sh As

Nastavit Sh = ThisWorkbook.Sheets (1)

Sh.Range ("B2: B9"). NumberFormat = "_ ($*#, ## 0,00 _); _ ($*(#, ## 0,00); _ ($*" "_" "?? _ ); _ (@_) "

End Sub

Vysvětlení kódu:-

Nejprve jsme zadali předmět kódu, poté jsme definovali všechny proměnné a poté jsme definovali rozsah, kam chceme vložit účetní formát.

Když spustíte makro stisknutím klávesy F5, získáte požadovaný výsledek v aplikaci Microsoft Excel.

@ www.excelforum jeden z uživatelů se ptal na podobnou otázku:-

$ Před hodnotou se přihlaste

Mám tento kód, ale nemůžu přijít na to, jak můžu dát znak dolaru dopředu. Níže uvedený kód neumisťuje znak $ před tuto hodnotu 2220,45-. Chtěl bych, aby se zobrazoval jako 2220,45 $

Chcete -li zkontrolovat řešení, klikněte sem.

http://www.excelforum.com/excel-programming-vba-macros/1085312-sign-in-front-of-value.html

Stahování - formátování účetního čísla prostřednictvím VBA - xlsm