En VBA, tu connais déjà String
qui permet de déclarer une chaîne de caractères : Dim Nom As String
; c'est aussi une fonction qui retourne une chaîne de caractères de n fois le caractère spécifié.
Ainsi, String$(13, "0")
retourne une chaîne de caractères de 13 zéros ; c'est donc comme si tu écrivais :
.NumberFormat = "0000000000000"
Équivalent de String$(13, "0")
sur une feuille de calcul : =REPT("0";13)
; attention, les arguments sont inversés :
c'est d'abord le caractère, puis le nombre de fois.
⚠ REPT() est plus puissant que String$() car String$(3, "ABC")
retourne 3 fois le 1er caractère "A" ➯ "AAA"
alors que =REPT("ABC";3)
retourne 3 fois "ABC" ➯ "ABCABCABC" ; pour faire la même chose en VBA :
Sub Essai()
[B2] = WorksheetFunction.Rept("ABC", 3)
End Sub
OU
Sub Essai()
[B2] = Evaluate("=REPT(""ABC"", 3)")
End Sub
dhany