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

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 302 fois - Téléchargée 38 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
ICIoBRa Messages postés 368 Date d'inscription dimanche 24 juin 2001 Statut Membre Dernière intervention 7 décembre 2015
14 avril 2009 à 17:27
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)
deado Messages postés 2 Date d'inscription lundi 19 juin 2006 Statut Membre Dernière intervention 13 avril 2009
13 avril 2009 à 20:40
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.