Denne vejledning viser, hvordan du bruger formateringsfunktionen.
Format Funktion
Formater tal med foruddefinerede formater
Formatfunktionen kan konvertere et tal til en streng formateret med foruddefinerede navngivne numeriske formater. Disse foruddefinerede formater er Valuta, Fast, Standard, Procent, Videnskabelig, Ja/Nej, Sand/falsk og Til/Fra.
| 12345678910111213141516171819202122232425262728293031 | UnderformatExample_1 ()MsgBox Format (1234567.8) 'Resultat er: 1234567.8'Format efterlader bare tallet, som det erMsgBox Format (1234567.8, "Valuta") 'Resultat er: $ 1,234,567.80'Valuta bruger systemets valutaindstillingerMsgBox Format (1234567.8, "Fixed") 'Resultat er: 1234567.80'Fixed: Mindst et ciffer før decimalpunkt og'bruger systemindstillinger for decimaldelenMsgBox Format (1234567.8, "Standard") 'Resultat er: 1.234.567,80'Standard: Tusinder adskillere og standardsystemMsgBox Format (1234567.8, "Procent") 'Resultat er: 123456780.00%'Procent, ganges med 100 med % og standardsystem.MsgBox Format (1234567.8, "Videnskabelig") 'Resultat er: 1.23E+06'Videnskabelig notationMsgBox Format (1234567.8, "Ja/Nej") 'Resultat er: Ja'Nej, hvis tallet er nulMsgBox Format (1234567.8, "True/False") 'Resultat er: True'Falsk, hvis tallet er lig med nulMsgBox Format (1234567.8, "Til/Fra") 'Resultat er: Til'Fra, hvis tallet er nulAfslut Sub |
Formater tal med brugerdefinerede formater
Formatfunktionen kan konvertere et tal til en streng, formateret brugerdefinerede numeriske formater. 0 er en cifferpladsholder, der viser et ciffer eller nul. # er en cifferpladsholder, der viser et ciffer eller ingenting. En prik (.) Er den decimale pladsholder, % er den procentvise pladsholder og kommaet (,) er tusindeseparatoren. Tekst kan tilføjes i formatet ved hjælp af dobbelte anførselstegn (“”), og et enkelt tegn kan tilføjes, hvis det bruges efter en omvendt skråstreg (\).
| 1234567891011 | Underformateksempel_2 ()MsgBox Format (7,8, "000,00") 'Resultat er: 007,80MsgBox Format (12347.8356, "000.00") 'Resultat er: 12347.84MsgBox Format (7.8, "###. ##") 'Resultat er: 7.8MsgBox Format (12347.8356, "###. ##") 'Resultat er: 12347.84MsgBox Format (7,8, "\ $. 00") 'Resultat er: $ 7,80MsgBox Format (1237.835, "ABA0.00") 'Resultat er: ABA1237.84MsgBox Format (12347.8356, "000.00%") 'Resultat er: 1234783.56%MsgBox Format (12347.8356, " %000.00") 'Resultat er: %12347.84Afslut Sub |
Formater tal afhængigt af værdierne
Formatfunktionen kan have forskellige sektioner ved hjælp af forskellige formatregler for positive tal, negative tal, nul og Null. Disse sektioner adskilles med et semikolon.
| 1234567 | UnderformatEksempel_3 ()MsgBox Format (7,8, "000,00; (000,00); \ z \ e \ r \ o; ingenting") 'Resultat er: 007,80MsgBox Format (-7.8, "000.00; (000.00); \ z \ e \ r \ o; ingenting") 'Resultat er: (007.80)MsgBox Format (0, "000.00; (000.00); \ z \ e \ r \ o; ingenting") 'Resultat er: nulMsgBox Format (Null, "000.00; (000.00); \ z \ e \ r \ o; ingenting") 'Resultat er: ingentingAfslut Sub |
Formatdatoer med foruddefinerede formater
Formatfunktionen kan formatere datoer med forskellige foruddefinerede formater. Disse formater er lang, mellem og kort dato og også lang, mellem og kort tid.
| 1234567891011121314 | UnderformatEksempel_4 ()Dim DateEx As DateDateEx = #4/18/2020 19:35:56 PM #MsgBox Format (DateEx, "General Date") 'Resultat er: 18-04-2020 19:35:56MsgBox Format (DateEx, "Long Date") 'Resultat er: lørdag den 18. april 2022MsgBox Format (DateEx, "Medium Date") 'Resultat er: 18.-20. AprMsgBox Format (DateEx, "Short Date") 'Resultat er: 18.04.2020MsgBox Format (DateEx, "Long Time") 'Resultat er: 19:35:56MsgBox Format (DateEx, "Medium Time") 'Resultat er: 19:35MsgBox Format (DateEx, "Short Time") 'Resultat er: 19:35Afslut Sub |
Formatdatoer med brugerdefinerede formater
Formatfunktionen kan formatere datoer med brugerdefinerede formater. Tegn som d, m, y, w, q kan bruges til at oprette brugerdefinerede datoformater.
| 123456789101112131415161718192021222324 | UnderformatEksempel_5 ()Dim DateEx As DateDateEx = #4/18/2020 19:35:56 PM #MsgBox Format (DateEx, "m/d/åå") 'Resultat er: 18.04.2020MsgBox Format (DateEx, "mm-dd-åå") 'Resultat er: 04-18-2020MsgBox-format (DateEx, "mmm-dd-åå") 'Resultat er: 18-apr-2020MsgBox Format (DateEx, "mmmm-dd-yy") 'Resultat er: 18. april 2020MsgBox-format (DateEx, "mm-ddd-åå") 'Resultat er: 04-lør-2020MsgBox-format (DateEx, "mm-dddd-åå") 'Resultat er: 04-lørdag-2020MsgBox -format (DateEx, "y")'Resultatet er: 109'antal dag i år 1-366MsgBox -format (DateEx, "ww")'Resultatet er: 16'antal uger i år 1-52MsgBox -format (DateEx, "q")'Resultatet er: 2kvartal i år 1-4Afslut Sub |
Tegn som h, n, s og am, pm kombinationer kan bruges til at oprette brugerdefinerede tidsformater.
| 123456789101112 | Underformateksempel_6 ()Dim DateEx As DateDateEx = #4/18/2020 19:06:05 PM #MsgBox Format (DateEx, "h: n: s") 'Resultat er: 19: 6: 5MsgBox Format (DateEx, "hh: nn: ss") 'Resultat er: 19:06:05MsgBox Format (DateEx, "hh: nn: ss am/pm") 'Resultat er: 07:06:05 pmMsgBox Format (DateEx, "hh: nn: ss AM/PM") 'Resultat er: 07:06:05 PMMsgBox Format (DateEx, "hh: nn: ss a/p") 'Resultat er: 07:06:05 pMsgBox Format (DateEx, "hh: nn: ss A/P") 'Resultat er: 07:06:05 PAfslut Sub |
Format for bedre læsbarhed
Formatfunktionen kan formatere strenge eller tal for bedre læsbarhed. @ er en tegnpladsholder, der bruges til at vise et tegn eller mellemrum. & er en tegnpladsholder, der bruges til at vise et tegn eller ingenting. ! kan bruges til at bruge tegnpladsholdere fra venstre mod højre og kan bruges til at håndhæve små eller store bogstaver. Kan være nyttig til formatering af telefonnumre eller andre store numre uden at ændre den oprindelige værdi.
| 12345678910111213141516171819202122 | UnderformatEksempel_7 ()Dim StrEx som strengStrEx = "ABCdef"MsgBox Format (StrEx, "-@@@-@@-@@") 'Resultat er:-AB-Cd-efMsgBox Format (StrEx, "-&&&-&&-&&") 'Resultat er: -AB-Cd-ef'Starter fra højre til venstre.MsgBox Format (StrEx, "-@@@-@@-@@-@@") 'Resultat er:--AB-Cd-efMsgBox Format (StrEx, "-&&&-&&-&&-&&") 'Resultat er: --AB-Cd-ef'Starter fra højre til venstre. Når der mangler tegn @ tilføjer mellemrum og & tilføjer intetMsgBox Format (StrEx, "!-@@@-@@-@@-@@") 'Resultat er: -ABC-de-f-MsgBox Format (StrEx, "!-&&&-&&-&&-&&") 'Resultat er: -ABC-de-f'Starter fra venstre mod højre på grund af!MsgBox Format (StrEx, ">") 'Resultat er: ABCDEFMsgBox Format (StrEx, "<") 'Resultat er: abcdefMsgBox Format (1234567890, "@@@-@@@-@@@@") 'Resultat er: 123-456-7890MsgBox Format (1234567890, "@@@@-@@@-@@@") 'Resultat er: 1234-567-890Afslut Sub |
Formater mønstre i regnearkceller
Formatfunktionen kan bruges i VBA -kode og også i regnearkceller. Vælg cellen eller celleområdet, og følg menuposten Formatér celler> Brugerdefineret. Der er mange brugerdefinerede formater, og også brugeren kan oprette sine egne tilpassede formater.
Formater mønstre med tekstformel
Formatfunktionen kan direkte ændre formatet på en værdi inde i VBA -kode. Vi kan også bruge Excel -formel til at få det samme resultat ved hjælp af WorksheetFunction.Text.
| 1234567891011 | UnderformatEksempel_8 ()MsgBox -format (7,8, "000,00")'Resultatet er: 007,80MsgBox WorksheetFunction.Text (7,8, "000,00")'Resultatet er: 007,80MsgBox -format (7,8, "###. ##")'Resultatet er: 7,8MsgBox WorksheetFunction.Text (7.8, "###. ##")'Resultatet er: 7,8Afslut Sub |
