bonjour tout le monde
Ce que j'ai :
des noms qui sont variables le seul point de reference que j'ai pour
separer ces champs c'est le tirer de la touche 6 du clavier
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
malabar
Merci Arnaud pour ton aide apporter au fil de mes questions et au membre de ce forum amicalement francisco <Anor> a écrit dans le message de news:
Bonjour
tu peux faire une petite fonction vba
Function ExtractChamp(StrTexte As String, NoChamp As Integer) As Variant On Error Resume Next ExtractChamp = Split(StrTexte, "-")(NoChamp) End Function
que tu appelles depuis ta requête :
SELECT ExtractChamp([LeChampTexte],0) AS Champ1, ExtractChamp([LeChampTexte],1) AS Champ2, ExtractChamp([LeChampTexte],2) AS
Champ3
FROM LaTable;
a+ -- Arnaud --------------------------------------------- infos, conseils et liens : http://www.mpfa.info ---------------------------------------------
"malabar" a écrit dans le message de news: 44703c93$0$20142$
bonjour tout le monde Ce que j'ai : des noms qui sont variables le seul point de reference que j'ai pour separer ces champs c'est le tirer de la touche 6 du clavier
Champs 1 Champs 2 Champs 3 Déstination Interlocuteur NomDe fichier SAL francisco xxx.xls YYZ myriam zzzzzzzzz.xls
Merci pour vos reponses Amicalement Francisco
Merci Arnaud pour ton aide apporter au fil de mes questions et au membre de
ce forum
amicalement francisco
<Anor> a écrit dans le message de news:
eLjQoEMfGHA.3468@TK2MSFTNGP03.phx.gbl...
Bonjour
tu peux faire une petite fonction vba
Function ExtractChamp(StrTexte As String, NoChamp As Integer) As Variant
On Error Resume Next
ExtractChamp = Split(StrTexte, "-")(NoChamp)
End Function
que tu appelles depuis ta requête :
SELECT ExtractChamp([LeChampTexte],0) AS Champ1,
ExtractChamp([LeChampTexte],1) AS Champ2, ExtractChamp([LeChampTexte],2) AS
Champ3
FROM LaTable;
a+
--
Arnaud
---------------------------------------------
infos, conseils et liens : http://www.mpfa.info
---------------------------------------------
"malabar" <francisco.peleicano-vasco@wanadoo.fr> a écrit dans le message
de news: 44703c93$0$20142$8fcfb975@news.wanadoo.fr...
bonjour tout le monde
Ce que j'ai :
des noms qui sont variables le seul point de reference que j'ai pour
separer ces champs c'est le tirer de la touche 6 du clavier
Merci Arnaud pour ton aide apporter au fil de mes questions et au membre de ce forum amicalement francisco <Anor> a écrit dans le message de news:
Bonjour
tu peux faire une petite fonction vba
Function ExtractChamp(StrTexte As String, NoChamp As Integer) As Variant On Error Resume Next ExtractChamp = Split(StrTexte, "-")(NoChamp) End Function
que tu appelles depuis ta requête :
SELECT ExtractChamp([LeChampTexte],0) AS Champ1, ExtractChamp([LeChampTexte],1) AS Champ2, ExtractChamp([LeChampTexte],2) AS
Champ3
FROM LaTable;
a+ -- Arnaud --------------------------------------------- infos, conseils et liens : http://www.mpfa.info ---------------------------------------------
"malabar" a écrit dans le message de news: 44703c93$0$20142$
bonjour tout le monde Ce que j'ai : des noms qui sont variables le seul point de reference que j'ai pour separer ces champs c'est le tirer de la touche 6 du clavier
Champs 1 Champs 2 Champs 3 Déstination Interlocuteur NomDe fichier SAL francisco xxx.xls YYZ myriam zzzzzzzzz.xls
Merci pour vos reponses Amicalement Francisco
Bonjour
tu peux faire une petite fonction vba
Function ExtractChamp(StrTexte As String, NoChamp As Integer) As Variant On Error Resume Next ExtractChamp = Split(StrTexte, "-")(NoChamp) End Function
que tu appelles depuis ta requête :
SELECT ExtractChamp([LeChampTexte],0) AS Champ1, ExtractChamp([LeChampTexte],1) AS Champ2, ExtractChamp([LeChampTexte],2) AS Champ3 FROM LaTable;
a+ -- Arnaud --------------------------------------------- infos, conseils et liens : http://www.mpfa.info ---------------------------------------------
"malabar" a écrit dans le message de news: 44703c93$0$20142$
bonjour tout le monde Ce que j'ai : des noms qui sont variables le seul point de reference que j'ai pour separer ces champs c'est le tirer de la touche 6 du clavier
Champs 1 Champs 2 Champs 3 Déstination Interlocuteur NomDe fichier SAL francisco xxx.xls YYZ myriam zzzzzzzzz.xls
Merci pour vos reponses Amicalement Francisco
Bonjour
tu peux faire une petite fonction vba
Function ExtractChamp(StrTexte As String, NoChamp As Integer) As Variant
On Error Resume Next
ExtractChamp = Split(StrTexte, "-")(NoChamp)
End Function
que tu appelles depuis ta requête :
SELECT ExtractChamp([LeChampTexte],0) AS Champ1, ExtractChamp([LeChampTexte],1) AS Champ2, ExtractChamp([LeChampTexte],2) AS Champ3
FROM LaTable;
a+
--
Arnaud
---------------------------------------------
infos, conseils et liens : http://www.mpfa.info
---------------------------------------------
"malabar" <francisco.peleicano-vasco@wanadoo.fr> a écrit dans le message de news: 44703c93$0$20142$8fcfb975@news.wanadoo.fr...
bonjour tout le monde
Ce que j'ai :
des noms qui sont variables le seul point de reference que j'ai pour
separer ces champs c'est le tirer de la touche 6 du clavier
Function ExtractChamp(StrTexte As String, NoChamp As Integer) As Variant On Error Resume Next ExtractChamp = Split(StrTexte, "-")(NoChamp) End Function
que tu appelles depuis ta requête :
SELECT ExtractChamp([LeChampTexte],0) AS Champ1, ExtractChamp([LeChampTexte],1) AS Champ2, ExtractChamp([LeChampTexte],2) AS Champ3 FROM LaTable;
a+ -- Arnaud --------------------------------------------- infos, conseils et liens : http://www.mpfa.info ---------------------------------------------
"malabar" a écrit dans le message de news: 44703c93$0$20142$
bonjour tout le monde Ce que j'ai : des noms qui sont variables le seul point de reference que j'ai pour separer ces champs c'est le tirer de la touche 6 du clavier