Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Multiplier un caractère en VBA

5 réponses
Avatar
AndréBdR
Je cherche à multiplier le caractère Chr(160), c'est à dire "Espace" dans une expression VBA, genre:
="Titi" suivi de n fois le caractère Chr(160) & "Toto"
n résultant d'un calcul fait plus haut
et ... je n'ai pas su faire.
Merci d'avance pour votre aide.

5 réponses

Avatar
jero
Salut,
Voir la fonction String. Ex :
string(12,"*")=>*********etc...
Rem : espace = chr(32)
5 espaces : String(5,Chr(32)) ou String(5," ")
A+

"AndréBdR" a écrit dans le message de news:
4b8e5e86$0$17888$
Je cherche à multiplier le caractère Chr(160), c'est à dire "Espace" dans
une expression VBA, genre:
="Titi" suivi de n fois le caractère Chr(160) & "Toto"
n résultant d'un calcul fait plus haut
et ... je n'ai pas su faire.
Merci d'avance pour votre aide.



Avatar
michdenis
Bonjour,

x = Application.Rept(Chr(160), N)




"AndréBdR" a écrit dans le message de groupe de discussion :
4b8e5e86$0$17888$
Je cherche à multiplier le caractère Chr(160), c'est à dire "Espace" dans une expression
VBA, genre:
="Titi" suivi de n fois le caractère Chr(160) & "Toto"
n résultant d'un calcul fait plus haut
et ... je n'ai pas su faire.
Merci d'avance pour votre aide.
Avatar
Jacky
Bonjour,

'-----------
n = 15
MsgBox "titi" & String(n, Chr(160)) & "toto"
'----------
--
Salutations
JJ


"AndréBdR" a écrit dans le message de news:
4b8e5e86$0$17888$
Je cherche à multiplier le caractère Chr(160), c'est à dire "Espace" dans une expression VBA, genre:
="Titi" suivi de n fois le caractère Chr(160) & "Toto"
n résultant d'un calcul fait plus haut
et ... je n'ai pas su faire.
Merci d'avance pour votre aide.



Avatar
FFO
Salut à toi

Utilises ces lignes

For i = 1 to n
Donnée = Donnée & Chr(160)
Next

Donnée = "Titi" & Donnée & "Toto"

Celà devrait faire

Dis moi !!!!!
Avatar
AndréBdR
Toujours aussi chouette ce Forum.
Merci à tous.
Comme le temps s'y prête (heuh ! ...), je vais opter pour le String, style Jacky.

"AndréBdR" a écrit dans le message de news:
4b8e5e86$0$17888$
Je cherche à multiplier le caractère Chr(160), c'est à dire "Espace" dans une expression VBA,
genre:
="Titi" suivi de n fois le caractère Chr(160) & "Toto"
n résultant d'un calcul fait plus haut
et ... je n'ai pas su faire.
Merci d'avance pour votre aide.