Effacer une partie du texte d'une variable String

Bonsoir la communauté,

Je me suis trouvé dans une situation ou il faudrait que je supprime une partie d'un texte affecté à une variable String, mais je ne sais pas quel opérateur utiliser, je ne connais que le "&" et le "+".

Voici un petit exemple :

Sub TEST1()

Dim Text As String
Text = "Bonjour"
Text = Text & " " & "All"               ' Donc Text = "Bonjour All"
' Là je voudrais rendre Text = "Bonjour" mais sans que je l'écrive de cette façon.
' Je voudrais que j'élimine le " All" d'une façon qui me permet d'éviter de citer le terme Bonjour.

Je vous remercie Infiniment.

Bonsoir,

Tu disposes de plusieurs possibilités :

Sub TEST1()
Dim Text As String
Dim l1 As Byte, l2 As Byte
    Text = "Bonjour"
    l1 = Len(Text)
    l2 = Len(" A11")

    Text = Text & " " & "All" ' Text = "Bonjour All"
    ' Je garde le texte initial car je connais sa longueur
    Text = Left(Text, l1)

    Text = Text & " " & "All" 'Text = "Bonjour All"
    ' Je garde le texte initial en supprimant le texte ajouté
    Text = Replace(Text, Right(Text, l2), "")

    Text = Text & " " & "All" 'Text = "Bonjour All"
    ' Je garde le texte initial en utilisant le séparateur "espace"
    Text = Split(Text, " ")(0)

End Sub

A+

C'est exactement ce que je cherchais, merci beaucoup