Discussion :

[mathieu44800]

Re,

OUtils>réferences, puis tu choisis dans la liste...

A+

[killysui]

Merci! J'ai réussi à le référencer.

Mais par contre, objFSO.FileExists(Chemin & "\" & NomFichier) = false alors qu'il devrait être = à true.
D'ailleur si j'enlève cette vérification j'arrive à ouvrir correctement le fichier avec

Code :

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

Set objWbk1 = app.Workbooks.Open(Chemin & "\" & NomFichEXCEL)

Aurais-tu une idée ?

Sinon comment enregistrer un fichier excel lors de la fermeture sans avoir un message demandant la confirmation d'écraser le fichier existant.

Voici comment je le fait :

Code :

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

    objWbk1.Close True, Chemin & "\" & NomFichEXCEL

Merci.

[ouskel'n'or]

Si ton fichier est déjà baptisé, cette syntaxe suffit

Code :

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

objWbk1.Close True

Si tu veux changer le nom ou le chemin, alors utilise Saveas

Code :

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

1
2
3
objWbk1.Saveas Chemin & "\" & NomFichEXCEL
DoEvents
objWbk1.Close false

[killysui]

Merci

[mathieu44800]

RE,

Pi être le ".csv" à la fin ?

A+

[killysui]

Non se n'est pas ça car le chemin est correte...

C'est pas grâve, je ne vais pas vérifier si les fichier Excel existent. C'était un plus qui évité d'avoir des erreurs.

Je vous remerci tous, car grace à vous j'ai pu faire un macro permettant l'importation les données d'un fichier .csv vers des fichier Excel.

MERCI ENCORE.