FormatPercent-funksjon [VBA]

Innhold
Innholdsliste 🔎︎

# FormatPercent [VBA]

Returnerer en streng med tallformatering brukt på et numerisk uttrykk. Et prosenttegn legges til den returnerte strengen.

Denne konstanten, funksjonen eller objektet er aktivert med utsagnet Option VBASupport 1 plassert før den kjørbare programkoden i en modul.

### Syntaks:

          FormatPercent( expression, [numDigitsAfterDecimal As Integer], [includeLeadingDigit As Integer], _
              [useParensForNegativeNumbers As Integer], [groupDigits As Integer] ) As String

### Returverdi:

String

### Parametre:

uttrykk: Obligatorisk. Et numerisk uttrykk som skal formateres. Hvis uttrykk er en streng, må desimal- og tusenskilletegn lokaliseres.

numDigitsAfterDecimal: Valgfritt. En numerisk verdi som spesifiserer antall sifre som skal vises etter desimalet. Hvis den utelates, har den verdien -1 som standard, noe som betyr at standardinnstillingene for brukergrensesnittets lokalitet skal brukes.

includeLeadingDigit: Valgfritt. En vbTriState oppregningsverdi, som spesifiserer om en innledende null skal vises for brøkverdier.

- vbTrue eller -1: Vis en innledende null.

- vbFalse eller 0: Ikke vis innledende nuller.

- vbUseDefault eller -2: Bruk lokalinnstillingene for brukergrensesnittet. Dette er standard når det utelates.

useParensForNegativeNumbers: Valgfritt. En vbTriState oppregningsverdi som spesifiserer om negative tall skal settes inn i parentes.

- vbTrue eller -1: Bruk parentes for negative tall.

- vbFalse eller 0: Ikke vis parentes.

- vbUseDefault eller -2: Samme som vbFalse. Dette er standard når det utelates.

groupDigits: Valgfritt. En vbTriState enumerasjonsverdi som angir hvordan tallet, skal grupperes (i tusenvis osv.), ved å bruke gruppeskilletegnet som er angitt på systemets regionale innstillinger.

- vbTrue eller -1: Gruppesifre.

- vbFalse eller 0: Ikke grupper tall.

- vbUseDefault eller -2: Samme som vbFalse. Dette er standard når det utelates.

### Feilkoder

13 Ukjent datatype

### Eksempel:

            Sub TestFormatNumber
              Const UseComputerRegionalSettings = -1

              MsgBox FormatPercent(12.2, NumDigitsAfterDecimal:=2) ' 1220,00 % hvis valgt brukergrensesnitt er engelsk

              MsgBox FormatPercent("-,2", 2, IncludeLeadingDigit:=vbTrue) ' -20,00 % hvis fransk brukergrensesnitt

              MsgBox FormatPercent("-0,2", 2) ' -20,00 % for en-US, -0,00 for fr-CA, de-AT eller pt-BR

              MsgBox FormatPercent(-0.2, UseComputerRegionalSettings, UseParensForNegativeNumbers:=vbTrue) ' (20,00)% if pt-BR

              MsgBox FormatPercent("-0,2", UseComputerRegionalSettings, vbUseDefault, vbTrue) ' (20,00)% if german

              MsgBox FormatPercent("-12345678", -1, vbUseDefault, vbUseDefault, GroupDigits:=vbTrue) ' -1 234 567 800,00% for fr-BE

            End Sub

Lignende emner

VBA-matematiske funksjoner