Formát účtovných čísel pomocou formátovania VBA

Anonim

Vezmime si príklad, aby sme pochopili, ako a kde môžeme formátovať bunku pre účtovníctvo.

Máme údaje o množstve produktu v rozsahu A1: B9, v ktorých stĺpec A obsahuje názov produktu a stĺpec B obsahuje jeho množstvo. Chceme rozsah čiastok formátovať ako účtovníctvo. Formát vloží vľavo znak dolára a k číslu pripočíta dve desatinné miesta. Tento formát je určený na zobrazenie peňazí.

Pri písaní makra postupujte podľa nižšie uvedených krokov:-

  • Otvorte stránku VBA stlačením klávesov Alt+F11.
  • Vložte modul.
  • Napíšte nižšie uvedený kód:

Podformát Účtovníctvo ()

Pracovný list Dim Sh As

Set Sh = ThisWorkbook. Sheets (1)

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

Koniec pod

Vysvetlenie kódu:-

Najprv sme zadali predmet pre kód, potom sme definovali všetky premenné a potom sme definovali rozsah, kam chceme vložiť účtovný formát.

Keď spustíte makro stlačením klávesu F5, v programe Microsoft Excel získate požadovaný výsledok.

@ www.excelforum jeden z používateľov sa pýta na podobnú otázku:-

$ Prihlásiť sa pred hodnotou

Mám tento kód, ale nemôžem prísť na to, ako môžem dať znak dolára dopredu. Nižšie uvedený kód neumiestňuje znak $ pred túto hodnotu 2220,45-. Chcete, aby sa zobrazoval ako 2220,45 dolárov

Ak chcete skontrolovať riešenie, kliknite sem.

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

Sťahovanie - Naformátujte účtovné číslo prostredníctvom VBA - xlsm