J'ai toute une série de fichier texte que je veux ouvrir en excel
Ce qui sépare les champs est le caractère ";"
Lorsque j'ouvre le fichier texte, par défaut, il m'indique que le fichier
est "délimité"
L'affichage suivant me donne le choix des caractères qui délimitent les
champs.
Par défaut c'est le tabulateur
J'ajoute le point-virgule et je peux cliquer sur Terminer
Lorsque je refais l'opération avec mon deuxième fichier, je dois à nouveau
sélectionner le délimiteur ";"
Peut-on définir le délimiteur ";" par défaut de façon à ce qu'il soit
conservé par excel
Cela me permettrait dès de premier affichage de cliquer sur terminer
En pratique, j'en ai plusieurs centaines que je ne peux pas fusionner
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
isabelle
bonjour AG,
tu pourrais associer un racourci clavier à cette macro, note : de la deuxième à la dernière ligne ce n'est en fait qu'une seule commande. attention au retour à la ligne intempestif lors du recopiage. dans cette exemple j'ai ouvert un fichier Origin:=xlMSDOS c'est à adapter selon le fichier à ouvrir.
Sub Macro1() fichier = Application.GetOpenFilename Workbooks.OpenText Filename:=fichier, _ Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _ ConsecutiveDelimiter:úlse, Tab:=True, Semicolon:úlse, Comma:=True, _ Space:úlse, Other:=True, OtherChar:=";", FieldInfo:=Array(Array(1, 1)) End Sub
isabelle
J'ai toute une série de fichier texte que je veux ouvrir en excel Ce qui sépare les champs est le caractère ";" Lorsque j'ouvre le fichier texte, par défaut, il m'indique que le fichier est "délimité" L'affichage suivant me donne le choix des caractères qui délimitent les champs. Par défaut c'est le tabulateur J'ajoute le point-virgule et je peux cliquer sur Terminer Lorsque je refais l'opération avec mon deuxième fichier, je dois à nouveau sélectionner le délimiteur ";" Peut-on définir le délimiteur ";" par défaut de façon à ce qu'il soit conservé par excel Cela me permettrait dès de premier affichage de cliquer sur terminer En pratique, j'en ai plusieurs centaines que je ne peux pas fusionner
Merci
AG
bonjour AG,
tu pourrais associer un racourci clavier à cette macro,
note : de la deuxième à la dernière ligne ce n'est en fait qu'une seule
commande.
attention au retour à la ligne intempestif lors du recopiage.
dans cette exemple j'ai ouvert un fichier Origin:=xlMSDOS c'est à
adapter selon le fichier à ouvrir.
Sub Macro1()
fichier = Application.GetOpenFilename
Workbooks.OpenText Filename:=fichier, _
Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited,
TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:úlse, Tab:=True, Semicolon:úlse, Comma:=True, _
Space:úlse, Other:=True, OtherChar:=";", FieldInfo:=Array(Array(1, 1))
End Sub
isabelle
J'ai toute une série de fichier texte que je veux ouvrir en excel
Ce qui sépare les champs est le caractère ";"
Lorsque j'ouvre le fichier texte, par défaut, il m'indique que le fichier
est "délimité"
L'affichage suivant me donne le choix des caractères qui délimitent les
champs.
Par défaut c'est le tabulateur
J'ajoute le point-virgule et je peux cliquer sur Terminer
Lorsque je refais l'opération avec mon deuxième fichier, je dois à nouveau
sélectionner le délimiteur ";"
Peut-on définir le délimiteur ";" par défaut de façon à ce qu'il soit
conservé par excel
Cela me permettrait dès de premier affichage de cliquer sur terminer
En pratique, j'en ai plusieurs centaines que je ne peux pas fusionner
tu pourrais associer un racourci clavier à cette macro, note : de la deuxième à la dernière ligne ce n'est en fait qu'une seule commande. attention au retour à la ligne intempestif lors du recopiage. dans cette exemple j'ai ouvert un fichier Origin:=xlMSDOS c'est à adapter selon le fichier à ouvrir.
Sub Macro1() fichier = Application.GetOpenFilename Workbooks.OpenText Filename:=fichier, _ Origin:=xlMSDOS, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _ ConsecutiveDelimiter:úlse, Tab:=True, Semicolon:úlse, Comma:=True, _ Space:úlse, Other:=True, OtherChar:=";", FieldInfo:=Array(Array(1, 1)) End Sub
isabelle
J'ai toute une série de fichier texte que je veux ouvrir en excel Ce qui sépare les champs est le caractère ";" Lorsque j'ouvre le fichier texte, par défaut, il m'indique que le fichier est "délimité" L'affichage suivant me donne le choix des caractères qui délimitent les champs. Par défaut c'est le tabulateur J'ajoute le point-virgule et je peux cliquer sur Terminer Lorsque je refais l'opération avec mon deuxième fichier, je dois à nouveau sélectionner le délimiteur ";" Peut-on définir le délimiteur ";" par défaut de façon à ce qu'il soit conservé par excel Cela me permettrait dès de premier affichage de cliquer sur terminer En pratique, j'en ai plusieurs centaines que je ne peux pas fusionner
Merci
AG
Clément Marcotte
Bonjour,
Si tu ne veux pas être victime des hospices de chicanes entre VBA et les paramètres régionaux, tu peux t'inspirer des deux procédures que j'ai publiées un peu plus haut/plus bas.
"AG" a écrit dans le message de news:EQgUb.102966$
J'ai toute une série de fichier texte que je veux ouvrir en excel Ce qui sépare les champs est le caractère ";" Lorsque j'ouvre le fichier texte, par défaut, il m'indique que le fichier
est "délimité" L'affichage suivant me donne le choix des caractères qui délimitent les
champs. Par défaut c'est le tabulateur J'ajoute le point-virgule et je peux cliquer sur Terminer Lorsque je refais l'opération avec mon deuxième fichier, je dois à nouveau
sélectionner le délimiteur ";" Peut-on définir le délimiteur ";" par défaut de façon à ce qu'il soit
conservé par excel Cela me permettrait dès de premier affichage de cliquer sur terminer En pratique, j'en ai plusieurs centaines que je ne peux pas fusionner
Merci
AG
Bonjour,
Si tu ne veux pas être victime des hospices de chicanes entre VBA et
les paramètres régionaux, tu peux t'inspirer des deux procédures que
j'ai publiées un peu plus haut/plus bas.
"AG" <a@b.c> a écrit dans le message de
news:EQgUb.102966$d15.2300953@weber.videotron.net...
J'ai toute une série de fichier texte que je veux ouvrir en excel
Ce qui sépare les champs est le caractère ";"
Lorsque j'ouvre le fichier texte, par défaut, il m'indique que le
fichier
est "délimité"
L'affichage suivant me donne le choix des caractères qui délimitent
les
champs.
Par défaut c'est le tabulateur
J'ajoute le point-virgule et je peux cliquer sur Terminer
Lorsque je refais l'opération avec mon deuxième fichier, je dois à
nouveau
sélectionner le délimiteur ";"
Peut-on définir le délimiteur ";" par défaut de façon à ce qu'il
soit
conservé par excel
Cela me permettrait dès de premier affichage de cliquer sur terminer
En pratique, j'en ai plusieurs centaines que je ne peux pas
fusionner
Si tu ne veux pas être victime des hospices de chicanes entre VBA et les paramètres régionaux, tu peux t'inspirer des deux procédures que j'ai publiées un peu plus haut/plus bas.
"AG" a écrit dans le message de news:EQgUb.102966$
J'ai toute une série de fichier texte que je veux ouvrir en excel Ce qui sépare les champs est le caractère ";" Lorsque j'ouvre le fichier texte, par défaut, il m'indique que le fichier
est "délimité" L'affichage suivant me donne le choix des caractères qui délimitent les
champs. Par défaut c'est le tabulateur J'ajoute le point-virgule et je peux cliquer sur Terminer Lorsque je refais l'opération avec mon deuxième fichier, je dois à nouveau
sélectionner le délimiteur ";" Peut-on définir le délimiteur ";" par défaut de façon à ce qu'il soit
conservé par excel Cela me permettrait dès de premier affichage de cliquer sur terminer En pratique, j'en ai plusieurs centaines que je ne peux pas fusionner