Discussion :

[kenny49]

Bonjour,

je réalise une macro excel et j'ai des soucis avec 2 lignes de code dans une meme sub:

Code :

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

writeFile(chemin, fileCmd)

là il me dit ' Compile error.
Expected: ='
et ma deuxième erreur se situe dans l'appel de la fonction deleteFile(file) dont voici le code:

Code :

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

1
2
3
4
5
Sub deleteFile(aFile)
If dir(aFile, vbHidden) <> "C:\TEMP" Then 'ici il me dit : Compile error: expected array
   Kill aFile
End If
End Sub

Code :

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

1
2
3
4
5
6
7
8
 
Sub writeFile(ByVal content As String, ByVal aFile As String)
Dim F As Integer
F = FreeFile '1er numéro libre
Open aFile For Append As #F 'ouvert en ajout
Print #F, content ' écrit dans le fichier dont le numéro est F
Close #F
End Sub

[kenny49]

problème résolu pour dir.

Vous avez des idées pour l'autre problème (le writeFile).
Si vous estimez qu'il manque des infos, n'hésitez pas a prévenir.

[ouskel'n'or]

Tu as quoi dans chemin et fileCmd ?

[dadavyvy]

La syntaxe est pour l'appel d'une procedure s'il y a plusieurs paramètres :

Code :

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

Call writeFile(chemin, fileCmd)

[ouskel'n'or]

J'avais même pas vu
Soit tu utilises Call ainsi que te l'a mis dadavyvy, soit tu ne l'utilises pas, auquel cas, pour appeler une sub, c'est

Code :

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

writeFile chemin, fileCmd

Juste pour ajouter mon grain de sel