Grāmatvedības numura formāts, izmantojot VBA formatējumu

Ņemsim piemēru, lai saprastu, kā un kur mēs varam formatēt šūnu grāmatvedībai.

Mums ir dati par produktu daudzumu diapazonā A1: B9, kurā A slejā ir produkta nosaukums un B slejā ir norādīts tā daudzums. Mēs vēlamies formatēt summu diapazonu kā grāmatvedību. Formāts kreisajā pusē ievieto dolāra zīmi un skaitlim pievieno divas zīmes aiz komata. Šis formāts ir paredzēts naudas parādīšanai.

Lai uzrakstītu makro, rīkojieties šādi:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

ApakšformātsGrāmatvedība ()

Dim Sh kā darblapa

Iestatīt Sh = ThisWorkbook.Sheets (1)

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

Beigt apakš

Koda skaidrojums:-

Vispirms mēs esam norādījuši koda tēmu, tad mēs esam definējuši visus mainīgos, pēc tam mēs esam definējuši diapazonu, kurā mēs vēlamies ievietot grāmatvedības formātu.

Palaižot makro, nospiežot taustiņu F5, jūs iegūsit vēlamo rezultātu programmā Microsoft Excel.

@ www.excelforum viens no lietotājiem ir jautājis par līdzīgu jautājumu:-

$ Pierakstieties vērtības priekšā

Man ir šis kods, bet, šķiet, nevaru saprast, kā es varu likt dolāra zīmi priekšā. Zemāk esošais kods neievieto $ zīmi šīs vērtības priekšā 2220.45-. Vēlētos, lai tas tiktu parādīts kā 2220,45 USD

Lai pārbaudītu risinājumu, lūdzu, noklikšķiniet šeit.

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