VBA -formatfunktion

Innehållsförteckning

Denna handledning visar hur du använder Format -funktionen.

Format Funktion

Formatera nummer med fördefinierade format

Formatfunktionen kan konvertera ett tal till en sträng formaterad med fördefinierade namngivna numeriska format. De fördefinierade formaten är Valuta, Fast, Standard, Procent, Vetenskaplig, Ja/Nej, Sant/Falsk och På/Av.

12345678910111213141516171819202122232425262728293031 DelformatExempel_1 ()MsgBox Format (1234567.8) 'Resultat är: 1234567.8'Format lämnar bara siffran som den ärMsgBox -format (1234567.8, "Valuta") 'Resultat är: 1 234 567,80 dollar'Valuta använder systemets valutainställningarMsgBox -format (1234567.8, "Fixat") 'Resultat är: 1234567.80'Fixed: Minst en siffra före decimal och'använder systeminställningar för decimaldelenMsgBox -format (1234567.8, "Standard") 'Resultat är: 1 234 567,80'Standard: Tusentals separatorer och standardsystemMsgBox -format (1234567.8, "Procent") 'Resultat är: 123456780.00%'Procent, multipliceras med 100 med % och standardsystem.MsgBox Format (1234567.8, "Scientific") 'Resultat är: 1.23E+06'Vetenskaplig noteringMsgBox -format (1234567.8, "Ja/Nej") 'Resultat är: Ja'Nej om talet är nollMsgBox Format (1234567.8, "True/False") 'Resultat är: True'Falskt om talet är lika med nollMsgBox -format (1234567.8, "På/Av") 'Resultat är: På'Av om talet är nollAvsluta Sub

Formatera nummer med användardefinierade format

Formatfunktionen kan konvertera ett tal till en sträng, formaterade användardefinierade numeriska format. 0 är en platshållare som visar en siffra eller noll. # är en platshållare för siffror som visar en siffra eller ingenting. En punkt (.) Är decimalplatshållaren, % är den procentuella platshållaren och komma (,) är tusentalsavgränsaren. Text kan läggas till i formatet med dubbla citattecken (“”) och ett enda tecken kan läggas till om det används efter ett backslash (\).

1234567891011 DelformatExempel_2 ()MsgBox -format (7,8, "000,00") 'Resultat är: 007,80MsgBox -format (12347.8356, "000.00") 'Resultat är: 12347.84MsgBox Format (7.8, "###. ##") 'Resultat är: 7.8MsgBox Format (12347.8356, "###. ##") 'Resultat är: 12347.84MsgBox -format (7,8, "\ $. 00") 'Resultat är: $ 7,80MsgBox -format (1237.835, "ABA0.00") 'Resultat är: ABA1237.84MsgBox -format (12347.8356, "000.00%") 'Resultat är: 1234783.56%MsgBox -format (12347.8356, " %000.00") 'Resultat är: %12347.84Avsluta Sub

Formatera nummer beroende på värdena

Formatfunktionen kan ha olika sektioner med olika formatregler för positiva tal, negativa tal, noll och Null. Dessa sektioner separeras med ett semikolon.

1234567 DelformatExempel_3 ()MsgBox -format (7,8, "000,00; (000,00); \ z \ e \ r \ o; ingenting") 'Resultat är: 007,80MsgBox Format (-7.8, "000.00; (000.00); \ z \ e \ r \ o; ingenting") 'Resultat är: (007.80)MsgBox Format (0, "000.00; (000.00); \ z \ e \ r \ o; ingenting") 'Resultat är: nollMsgBox Format (Null, "000.00; (000.00); \ z \ e \ r \ o; ingenting") 'Resultat är: ingentingAvsluta Sub

Formatera datum med fördefinierade format

Formatfunktionen kan formatera datum med olika fördefinierade format. Dessa format är långa, medellånga och korta datum och även långa, medellånga och korta tider.

1234567891011121314 DelformatExempel_4 ()Dim DateEx As DateDateEx = #4/18/2020 19:35:56 PM #MsgBox -format (DateEx, "Allmänt datum") 'Resultat är: 18.4.2020 19:35:56MsgBox Format (DateEx, "Long Date") 'Resultat är: lördagen den 18 april 2022MsgBox-format (DateEx, "Medium Date") 'Resultat är: 18-apr-20MsgBox -format (DateEx, "Short Date") 'Resultat är: 18.4.2020MsgBox -format (DateEx, "Long Time") 'Resultat är: 19:35:56MsgBox -format (DateEx, "Medium Time") 'Resultat är: 19:35MsgBox -format (DateEx, "Short Time") 'Resultat är: 19:35Avsluta Sub

Formatdatum med användardefinierade format

Formatfunktionen kan formatera datum med användardefinierade format. Tecken som d, m, y, w, q kan användas för att skapa anpassade datumformat.

123456789101112131415161718192021222324 DelformatExempel_5 ()Dim DateEx As DateDateEx = #4/18/2020 19:35:56 PM #MsgBox -format (DateEx, "m/d/åå") 'Resultat är: 18.4.2020MsgBox-format (DateEx, "mm-dd-åå") 'Resultat är: 04-18-2020MsgBox-format (DateEx, "mmm-dd-åå") 'Resultat är: 18-apr-2020MsgBox-format (DateEx, "mmmm-dd-åå") 'Resultat är: 18-april-2020MsgBox-format (DateEx, "mm-ddd-åå") 'Resultat är: 04-lör-2020MsgBox-format (DateEx, "mm-dddd-åå") 'Resultat är: 04-lördag-2020MsgBox -format (DateEx, "y")'Resultatet är: 109'antal dagar i år 1-366MsgBox -format (DateEx, "ww")'Resultatet är: 16antal veckor i år 1-52MsgBox -format (DateEx, "q")'Resultatet är: 2'kvartal i år 1-4Avsluta Sub

Tecken som h, n, s och am, pm kombinationer kan användas för att skapa anpassade tidsformat.

123456789101112 DelformatExempel_6 ()Dim DateEx As DateDateEx = #4/18/2020 19:06:05 PM #MsgBox -format (DateEx, "h: n: s") 'Resultat är: 19: 6: 5MsgBox -format (DateEx, "hh: nn: ss") 'Resultat är: 19:06:05MsgBox -format (DateEx, "hh: nn: ss am/pm") 'Resultat är: 07:06:05 pmMsgBox -format (DateEx, "hh: nn: ss AM/PM") 'Resultat är: 07:06:05 PMMsgBox -format (DateEx, "hh: nn: ss a/p") 'Resultat är: 07:06:05 pMsgBox -format (DateEx, "hh: nn: ss A/P") 'Resultat är: 07:06:05 PAvsluta Sub

Format för bättre läsbarhet

Formatfunktionen kan formatera strängar eller tal för bättre läsbarhet. @ är en teckenplatshållare som används för att visa ett tecken eller mellanslag. & är en teckenplatshållare som används för att visa ett tecken eller ingenting. ! kan användas för att använda teckenplatshållare från vänster till höger och kan användas för att genomdriva små eller stora bokstäver. Kan vara användbart vid formatering av telefonnummer eller andra stora nummer utan att ändra det ursprungliga värdet.

12345678910111213141516171819202122 DelformatExempel_7 ()Dim StrEx som strängStrEx = "ABCdef"MsgBox Format (StrEx, "-@@@-@@-@@") 'Resultat är:-AB-Cd-efMsgBox Format (StrEx, "-&&&-&&-&&") 'Resultat är: -AB-Cd-ef”Börjar från höger till vänster.MsgBox Format (StrEx, "-@@@-@@-@@-@@") 'Resultat är:--AB-Cd-efMsgBox Format (StrEx, "-&&&-&&-&&-&&") 'Resultat är: --AB-Cd-ef”Börjar från höger till vänster. När tecken är slut @ lägger till mellanslag och & tillför ingentingMsgBox Format (StrEx, "!-@@@-@@-@@-@@") 'Resultat är: -ABC-de-f-MsgBox Format (StrEx, "!-&&&-&&-&&-&&") 'Resultat är: -ABC-de-f'Börjar från vänster till höger på grund av!MsgBox Format (StrEx, ">") 'Resultat är: ABCDEFMsgBox Format (StrEx, "<") 'Resultat är: abcdefMsgBox Format (1234567890, "@@@-@@@-@@@@") 'Resultat är: 123-456-7890MsgBox-format (1234567890, "@@@@-@@@-@@@") 'Resultat är: 1234-567-890Avsluta Sub

Formatera mönster i kalkylbladets celler

Formatfunktionen kan användas i VBA -kod och även i kalkylbladsceller. Markera cellen eller cellområdet och följ menyposten Format Cells> Custom. Det finns många användardefinierade format och även användaren kan skapa sina egna anpassade format.

Formatera mönster med textformel

Formatfunktionen kan direkt ändra formatet för ett värde inuti VBA -kod. Vi kan också använda Excel -formel för att få samma resultat med WorksheetFunction.Text.

1234567891011 DelformatExempel_8 ()MsgBox -format (7,8, "000,00")'Resultatet är: 007,80MsgBox WorksheetFunction.Text (7,8, "000,00")'Resultatet är: 007,80MsgBox -format (7.8, "###. ##")'Resultatet är: 7,8MsgBox WorksheetFunction.Text (7.8, "###. ##")'Resultatet är: 7,8Avsluta Sub

Du kommer att bidra till utvecklingen av webbplatsen, dela sidan med dina vänner

wave wave wave wave wave