OVH Cloud OVH Cloud

Commandes Open et Opentext d'Excel 2000

7 réponses
Avatar
J. BARRETO
Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la solution à
cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci

7 réponses

Avatar
J. BARRETO
Complémebt d'information: le séparateur est le point-virgule ";".


Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la solution à
cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci


Avatar
J. BARRETO
Voici un exemple précis:
Public Sub ouvrir_fichier()
Workbooks.Open FileName:="c:test.csv"
End Sub

le contenu de test.csv:
perso1;1;100;
perso2;2;200;
perso3;3;300;
<eof>

"J. BARRETO" wrote:

Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la solution à
cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci


Avatar
Julien
J'ai déjà rencontré ce souci et je ne crois pas qu'il y ait de patch.

Si j'ai bonne mémoire le CSV s'ouvrait mais toute les données était en
colonne A. C'est ce qui t'arrive ?

J'utilisais alors la commande Données / Convertir avec les paramètres
Délimité et Point-virgule dans ma macro pour récupérer les données par
colonne.

Est-ce que cela répond à ton souci ?

Julien

"J. BARRETO" <J. a écrit dans le message
de news:
Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la solution
à
cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci


Avatar
J. BARRETO
Merci de ta réponse Julien.

L'exemple que j'ai donné est la plus simple expression du problème.
L'ouverture d'un fichier .csv se passe dans une macro pour traiter
automatiquement 5 fichiers en entrée et faire une sortie.

De quelle commande vba s'agit-il pour remplacer open?

"Julien" wrote:

J'ai déjà rencontré ce souci et je ne crois pas qu'il y ait de patch.

Si j'ai bonne mémoire le CSV s'ouvrait mais toute les données était en
colonne A. C'est ce qui t'arrive ?

J'utilisais alors la commande Données / Convertir avec les paramètres
Délimité et Point-virgule dans ma macro pour récupérer les données par
colonne.

Est-ce que cela répond à ton souci ?

Julien

"J. BARRETO" <J. a écrit dans le message
de news:
Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la solution
à
cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci







Avatar
michdenis
Bonjour Julien,

Essaie ceci :

'------------------------------------
Sub CSVOpener()
'd'après P. Penet, mpfe
Dim wb As Workbook, NomFich

With Application
NomFich = Application.GetOpenFilename("Fichiers texte,*.csv;*.txt")
If NomFich = False Then Exit Sub
Set wb = .Workbooks.Open(NomFich)
wb.Sheets(1).Columns(1).TextToColumns Range("A1"), , , False, , True
End With

End Sub
'------------------------------------


Salutations!


"J. BARRETO" a écrit dans le message de news:

Merci de ta réponse Julien.

L'exemple que j'ai donné est la plus simple expression du problème.
L'ouverture d'un fichier .csv se passe dans une macro pour traiter
automatiquement 5 fichiers en entrée et faire une sortie.

De quelle commande vba s'agit-il pour remplacer open?

"Julien" wrote:

J'ai déjà rencontré ce souci et je ne crois pas qu'il y ait de patch.

Si j'ai bonne mémoire le CSV s'ouvrait mais toute les données était en
colonne A. C'est ce qui t'arrive ?

J'utilisais alors la commande Données / Convertir avec les paramètres
Délimité et Point-virgule dans ma macro pour récupérer les données par
colonne.

Est-ce que cela répond à ton souci ?

Julien

"J. BARRETO" <J. a écrit dans le message
de news:
Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la solution
à
cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci







Avatar
J. BARRETO
Merci les gars!!!

Ca marche Denis. Il me reste à faire une fonction et remplacer les commandes
"open" dans mon code "vba excel 97" pour qu'il fonctionne sur "vba excel
2000".

Merci encore.
Bonne soirée.

"michdenis" wrote:

Bonjour Julien,

Essaie ceci :

'------------------------------------
Sub CSVOpener()
'd'après P. Penet, mpfe
Dim wb As Workbook, NomFich

With Application
NomFich = Application.GetOpenFilename("Fichiers texte,*.csv;*.txt")
If NomFich = False Then Exit Sub
Set wb = .Workbooks.Open(NomFich)
wb.Sheets(1).Columns(1).TextToColumns Range("A1"), , , False, , True
End With

End Sub
'------------------------------------


Salutations!


"J. BARRETO" a écrit dans le message de news:

Merci de ta réponse Julien.

L'exemple que j'ai donné est la plus simple expression du problème.
L'ouverture d'un fichier .csv se passe dans une macro pour traiter
automatiquement 5 fichiers en entrée et faire une sortie.

De quelle commande vba s'agit-il pour remplacer open?

"Julien" wrote:

J'ai déjà rencontré ce souci et je ne crois pas qu'il y ait de patch.

Si j'ai bonne mémoire le CSV s'ouvrait mais toute les données était en
colonne A. C'est ce qui t'arrive ?

J'utilisais alors la commande Données / Convertir avec les paramètres
Délimité et Point-virgule dans ma macro pour récupérer les données par
colonne.

Est-ce que cela répond à ton souci ?

Julien

"J. BARRETO" <J. a écrit dans le message
de news:
Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la solution
à
cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci












Avatar
Clément Marcotte
Bonjour,

Juste à ne pas passer par les commandes d'Excel:

http://groups.google.com/groups?hl=fr&lr=&c2coff=1&selm=eRKOFgAoEHA.2304%40TK2MSFTNGP14.phx.gbl&rnum=6



"J. BARRETO" <J. a écrit dans le
message de news:
Bonjour,

dans excel2000, les comandes vba "open" et "opentext" n'ouvrent pas
correctement un fichier .csv (colonnes séparées): quelles est la
solution à

cette regression majeur d'Excel 2000? existent-ils des solutions de
contournement? un patch?

d'avance merci