comment faire pour pouvoir utiliser la commande split sur une chaine de
caractère lu par Line input et dont les éléments sont 1) séparés par des espaces
2)les textes entre guillement
comme dans les 8 variables suivantes:
ex. 1212 "testing" "Bonjour" "j'ai de la misère, à faire cette conversion" 9876
"" "" "merci de votre aide"
'au plus simple ca donne ...
dim strLigne as string
dim arrLigne, i as variant
open MonFichier for input as #1
line input #1, strLigne
arrLigne=split(strLigne) ' quel est le bon délimiteur
for i=0 to 7
msgbox(arrLigne(i))
next i
close #1
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
Michel Walsh
Salut,
J'essaierais une importation par fichier: File | Get External Data... | Import ... { choisir le fichier, filtre: txt, csv, ... } Ne pas choisir une longueur fixe par champ mais un format délimité, choisir l'espace blanc comme délimiteur, " comme "Text Qualifier" ( un espace blanc à l'intérieur d'une paire de Text Qualifier n'est pas considéré comme séparateur de champ). Choisir l'option de dialogue avancé si requis. Pas de "code" à écrire, c'est déjà "écrit".
Espérant être utile, Vanderghast, Access MVP
"Ma Dalton" wrote in message news:
Bonjour,
comment faire pour pouvoir utiliser la commande split sur une chaine de caractère lu par Line input et dont les éléments sont 1) séparés par des espaces
2)les textes entre guillement
comme dans les 8 variables suivantes:
ex. 1212 "testing" "Bonjour" "j'ai de la misère, à faire cette conversion" 9876
"" "" "merci de votre aide"
'au plus simple ca donne ...
dim strLigne as string dim arrLigne, i as variant open MonFichier for input as #1 line input #1, strLigne arrLigne=split(strLigne) ' quel est le bon délimiteur for i=0 to 7 msgbox(arrLigne(i)) next i close #1
merci
Salut,
J'essaierais une importation par fichier: File | Get External Data... |
Import ... { choisir le fichier, filtre: txt, csv, ... } Ne pas choisir
une longueur fixe par champ mais un format délimité, choisir l'espace blanc
comme délimiteur, " comme "Text Qualifier" ( un espace blanc à
l'intérieur d'une paire de Text Qualifier n'est pas considéré comme
séparateur de champ). Choisir l'option de dialogue avancé si requis. Pas de
"code" à écrire, c'est déjà "écrit".
Espérant être utile,
Vanderghast, Access MVP
"Ma Dalton" <Rantanplan@farwest.net> wrote in message
news:ugNcbcH5DHA.2188@TK2MSFTNGP10.phx.gbl...
Bonjour,
comment faire pour pouvoir utiliser la commande split sur une chaine de
caractère lu par Line input et dont les éléments sont 1) séparés par des
espaces
2)les textes entre guillement
comme dans les 8 variables suivantes:
ex. 1212 "testing" "Bonjour" "j'ai de la misère, à faire cette
conversion" 9876
"" "" "merci de votre aide"
'au plus simple ca donne ...
dim strLigne as string
dim arrLigne, i as variant
open MonFichier for input as #1
line input #1, strLigne
arrLigne=split(strLigne) ' quel est le bon délimiteur
for i=0 to 7
msgbox(arrLigne(i))
next i
close #1
J'essaierais une importation par fichier: File | Get External Data... | Import ... { choisir le fichier, filtre: txt, csv, ... } Ne pas choisir une longueur fixe par champ mais un format délimité, choisir l'espace blanc comme délimiteur, " comme "Text Qualifier" ( un espace blanc à l'intérieur d'une paire de Text Qualifier n'est pas considéré comme séparateur de champ). Choisir l'option de dialogue avancé si requis. Pas de "code" à écrire, c'est déjà "écrit".
Espérant être utile, Vanderghast, Access MVP
"Ma Dalton" wrote in message news:
Bonjour,
comment faire pour pouvoir utiliser la commande split sur une chaine de caractère lu par Line input et dont les éléments sont 1) séparés par des espaces
2)les textes entre guillement
comme dans les 8 variables suivantes:
ex. 1212 "testing" "Bonjour" "j'ai de la misère, à faire cette conversion" 9876
"" "" "merci de votre aide"
'au plus simple ca donne ...
dim strLigne as string dim arrLigne, i as variant open MonFichier for input as #1 line input #1, strLigne arrLigne=split(strLigne) ' quel est le bon délimiteur for i=0 to 7 msgbox(arrLigne(i)) next i close #1