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

Soyez le premier à donner votre avis sur cette source.

Snippet vu 2 949 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

deado
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 :)
ICIoBRa
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)

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.