A
Antoine
Guest
Bonjour,
je suis actuellement en train de réaliser une procédure en VBA pour Excel, dont le but est de récupérer des données d'un autre classeur dont le nom et le chemin sont définis dans des cellules du classeur courant.
Apprenant le VBA pour l'occasion, j'ai étudié un exemple de code pour copier/coller des données d'un classeur à un autre. Voila le code proposé :
ThisWorkbook.Activate
Sheets("Sheet1").Select
Range("A1").Select
Selection.CurrentRegion.ClearContents
Workbooks.Open "workbook2.xls"
Sheets("Sheets1").Select
Range("A1").CurrentRegion.Select
Selection.Copy
ThisWorkbook.Activate
Sheets("Sheet1").Select
Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode=False
Je mets Sub Testcopy avant la première ligne, et je termine bien la procédure par End Sub. Mon problème c'est que j'ai un message d'erreur "basic runtime error : variable object not set" qui semble concerner la ligne "ThisWorkbook.Activate" (juste après la déclaration de la procédure).
Si vous pouvez m'aider, je vous en serait vraiment enormément reconnaissant.
Merci d'avance pour votre réponse.
--
Antoine
je suis actuellement en train de réaliser une procédure en VBA pour Excel, dont le but est de récupérer des données d'un autre classeur dont le nom et le chemin sont définis dans des cellules du classeur courant.
Apprenant le VBA pour l'occasion, j'ai étudié un exemple de code pour copier/coller des données d'un classeur à un autre. Voila le code proposé :
ThisWorkbook.Activate
Sheets("Sheet1").Select
Range("A1").Select
Selection.CurrentRegion.ClearContents
Workbooks.Open "workbook2.xls"
Sheets("Sheets1").Select
Range("A1").CurrentRegion.Select
Selection.Copy
ThisWorkbook.Activate
Sheets("Sheet1").Select
Range("A1").Select
ActiveSheet.Paste
Application.CutCopyMode=False
Je mets Sub Testcopy avant la première ligne, et je termine bien la procédure par End Sub. Mon problème c'est que j'ai un message d'erreur "basic runtime error : variable object not set" qui semble concerner la ligne "ThisWorkbook.Activate" (juste après la déclaration de la procédure).
Si vous pouvez m'aider, je vous en serait vraiment enormément reconnaissant.
Merci d'avance pour votre réponse.
--
Antoine