Réduction d'un string en VBA

Résolu
Bonjour tout le monde !

Savez-vous comment je pourrais supprimer les 6 premiers et les 7 derniers caractères d'une chaine de caractère en VBA ?

D'avance un grand merci.

3 réponses

  1. Contributeur
    Bonjour

    Function extrairetexte(texto As String, debut As Byte, fin As Byte) As String
        'debut: nbre de caractère a supprimer à gauche, fin: nbre à droite
        extrairetexte = Mid(texto, 7, Len(texto) - (debut + fin))
    End Function
    
    Sub test()
        MsgBox extrairetexte("aaaaaabbbbbccccccc", 6, 7)
    End Sub


    1. Hello vous deux,

      Merci beaucoup pour vos réponses, ça marche nickel !!