Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Access Dllokup ou autre chose ?

Dllokup ou autre chose ?

3 réponses
Avatar
Bruno Frisque
Bonsoir le Groupe,

C'est simple mais difficile ?
Ai un champ Field1 'Rue de l'Hôtel-de-Ville%av.rue'

Je cherche à splitter ce champ en ajoutant ce qui suit le %, avec une
remarque.

Pour arriver à :
''Rue de l'Hôtel-de-Ville" & "anciennement" & 'av.rue'.

Donc il faudrait quelque chose comme (en Français dans le texte sic..)
- Il y a un "%" dans ce Field1 ?
If oui : à quelle position ?
Then MonNewField = Right(Field1 'avant le %') & ce qui suit , moins le
caractère %.
En XLS ca se fait avec COUNTIF ... mais ici on est en VBA.

Suis pas sûr d'être clair, mais avec des Pro's comme vous ...

D'avance garnd merci.

BF
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Gilbert
Bonjour,

Essaie avec
str = "Rue de l'Hôtel-de-Ville%av.rue"
position = InStr(1, str, "%")
str = Left(str, position - 1) & " anciennement " & Mid(str, position + 1)


--
Cordialement,

Gilbert


"Bruno Frisque" a écrit dans le message de
news:
Bonsoir le Groupe,

C'est simple mais difficile ?
Ai un champ Field1 'Rue de l'Hôtel-de-Ville%av.rue'

Je cherche à splitter ce champ en ajoutant ce qui suit le %, avec une
remarque.

Pour arriver à :
''Rue de l'Hôtel-de-Ville" & "anciennement" & 'av.rue'.

Donc il faudrait quelque chose comme (en Français dans le texte sic..)
- Il y a un "%" dans ce Field1 ?
If oui : à quelle position ?
Then MonNewField = Right(Field1 'avant le %') & ce qui suit , moins le
caractère %.
En XLS ca se fait avec COUNTIF ... mais ici on est en VBA.

Suis pas sûr d'être clair, mais avec des Pro's comme vous ...

D'avance garnd merci.

BF





Avatar
Bruno Frisque
MERCI!!

Je vais vite essayer ça.

Encore merci !

"Gilbert" wrote in message
news:
Bonjour,

Essaie avec
str = "Rue de l'Hôtel-de-Ville%av.rue"
position = InStr(1, str, "%")
str = Left(str, position - 1) & " anciennement " & Mid(str, position + 1)


--
Cordialement,

Gilbert


"Bruno Frisque" a écrit dans le message de
news:
Bonsoir le Groupe,

C'est simple mais difficile ?
Ai un champ Field1 'Rue de l'Hôtel-de-Ville%av.rue'

Je cherche à splitter ce champ en ajoutant ce qui suit le %, avec une
remarque.

Pour arriver à :
''Rue de l'Hôtel-de-Ville" & "anciennement" & 'av.rue'.

Donc il faudrait quelque chose comme (en Français dans le texte sic..)
- Il y a un "%" dans ce Field1 ?
If oui : à quelle position ?
Then MonNewField = Right(Field1 'avant le %') & ce qui suit , moins
le
caractère %.
En XLS ca se fait avec COUNTIF ... mais ici on est en VBA.

Suis pas sûr d'être clair, mais avec des Pro's comme vous ...

D'avance garnd merci.

BF










Avatar
Bruno Frisque
Et c'est parfaitement OK !

Encore merci.


"Bruno Frisque" wrote in message
news:%
MERCI!!

Je vais vite essayer ça.

Encore merci !

"Gilbert" wrote in message
news:
Bonjour,

Essaie avec
str = "Rue de l'Hôtel-de-Ville%av.rue"
position = InStr(1, str, "%")
str = Left(str, position - 1) & " anciennement " & Mid(str, position + 1)


--
Cordialement,

Gilbert


"Bruno Frisque" a écrit dans le message de
news:
Bonsoir le Groupe,

C'est simple mais difficile ?
Ai un champ Field1 'Rue de l'Hôtel-de-Ville%av.rue'

Je cherche à splitter ce champ en ajoutant ce qui suit le %, avec une
remarque.

Pour arriver à :
''Rue de l'Hôtel-de-Ville" & "anciennement" & 'av.rue'.

Donc il faudrait quelque chose comme (en Français dans le texte sic..)
- Il y a un "%" dans ce Field1 ?
If oui : à quelle position ?
Then MonNewField = Right(Field1 'avant le %') & ce qui suit , moins
le
caractère %.
En XLS ca se fait avec COUNTIF ... mais ici on est en VBA.

Suis pas sûr d'être clair, mais avec des Pro's comme vous ...

D'avance garnd merci.

BF