Fonction entre (renvoi le texte entre 2 caractères définis)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 004 fois - Téléchargée 36 fois

Contenu du snippet

Fonction permettant de renvoyer le texte compris entre 2 caractères (Car1 et Car2) d'un texte (txt).
Exemple : Variable = Entre("The texte here", "h", "h")
Variable est donc égal a : "e texte "

Source / Exemple :


Public Function Entre(txt, Car1, Car2 As String) As String
Entre = Mid(txt, InStr(1, txt, Car1) + 1, InStr(InStr(1, txt, Car1) + 1, txt, Car2) - InStr(1, txt, Car1) - 1)
End Function

Conclusion :


Bon'prog a tous ;)

Http://ICIoBRa.Free.Fr
[C]oBRa

A voir également

Ajouter un commentaire

Commentaires

Messages postés
368
Date d'inscription
dimanche 24 juin 2001
Statut
Membre
Dernière intervention
7 décembre 2015

Salut, désolé je ne fais pu de VB, je peux te la faire en PHP si tu veux :) Demande sur le forum beaucoups de personnes pourront t'aider :) Bonne soirée salut q:o)
Messages postés
2
Date d'inscription
lundi 19 juin 2006
Statut
Membre
Dernière intervention
13 avril 2009

je suis interesser par cette fonction mais je ne sais pas comment l'utilisé.
merci de m'aider :)

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.