XL 2019 Traitement chaines de caractères vba

chris4785478547 · 2 Janvier 2021

Bonsoir le fil,

A nouveau, Bonne Année à tous.
Je connais la syntaxe pour tronquer une chaine de caractères par la gauche (par exemple) à savoir:

VB:

 Left ("année",2)

qui renvoie: an
Mais peut on donner une variable à la place de la chaine explicite ?
Merci

Jacky67 · 2 Janvier 2021

chris4785478547 à dit:
Bonsoir le fil,

A nouveau, Bonne Année à tous.
Je connais la syntaxe pour tronquer une chaine de caractères par la gauche (par exemple) à savoir:

VB:

Left ("année",2)

qui renvoie: an
Mais peut on donner une variable à la place de la chaine explicite ?
Merci

Bonjour,
Essaye

VB:

Sub test()
    Dim MaVariable$
    MaVariable = "année"
    MsgBox Left(MaVariable, 2)
End Sub

Bonne Année

Staple1600 · 2 Janvier 2021

Re

=>chris
J'ai rangé mon string (cf message#11)
Mais je me suis attardé dans VBE

VB:

Sub En_attendant_la_rentrée()
Dim vChaine$
vChaine = "chris4785478547"
MsgBox extraire(vChaine, 5)
MsgBox extraire(vChaine, 5, "D")
MsgBox extraire(vChaine, 8, "PapaWasARollingStone")
End Sub
Private Function extraire(chaine, vNB, Optional SENS = "G") As String
Dim tmp$
Select Case SENS
Case "G"
tmp = Left(chaine, vNB)
Case "D"
tmp = Right(chaine, vNB)
Case Else
tmp = Mid(chaine, 1, vNB)
End Select
extraire = tmp
End Function

Au delà de la blague, en théorie, ta curioisité VBAistique devrait te pousser à me poser des questions.

soan · 7 Janvier 2021

Bonjour @chris4785478547, Staple, le fil,

rappel de mon énigme :

« as-tu compris pourquoi j'ai utilisé aussi RTrim$() ? »

solution : c'est car ça prend les 2 premiers caractères !

* en A9 : "A conseiller pour les entreprises." ➯ "A " : « A » et 1 espace

* en A11 : "À l'écoute..." ➯ "À " : « À » et 1 espace

le RTrim$ sert à supprimer l'espace de droite qui est en trop !
(R de RTrim est pour Right = droite)

y'a aussi LTrim$ pour supprimer les espaces de gauche
(L de LTrim est pour Left = gauche)

si y'a besoin de supprimer les espaces de gauche ET
les espaces de droite, utiliser : Trim$

soan

XL 2019 Traitement chaines de caractères vba

chris4785478547

XLDnaute Junior

Jacky67

Staple1600

XLDnaute Barbatruc

soan

XLDnaute Barbatruc

Discussions similaires