Discussion :

[Sécateur]

Bonjour,

J'ai une petite question toute bête mais qui me tracasse :

Quelqu'un peut-il me dire ce qui cloche dans la macro écrite avec Excel 2003 sous Windows XP ci-dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub test1()
    lerep = CurDir
    file1 = lerep & "\LoyersBruts1003.CSV"
    file2 = lerep & "\Foncier1003.CSV"
    file3 = lerep & "\complet1003.CSV"
    lacommande = "file1 + file2  file3"
    Shell "command.com /c copy" & lacommande
 
End Sub

Quand je la fais tourner, je n'ai pas de message d'erreur mais le fichier "complet1003.csv" est introuvable...

Si j'enlève le commutateur /c, dans la fenêtre d'invite de commandes, j'ai le message suivant :

Mauvais répertoire de recherche de COMMAND.COM
Format de paramètre incorrect
Trop de paramètres
Trop de paramètres

Merci pour votre aide.

Christian

[DeaD78]

Bonjour,

Que veux-tu avoir AU FINAL dans ta variable "lacommande " ? Que doit-elle donner ?

[Sécateur]

Merci pour la réponse rapide.

En fait je cherche à concatener deux fichiers csv en un. J'utilise pour cela la commande DOS copy file1 + file2 file3.

Mais ça marche pô !

A bientôt.

[aalex_38]

Déja est ce que Lerep est le bon repertoire ?

ensuite vérifie la commande que tu vas passer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub test1()
lerep = CurDir
file1 = lerep & "\LoyersBruts1003.CSV"
file2 = lerep & "\Foncier1003.CSV"
file3 = lerep & "\complet1003.CSV"
lacommande = "file1 + file2 file3"
msgbox  "command.com /c copy" & lacommande
 
End Sub

Vérifie que le code marche en direct dans la boite de commande

sans tout faire mais en regardant d'un peu plus près :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

lacommande = "file1 + file2 file3"

te donne pour la commande une chaine de caractères "file1 + file2 file3"
a mon avis c'est pas ça que tu veux.

De plus aucun espace entre copy et macommande

En fait je cherche à concatener deux fichiers csv en un. J'utilise pour cela la commande DOS copy file1 + file2 file3.

en fait je ne connais pas cette utilisation de la commande, ça marche ?

edit : ok ça existe

[Sécateur]

C'est vrai qu'il manque un espace !!

J'essaye tout de suite et reviens vers vous !

merci encore !

[Sécateur]

Non ! Rien à faire !

J'ai toujours des messages d'erreurs sous DOS.

lerep doit être le bon répertoire puisque je vais le chercher avec CurDir.

En fait, je suis sous ma partition d: et mon windows est sous c:. Cela peut-il avoir un effet ?

[Jean-Philippe André]

salut,
la concaténation que tu tentes n'est-elle pas un peu bancale ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

lacommande = file1 & " "  & file2 & " " & file3

serait déjà moins aléatoire

[aalex_38]

Je viens de faire le test sous dos pour que ça fonctionne tu dois avoir dans ta variable :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

copy "D:\...\1.csv" + "D:\AGR\VBA Excel\2.csv" "D:\..\3.csv"

[aalex_38]

LA but c'est déja que tu obtienne la bonne commande, montres nous ce que tu obtiens quand tu fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

msgbox  "command.com /c copy" & lacommande

En fait, je suis sous ma partition d: et mon windows est sous c:. Cela peut-il avoir un effet ?

Moi aussi et pas de soucis.

[Sécateur]

C'est ce que me donne la variable lerep

Au début du code j'ai :

lerep= CurDir

qui me donne le chemin complet des fichiers à concatener ...

Bizarre, n'est-ce-pas ?

Bien sûr ! Suis-je bête !!

si je mets de guillemets entre file1 + file2 file3, j'obtiens file1 + file2 file3

Merci de m'avoir ouvert les yeux !!!

Mais il faut encore que j'essaye ...

A tout de suite !