Réduction d'un string en VBA

Résolu/Fermé
Martin - Modifié par Martin le 29/12/2010 à 11:07
 Martin - 29 déc. 2010 à 15:39
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

Nabla's Messages postés 18203 Date d'inscription mercredi 4 juin 2008 Statut Contributeur Dernière intervention 28 avril 2014 3 192
29 déc. 2010 à 11:22
T'as raison, un string, plus c'est petit, plus c'est mignon ....
=====>[]

https://www.techonthenet.com/access/functions/string/mid.php
=> pour sélectionner une partie de la chaine.

len(ton_string)
pour connaitre sa taille ...

==>
un truc comme
mid(ton_string, 7, len(ton_strin) - 7 - 7)
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
29 déc. 2010 à 15:24
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


0
Hello vous deux,

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