Ovaj vodič će pokazati kako se koristi funkcija Format.
Funkcija oblikovanja
Oblikovanje brojeva s unaprijed definiranim formatima
Funkcija oblikovanja može pretvoriti broj u niz oblikovan unaprijed definiranim numeričkim formatima. Ti su unaprijed definirani formati valuta, fiksni, standardni, postotni, znanstveni, da/ne, istiniti/lažni i uključeni/isključeni.
| 12345678910111213141516171819202122232425262728293031 | Podformat Primjer_1 ()MsgBox Format (1234567.8) 'Rezultat je: 1234567.8'Format jednostavno ostavlja broj kakav jestMsgBox format (1234567,8, "Valuta") 'Rezultat je: 1.234.567,80 USD'Valuta koristi postavke valute sustavaMsgBox Format (1234567.8, "Fixed") 'Rezultat je: 1234567.80'Popravljeno: Najmanje jedna znamenka prije decimalne točke i'koristi postavke sustava za decimalni dioMsgBox format (1234567.8, "Standard") 'Rezultat je: 1.234.567,80'Standard: Tisuće separatora i standardni sustavMsgBox format (1234567,8, "Postotak") 'Rezultat je: 123456780,00%'Postotak, množi se sa 100 s % i standardnim sustavom.MsgBox Format (1234567.8, "Scientific") 'Rezultat je: 1.23E+06'Znanstveni zapisMsgBox Format (1234567.8, "Da/Ne") 'Rezultat je: Da'Ne ako je broj nulaMsgBox Format (1234567.8, "True/False") 'Rezultat je: Istina'Netočno ako je broj jednak nuliMsgBox Format (1234567.8, "Uključeno/Isključeno") 'Rezultat je: Uključeno'Isključeno ako je broj nulaKraj podm |
Oblikovanje brojeva s korisnički definiranim formatima
Funkcija oblikovanja može pretvoriti broj u niz, oblikovane korisnički definirane numeričke formate. 0 je rezervirano mjesto za znamenke koje prikazuje znamenku ili nulu. # je rezervirano mjesto za znamenke koje prikazuje znamenku ili ništa. Točka (.) Je decimalno mjesto mjesta, % je postotak rezervirano mjesto, a zarez (,) je razdjelnik tisuća. Tekst se može dodati u formatu pomoću dvostrukih navodnika (“”), a može se dodati i jedan znak ako se koristi nakon obrnute kose crte (\).
| 1234567891011 | Podformat Primjer_2 ()MsgBox Format (7.8, "000.00") 'Rezultat je: 007.80MsgBox format (12347.8356, "000.00") 'Rezultat je: 12347.84MsgBox Format (7.8, "###. ##") 'Rezultat je: 7.8MsgBox Format (12347.8356, "###. ##") 'Rezultat je: 12347.84Format MsgBox (7,8, "\ $. 00") 'Rezultat je: 7,80 USDMsgBox format (1237.835, "ABA0.00") 'Rezultat je: ABA1237.84MsgBox format (12347.8356, "000.00%") 'Rezultat je: 1234783.56%MsgBox format (12347.8356, " %000.00") 'Rezultat je: %12347.84Kraj podm |
Oblikovanje brojeva ovisno o vrijednostima
Funkcija oblikovanja može imati različite odjeljke koji koriste različita pravila oblikovanja za pozitivne brojeve, negativne brojeve, nulu i nulu. Ti su odjeljci odvojeni točkom -zarezom.
| 1234567 | Podformat Primjer_3 ()MsgBox Format (7.8, "000.00; (000.00); \ z \ e \ r \ o; ništa") 'Rezultat je: 007.80MsgBox format (-7.8, "000.00; (000.00); \ z \ e \ r \ o; ništa") "Rezultat je: (007.80)MsgBox Format (0, "000.00; (000.00); \ z \ e \ r \ o; ništa") "Rezultat je: nulaMsgBox Format (Null, "000.00; (000.00); \ z \ e \ r \ o; nothing") 'Rezultat je: ništaKraj podm |
Oblikovanje datuma s unaprijed definiranim formatima
Funkcija oblikovanja može oblikovati datume s različitim unaprijed definiranim formatima. Ti su formati dugi, srednji i kratki datumi te također dugo, srednje i kratko vrijeme.
| 1234567891011121314 | Podformat Primjer_4 ()Dim DateEx As DateDatumEx = #18.04.2020 19:35:56 #MsgBox Format (DateEx, "General Date") 'Rezultat je: 18.4.2020 19:35:56MsgBox format (DateEx, "Long Date") 'Rezultat je: subota, 18. travnja 2022. godineMsgBox Format (DateEx, "Medium Date") 'Rezultat je: 18. travnja-20.MsgBox Format (DateEx, "Short Date") 'Rezultat je: 18.4.2020.MsgBox Format (DateEx, "Long Time") 'Rezultat je: 19:35:56 PMFormat MsgBox (DateEx, "Srednje vrijeme") 'Rezultat je: 19:35MsgBox Format (DateEx, "Short Time") 'Rezultat je: 19:35Kraj podm |
Oblikovanje datuma s korisnički definiranim formatima
Funkcija oblikovanja može oblikovati datume s korisnički definiranim formatima. Znakovi poput d, m, y, w, q mogu se koristiti za stvaranje prilagođenih formata datuma.
| 123456789101112131415161718192021222324 | Podformat Primjer_5 ()Dim DateEx As DateDatumEx = #18.04.2020 19:35:56 #MsgBox Format (DateEx, "m/d/yy") 'Rezultat je: 18.4.2020.MsgBox Format (DateEx, "mm-dd-yy") 'Rezultat je: 04-18-2020MsgBox format (DateEx, "mmm-dd-yy") 'Rezultat je: 18. travnja 2020.Format MsgBox (DateEx, "mmmm-dd-yy") 'Rezultat je: 18. travnja 2020. godineMsgBox format (DateEx, "mm-ddd-yy") 'Rezultat je: 04-Sat-2020MsgBox format (DateEx, "mm-dddd-yy") 'Rezultat je: 04-subota-2020MsgBox format (DateEx, "y")'Rezultat je: 109'broj dana u godini 1-366MsgBox format (DateEx, "ww")'Rezultat je: 16'broj tjedana u godini 1-52MsgBox format (DateEx, "q")'Rezultat je: 2kvartal u godini 1-4Kraj podm |
Znakovi poput h, n, s i am, pm kombinacije mogu se koristiti za stvaranje prilagođenih formata vremena.
| 123456789101112 | Podformat Primjer_6 ()Dim DateEx As DateDatumEx = #4/18/2020 19:06:05 PM #MsgBox format (DateEx, "h: n: s") 'Rezultat je: 19: 6: 5MsgBox format (DateEx, "hh: nn: ss") 'Rezultat je: 19:06:05MsgBox format (DateEx, "hh: nn: ss am/pm") 'Rezultat je: 07:06:05 pmMsgBox Format (DateEx, "hh: nn: ss AM/PM") 'Rezultat je: 07:06:05 PMMsgBox format (DateEx, "hh: nn: ss a/p") 'Rezultat je: 07:06:05 pMsgBox format (DateEx, "hh: nn: ss A/P") 'Rezultat je: 07:06:05 PKraj podm |
Format za bolju čitljivost
Funkcija oblikovanja može oblikovati nizove ili brojeve radi bolje čitljivosti. @ je rezervirano mjesto znaka koje se koristi za prikaz znaka ili razmaka. & je rezervirano mjesto znaka koje se koristi za prikaz znaka ili ništa. ! može se koristiti za korištenje zamjenskih znakova slijeva nadesno i može se koristiti za primjenu malih ili velikih slova. Može biti korisno pri oblikovanju telefonskih brojeva ili drugih velikih brojeva bez promjene izvorne vrijednosti.
| 12345678910111213141516171819202122 | Podformat Primjer_7 ()Dim StrEx kao nizStrEx = "ABCdef"MsgBox format (StrEx, "-@@@-@@-@@") 'Rezultat je:-AB-Cd-efMsgBox format (StrEx, "-&&&-&&-&&") Rezultat je: -AB-Cd-ef'Počinje zdesna nalijevo.MsgBox format (StrEx, "-@@@-@@-@@-@@") 'Rezultat je:--AB-Cd-efMsgBox format (StrEx, "-&&&-&&-&&-&&") 'Rezultat je: --AB-Cd-ef'Počinje zdesna nalijevo. Kad nema znakova @ dodaje razmake i & ne dodaje ništaMsgBox format (StrEx, "!-@@@-@@-@@-@@") 'Rezultat je: -ABC-de-f-MsgBox format (StrEx, "!-&&&-&&-&&-&&") 'Rezultat je: -ABC-de-f'Počinje slijeva nadesno zbog znaka!MsgBox Format (StrEx, ">") 'Rezultat je: ABCDEFMsgBox Format (StrEx, "<") 'Rezultat je: abcdefFormat MsgBox (1234567890, "@@@-@@@-@@@@") "Rezultat je: 123-456-7890Format MsgBox (1234567890, "@@@@-@@@-@@@") 'Rezultat je: 1234-567-890Kraj podm |
Uzorci formata u ćelijama radnog lista
Funkcija oblikovanja može se koristiti u VBA kodu, ali i u ćelijama radnih listova. Odaberite ćeliju ili raspon ćelija i slijedite unos izbornika Oblikovanje ćelija> Prilagođeno. Postoji mnogo korisnički definiranih formata, a korisnik također može stvoriti vlastite prilagođene formate.
Oblikovanje uzoraka s tekstualnom formulom
Funkcija oblikovanja može izravno promijeniti format vrijednosti unutar VBA koda. Također možemo koristiti excel Text formulu da bismo dobili isti rezultat pomoću WorksheetFunction.Text.
| 1234567891011 | Podformat Primjer_8 ()MsgBox format (7.8, "000.00")'Rezultat je: 007.80MsgBox radni listFunction.Text (7.8, "000.00")'Rezultat je: 007.80MsgBox format (7.8, "###. ##")'Rezultat je: 7.8MsgBox radni listFunction.Text (7.8, "###. ##")'Rezultat je: 7.8Kraj podm |
