Discussion :

[myocean]

J'ouvre un fichier CSV avec Excel, je le sauvegarde ensuite en XLS.
Je ferme l'Excel mais l'objet Excel reste en mémoire et du coup je ne peux plus supprimer le CSV (DeleteFile renvois une erreur 70 et on voit bien l'objet Excel qui reste en mémoire malgré le Nothing)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Set AppExcel = New Excel.Application
With AppExcel
    .Workbooks.Open NomFichierExportAvecCheminCSV, ReadOnly:=True, Delimiter:=";", Local:=True
    .Visible = False
End With
With AppExcel.Workbooks(NomFichierExportCSV).Worksheets(1).Cells
    .Rows("1:1").AutoFilter
    .EntireColumn.AutoFit
If TrierCroissant Then
    .Sort Key1:=.Range("A1"), Order1:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortTextAsNumbers
End If
End With
AppExcel.Workbooks(NomFichierExportCSV).Worksheets(1).Name = NomFeuille
AppExcel.Workbooks(NomFichierExportCSV).SaveAs Filename:=NomFichierExportAvecChemin, FileFormat:=xlExcel9795, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False, Local:=True
AppExcel.Workbooks(NomFichierExport).Close savechanges:=False
Set AppExcel = Nothing
' Plantage sur le DeleteFile 
FSO.DeleteFile (NomFichierExportAvecCheminCSV)

[Marc-L]

Comme déjà indiqué dans ta précédente discussion, il est vraiment tout à fait inutile d'ouvrir une autre instance d'Excel ‼

[myocean]

Oui peut-être, je ne connais pas la méthode sans le faire dans l'instance courante d'Excel, mais en tout cas il reste bien un soucis sur mon fichier CSV qui est encore en mémoire ...

[Marc-L]

La méthode reste la même : Workbooks.Open …

Sinon activer le Générateur de macros puis ouvrir le fichier, créer le filtre, etc …
Et hop ! Une nouvelle base de code est livrée sur un plateau !

[myocean]

Oui j'ai trouvé en cherchant 2 min

Mais mon problème reste le même qu'il reste un lien ouvert sur le fichier CVS qui a pourtant été sauvegardé en XLS qui m’empêche de le supprimer, ce lien est détruit lorsque la macro a fini de s’exécuter...

[Marc-L]

Sans voir le code … je dirais d'en changer et de ne pas utiliser les méthodes d'Excel mais le pur BASIC !

Voir l'exemple de l'instruction Line Input # dans l'aide VBA pour lire le fichier texte

à combiner avec la fonction Split pour séparer les données …

Ce que je ne comprends pas vu la précédente discussion est de partir d'un classeur Excel pour le transformer en fichier texte
pour ensuite re-transformer ce fichier texte en classeur ! Autant lire le classeur source directement …