Fermeture de Fichier Excel (VBA)
Jiand
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
-
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention -
Bonjour j'ai une Macro sur un fichier A où je demande l'ouverture d'un fichier B faire des changement sur le fichier puis important les infos qui m'interesse sur le fichier qui contient la Macro ensuite Fermer le Fichier B (la ou ça marche pas)
Selon le script ci dessous :
Fich = Application.GetOpenFilename
Workbooks.Open Filename:=Fich
Cells.Select
Selection.Copy
SheetSource.Parent.Close savechanges:=False
Avez vous une idée ?
Selon le script ci dessous :
Fich = Application.GetOpenFilename
Workbooks.Open Filename:=Fich
Cells.Select
Selection.Copy
- Pour fermeture du fichier :
SheetSource.Parent.Close savechanges:=False
Avez vous une idée ?
A voir également:
- Fermer un fichier excel vba
- Fichier bin - Guide
- Comment réduire la taille d'un fichier - Guide
- Comment ouvrir un fichier epub ? - Guide
- Fichier rar - Guide
- Fichier .dat - Guide
1 réponse
Bonjour,
exemple de code:
exemple de code:
Sub TESTX()
Dim wb As Workbook, Fich As String
Fich = Application.GetOpenFilename(" Classeur Microsoft EXCEL (*.xls*), *.xls*", 2, "Ouverture Fichier ", False)
Set wb = Workbooks.Open(Filename:=Fich)
Cells.Select
Selection.Copy
'Pour fermeture du fichier :
wb.Close False
End Sub