Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

rechercher un dans un champ

3 réponses
Avatar
Francois Legault
salut,

Est-ce Possible par VB ou autre, de rechercher a=20
l'int=E9rieur d'un champ ("photo" en occurence)

le caract=E8re "\" et de lui dire d'effacer tout ce qui ce=20
trouve devant et le \ aussi.

(le champ aparait dans une zone de texte, "photo", sur mon=20
formulaire.)

merci

Francois

3 réponses

Avatar
Raymond [mvp]
Bonjour.

tu peux utiliser:
Me.Photo= Mid(Me.Photo, InStr(1, Me.Photo, "") + 1)

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Francois Legault" a écrit dans le
message de news:1c16301c45214$5aa65410$
salut,

Est-ce Possible par VB ou autre, de rechercher a
l'intérieur d'un champ ("photo" en occurence)

le caractère "" et de lui dire d'effacer tout ce qui ce
trouve devant et le aussi.

(le champ aparait dans une zone de texte, "photo", sur mon
formulaire.)

merci

Francois
Avatar
Eric
"Francois Legault" écrivait
news:1c16301c45214$5aa65410$:

salut,

Est-ce Possible par VB ou autre, de rechercher a
l'intérieur d'un champ ("photo" en occurence)

le caractère "" et de lui dire d'effacer tout ce qui ce
trouve devant et le aussi.

(le champ aparait dans une zone de texte, "photo", sur mon
formulaire.)

merci

Francois



Bonjour François,

en VBA c'est possible comme avec une requête mise à jour
mais le problème est de savoir s'il y a un seul ou plusieurs dans ta
chaine.
Pour trouver la position du , tu peux utiliser la fonction en vba :
InStr() ou InStrRev s'il y en a plusieurs:

InStr :Renvoie une valeur de type Variant (Long) indiquant la position de
la première occurrence d'une chaîne à l'intérieur d'une autre chaîne.

InStrRev : Renvoie la position d'une occurrence d'une chaîne dans une
autre, à partir de la fin de la chaîne.

A partir de la valeur retournée par l'une ou l'autre des fonctions, tu ne
conserves que les caratères qui suivent à partir de cette position+1

Exemple:
chaine = "c:Toto"
resultat = Mid(chaine, InStr(1, chaine, "") + 1)----> Toto

chaine = "c:TotoTataTiti"
resultat = Mid(chaine, InStrRev(chaine, "") + 1)----> Titi

A+
Eric

Avatar
Francois Legault
merci!!

-----Message d'origine-----
Bonjour.

tu peux utiliser:
Me.Photo= Mid(Me.Photo, InStr(1, Me.Photo, "") + 1)

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Francois Legault"
a écrit dans le

message de news:1c16301c45214$5aa65410$
salut,

Est-ce Possible par VB ou autre, de rechercher a
l'intérieur d'un champ ("photo" en occurence)

le caractère "" et de lui dire d'effacer tout ce qui ce
trouve devant et le aussi.

(le champ aparait dans une zone de texte, "photo", sur mon
formulaire.)

merci

Francois


.