Bonjour à tous,
Je vous expose mon problème.
Dans mon classeur actif, je dois récupérer les données d'une feuille d'un autre fichier dont le nom changera tous les jours. Une fois que la copie est effectuée, je souhaite que le fichier dont les données ont été extraites se ferment automatiquement.
J'ai écrit le code suivant :
Mais il me renvoie une erreur et je ne trouve pas la solution.
Pouvez-vous m'aider ?
Merci d'avance.
Je vous expose mon problème.
Dans mon classeur actif, je dois récupérer les données d'une feuille d'un autre fichier dont le nom changera tous les jours. Une fois que la copie est effectuée, je souhaite que le fichier dont les données ont été extraites se ferment automatiquement.
J'ai écrit le code suivant :
Code:
Sub CommandButton1_Click()
Choix_de_la_date
Workbooks.Open "C:\Users\Frédérick\Desktop\" & Feuil2.Range("A1").Value & ".xls"
Cells.Select
Selection.Copy
Windows("Classeur1.xlsm").Activate
Cells.Select
ActiveSheet.Paste
Workbooks("C:\Users\Frédérick\Desktop\" & Feuil2.Range("A1").Value & ".xls").Activate
Workbooks("C:\Users\Frédérick\Desktop\" & Feuil2.Range("A1").Value & ".xls").Close
End Sub
Mais il me renvoie une erreur et je ne trouve pas la solution.
Pouvez-vous m'aider ?
Merci d'avance.
Dernière édition: