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

Conserver le format texte -> fichier ouvert avec commande VBA

1 réponse
Avatar
RR
Bonjour (ou Bonsoir),

J'ai un fichier csv qui contient diverses valeurs dont des éléments
constitant un code. Dans l'exemple qui suit, je voudrais que les valeurs de
la 3ième coloone conserve le format 02 dans excel. De même, je voudrais que
la valeur de la 9ième colonne (première ligne sous l'entête) s'affiche 000.
Par exemple:

"Création";"ID";"Groupe";"Fonction";"Activité";"Sous-activité";"Centre
d'activité";"Nature objet";"Objet";"Compte";"Description"
"2005-11-24";"1";"02";"8";"3";"0";"0283000";"0";"000";"02-830-00-000";"Description
1";
"2005-11-24";"1";"02";"8";"4";"0";"0284000";"0";"000";"02-840-00-000";"Description
2";
"2005-11-24";"1";"02";"1";"1";"1";"0211100";"1";"111";"02-111-00-111";"Description
3";

Actuellement, j'ouvre le fichier avec VBA :
Workbooks.OpenText Filename:=Dossier, Origin:=xlWindows, Semicolon:=True

Le résultat donne ceci:
2005-11-24 | 1 | 2 | 8 | 3 | 0 | 283000 | 0 | 0 | 02-830-00-000 |
Description 1
alors que je voudrais ceci:
2005-11-24 | 1 | 02 | 8 | 3 | 0 | 0283000 | 0 | 000 | 02-830-00-000 |
Description 1

Attention! je ne sais jamais à l'avance avant de l'ouvrir le nombre de
colonnes ni l'ordre dans lequel elles se trouvent.

Toutes suggestions est le bienvenue.

Merci à l'avance.

René

1 réponse

Avatar
René Roy
Rebonjour,

Je prend la chance de reformuler ma question autrement:

Y a-t'il un moyen d'ouvrir un fichier texte déliminité dans excel via vba de
façon à ce que chaque colonne conserve le format texte, et ce, en ne sachant
pas à l'avance le nombre et l'ordre des colonnes?

Je sais qu'on peut utliser l'option FieldInfo mais je crois qu'il faut
connaître à l'avance le nombre de colonnes pour utiliser cette option?

Merci de m'aider.

René


Bonjour (ou Bonsoir),

J'ai un fichier csv qui contient diverses valeurs dont des éléments
constitant un code. Dans l'exemple qui suit, je voudrais que les valeurs de
la 3ième coloone conserve le format 02 dans excel. De même, je voudrais que
la valeur de la 9ième colonne (première ligne sous l'entête) s'affiche 000.
Par exemple:

"Création";"ID";"Groupe";"Fonction";"Activité";"Sous-activité";"Centre
d'activité";"Nature objet";"Objet";"Compte";"Description"
"2005-11-24";"1";"02";"8";"3";"0";"0283000";"0";"000";"02-830-00-000";"Description
1";
"2005-11-24";"1";"02";"8";"4";"0";"0284000";"0";"000";"02-840-00-000";"Description
2";
"2005-11-24";"1";"02";"1";"1";"1";"0211100";"1";"111";"02-111-00-111";"Description
3";

Actuellement, j'ouvre le fichier avec VBA :
Workbooks.OpenText Filename:=Dossier, Origin:=xlWindows, Semicolon:=True

Le résultat donne ceci:
2005-11-24 | 1 | 2 | 8 | 3 | 0 | 283000 | 0 | 0 | 02-830-00-000 |
Description 1
alors que je voudrais ceci:
2005-11-24 | 1 | 02 | 8 | 3 | 0 | 0283000 | 0 | 000 | 02-830-00-000 |
Description 1

Attention! je ne sais jamais à l'avance avant de l'ouvrir le nombre de
colonnes ni l'ordre dans lequel elles se trouvent.

Toutes suggestions est le bienvenue.

Merci à l'avance.

René