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. Hello vous deux,

    Merci beaucoup pour vos réponses, ça marche nickel !!
    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