In deze zelfstudie wordt gedemonstreerd hoe u de functie Opmaak kunt gebruiken.
Formaat Functie
Getallen opmaken met vooraf gedefinieerde notaties
De formaatfunctie kan een getal converteren naar een tekenreeks die is opgemaakt met vooraf gedefinieerde benoemde numerieke formaten. Die vooraf gedefinieerde formaten zijn Valuta, Vast, Standaard, Percentage, Wetenschappelijk, Ja/Nee, Waar/Onwaar en Aan/Uit.
| 12345678910111213141516171819202122232425262728293031 | SubformaatVoorbeeld_1()MsgBox-indeling (12345678.8) 'Resultaat is: 1234567.8''Formaat laat het nummer gewoon zoals het is'MsgBox-indeling (123457.8, "Valuta") 'Resultaat is: $ 1.234.567,80'Valuta gebruikt de valuta-instellingen van het systeemMsgBox-indeling (123457.8, "Vast") 'Resultaat is: 1234567.80'Opgelost: ten minste één cijfer voor de komma en'gebruikt systeeminstellingen voor het decimale deel'MsgBox-indeling (123457.8, "Standaard") 'Resultaat is: 1.234.567.80'Standaard: Duizenden scheiders en standaard systeemMsgBox-indeling (12345678.8, "Percentage") 'Resultaat is: 123456780.00%'Procent, vermenigvuldigt met 100 met % en standaardsysteem.MsgBox-indeling (123467.8, "wetenschappelijk") 'Resultaat is: 1.23E+06'Wetenschappelijke notatieMsgBox-indeling (123456.8, "Ja/Nee") 'Resultaat is: Ja'Nee als het getal nul is'MsgBox Format (123456.8, "True/False") 'Resultaat is: True'Niet waar als het getal gelijk is aan nul'MsgBox-indeling (123467.8, "Aan/Uit") 'Resultaat is: Aan''Uit als het getal nul is'Einde sub |
Getallen opmaken met door de gebruiker gedefinieerde notaties
Opmaakfunctie kan een getal converteren naar een tekenreeks, opgemaakte door de gebruiker gedefinieerde numerieke formaten. 0 is een tijdelijke aanduiding voor cijfers die een cijfer of nul weergeeft. # is een tijdelijke aanduiding voor cijfers die een cijfer of niets weergeeft. Een punt (.) is de tijdelijke aanduiding voor decimalen, % is de tijdelijke aanduiding voor percentages en een komma (,) is het scheidingsteken voor duizendtallen. Tekst kan in het formaat worden toegevoegd met dubbele aanhalingstekens (“”) en een enkel teken kan worden toegevoegd als het wordt gebruikt na een backslash (\).
| 1234567891011 | SubformaatVoorbeeld_2()MsgBox-indeling (7.8, "000.00") 'Resultaat is: 007.80MsgBox-indeling (12347.8356, "000.00") 'Resultaat is: 12347.84MsgBox Format(7.8, "###.##") 'Resultaat is: 7.8MsgBox-indeling (12347.8356, "###.##") 'Resultaat is: 12347.84MsgBox Format (7.8, "\$.00") 'Resultaat is: $7.80MsgBox-indeling (1237.835, "ABA0.00") 'Resultaat is: ABA1237.84MsgBox-indeling (12347.8356, "000.00%") 'Resultaat is: 1234783.56%MsgBox-indeling (12347.8356, "%000.00") 'Resultaat is: %12347.84Einde sub |
Getallen opmaken afhankelijk van de waarden
De opmaakfunctie kan verschillende secties hebben met verschillende opmaakregels voor positieve getallen, negatieve getallen, nul en Null. Deze secties worden gescheiden door een puntkomma.
| 1234567 | SubformaatVoorbeeld_3()MsgBox Format(7.8, "000.00;(000.00);\z\e\r\o;nothing") 'Resultaat is: 007.80MsgBox Format(-7.8, "000.00;(000.00);\z\e\r\o;nothing") 'Resultaat is: (007.80)MsgBox Format(0, "000.00;(000.00);\z\e\r\o;nothing") 'Resultaat is: nulMsgBox Format(Null, "000.00;(000.00);\z\e\r\o;nothing") 'Resultaat is: nietsEinde sub |
Datums opmaken met vooraf gedefinieerde notaties
Opmaakfunctie kan datums opmaken met verschillende vooraf gedefinieerde formaten. Die formaten zijn lang, gemiddeld en kort en ook lang, gemiddeld en kort.
| 1234567891011121314 | SubformaatVoorbeeld_4()Dim DateEx als datumDatumEx = 18-04-2020 19:35:56 #MsgBox Format (DateEx, "Algemene datum") 'Resultaat is: 18-4-2020 19:35:56 PMMsgBox Format (DateEx, "Lange datum") 'Resultaat is: zaterdag 18 april 2022MsgBox-indeling (DateEx, "Medium Date") 'Resultaat is: 18-apr-20'MsgBox Format (DateEx, "Short Date") 'Resultaat is: 18-4-2020MsgBox-indeling (DateEx, "Lange tijd") 'Resultaat is: 19:35:56 PM'MsgBox-indeling (DateEx, "Medium Time") 'Resultaat is: 19:35 uur'MsgBox Format (DateEx, "Short Time") 'Resultaat is: 19:35'Einde sub |
Datums opmaken met door de gebruiker gedefinieerde notaties
Opmaakfunctie kan datums opmaken met door de gebruiker gedefinieerde formaten. Tekens zoals d, m, y, w, q kunnen worden gebruikt om aangepaste datumnotaties te maken.
| 123456789101112131415161718192021222324 | SubformaatVoorbeeld_5()Dim DateEx als datumDatumEx = 18-04-2020 19:35:56 #MsgBox-indeling (DateEx, "m/d/yy") 'Resultaat is: 18-4-2020MsgBox-indeling (DateEx, "mm-dd-jj") 'Resultaat is: 18-04-2020MsgBox-indeling (DateEx, "mmm-dd-jj") 'Resultaat is: 18-apr-2020MsgBox-indeling (DateEx, "mmmm-dd-jj") 'Resultaat is: 18 april-2020MsgBox-indeling (DateEx, "mm-ddd-jj") 'Resultaat is: 04-za-2020MsgBox-indeling (DateEx, "mm-dddd-jj") 'Resultaat is: 04-zaterdag-2020MsgBox-indeling (DatumEx, "y")'Resultaat is: 109'aantal dagen in jaar 1-366'MsgBox-indeling (DateEx, "ww")'Resultaat is: 16'aantal weken in jaar 1-52'MsgBox-indeling (DateEx, "q")'Resultaat is: 2'kwartaal in jaar 1-4'Einde sub |
Tekens zoals h, n, s en am, pm-combinaties kunnen worden gebruikt om aangepaste tijdnotaties te maken.
| 123456789101112 | SubformaatVoorbeeld_6()Dim DateEx als datumDatumEx = 18-04-2020 19:06:05 #MsgBox Format (DateEx, "h:n:s") 'Resultaat is: 19:6:5MsgBox Format (DateEx, "hh:nn:ss") 'Resultaat is: 19:06:05MsgBox Format (DateEx, "hh:nn:ss am/pm") 'Resultaat is: 19:06:05 uurMsgBox Format (DateEx, "hh:nn:ss AM/PM") 'Resultaat is: 19:06:05 PMMsgBox Format(DateEx, "hh:nn:ss a/p") 'Resultaat is: 07:06:05 pMsgBox Format(DateEx, "hh:nn:ss A/P") 'Resultaat is: 07:06:05 PEinde sub |
Formaat voor betere leesbaarheid
Opmaakfunctie kan tekenreeksen of getallen opmaken voor een betere leesbaarheid. @ is een tijdelijke aanduiding voor tekens die wordt gebruikt om een teken of spatie weer te geven. & is een tijdelijke aanduiding voor tekens die wordt gebruikt om een teken of niets weer te geven. ! kan worden gebruikt om tijdelijke aanduidingen voor tekens van links naar rechts te gebruiken en kan worden gebruikt om kleine letters of hoofdletters af te dwingen. Kan handig zijn bij het opmaken van telefoonnummers of andere grote getallen zonder de oorspronkelijke waarde te wijzigen.
| 12345678910111213141516171819202122 | SubformaatVoorbeeld_7()Dim StrEx As StringStrEx = "ABCdef"MsgBox Format(StrEx, "-@@@-@@-@@") 'Resultaat is: - AB-Cd-efMsgBox Format(StrEx, "-&&&-&&-&&") 'Resultaat is: -AB-Cd-ef'Begint van rechts naar links.MsgBox-indeling (StrEx, "-@@@-@@-@@-@@") 'Resultaat is: - -AB-Cd-efMsgBox-indeling (StrEx, "-&&&-&&-&&-&&") 'Resultaat is: --AB-Cd-ef'Begint van rechts naar links. Als er geen tekens meer zijn, voegt @ spaties toe en & voegt niets toeMsgBox Format(StrEx, "!-@@-@@-@@-@@") 'Resultaat is: -ABC-de-f -MsgBox Format(StrEx, "!-&&&-&&-&&-&&") 'Resultaat is: -ABC-de-f'Begint van links naar rechts vanwege de !MsgBox Format(StrEx, ">") 'Resultaat is: ABCDEFMsgBox Format(StrEx, "<") 'Resultaat is: abcdefMsgBox-indeling (1234567890, "@@@-@@@-@@@@") 'Resultaat is: 123-456-7890MsgBox-indeling (1234567890, "@@@@-@@@-@@@") 'Resultaat is: 1234-567-890Einde sub |
Patronen opmaken in werkbladcellen
Opmaakfunctie kan worden gebruikt in VBA-code en ook in werkbladcellen. Selecteer de cel of het celbereik en volg het menu-item Cellen opmaken > Aangepast. Er zijn veel door de gebruiker gedefinieerde indelingen en de gebruiker kan ook zijn eigen aangepaste indelingen maken.
Patronen opmaken met tekstformule
De formaatfunctie kan het formaat van een waarde in VBA-code direct wijzigen. We kunnen ook de Excel-tekstformule gebruiken om hetzelfde resultaat te krijgen met WorksheetFunction.Text.
| 1234567891011 | SubformaatVoorbeeld_8()MsgBox-indeling (7.8, "000.00")'Resultaat is: 007.80MsgBox WorksheetFunction.Text(7.8, "000.00")'Resultaat is: 007.80MsgBox-indeling (7.8, "###.##")'Resultaat is: 7.8MsgBox WorksheetFunction.Text(7.8, "###.##")'Resultaat is: 7.8Einde sub |
