Форматиране на счетоводен номер чрез форматиране VBA

Нека вземем пример, за да разберем как и къде можем да форматираме клетката за счетоводство.

Имаме данни за количеството на продукта в диапазон A1: B9, в който колона A съдържа име на продукта, а колона B съдържа количество от него. Искаме да форматираме диапазона на сумите като счетоводен. Форматът поставя знак за долар вляво и добавя две десетични знака към числото. Този формат е предназначен за показване на пари.

За да напишете макроса, следвайте дадените по-долу стъпки:-

Отворете VBA страница, натиснете клавиша Alt+F11.
Поставете модул.
Напишете кода по -долу:

ПодформатAccounting ()

Dim Sh като работен лист

Задайте Sh = ThisWorkbook.Sheets (1)

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

End Sub

Код Обяснение:-

Първо дадохме темата за кода, след това бяхме дефинирали всички променливи, след което бяхме определили диапазона, където искаме да поставим счетоводния формат.

Когато стартирате макроса, като натиснете клавиша F5, ще получите желания резултат в Microsoft Excel.

@ www.excelforum един от потребителите е задал подобен въпрос:-

$ Знак пред стойността

Имам този код, но не мога да разбера как мога да поставя знак за долар отпред. Кодът по-долу не поставя знак $ пред тази стойност 2220.45-. Бих искал да се показва като $ 2220.45-

За да проверите решението, моля, кликнете тук.

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