Ņemsim piemēru, lai saprastu, kā un kur mēs varam formatēt šūnu valūtā.
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 summu diapazonu formatēt kā valūtu, lai lietotājam būtu viegli saprast, ka skaitlis ir valūta.
Lai uzrakstītu makro, rīkojieties šādi:-
- Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
- Ievietojiet moduli.
- Uzrakstiet zemāk minēto kodu:
ApakšformātsCurrency ()
Dim Sh kā darblapa
Iestatīt Sh = ThisWorkbook.Sheets (1)
Sh.Range ("B2: B9"). NumberFormat = "$#, ## 0.00"
Beigt apakš
Koda skaidrojums:-
Pirmkārt, mēs esam norādījuši koda tēmu, pēc tam definējām visus mainīgos, pēc tam definējām diapazonu, kurā vēlamies ievietot valūtas formātu.
Lai palaistu makro, nospiediet taustiņu F5, un diapazona formāts tiks mainīts uz valūtas formātu.
@ www.excelforum viens no lietotājiem ir uzdevis līdzīgu jautājumu:-
Valūtas formāts, rakstīts ASV Šanhajā
Man ir piekļuves db, kas izveido / aizpilda Excel un pēc tam formatē pārskatu. Man ir valūta, kas ir USD, tāpēc es to formatēju tā, kad es skrienu ASV, es saņemu to, ko es sagaidu "100 000 USD", bet, kad šī lietojumprogramma tiek palaista Šanhajā, viņi saņem un, protams, faktiskās vērtības ir tādas pašas, ja skrien Šanhajā ASV.
Kā lai es to parāda USD, braucot no Šanhajas?
Lai pārbaudītu risinājumu, lūdzu, noklikšķiniet šeit
http://www.excelforum.com/excel-programming-vba-macros/1075253-currency-format-written-in-us-run-in-shanghai.html
Lejupielādēt - Valūtas formatēšana VBA - xlsm