Copier/coller entre différents fichier à sélectionner
c
Bonjour,
Je souhaite créer une macro qui va sélectionner des colonnes dans un fichier sélectionné via une boite de dialogue (variable other dans la macro) et les coller dans le fichier ouvert (variable nom).
Le message d'erreur suivant apparait :
Run-time error '9':
Subscript out of range
Auriez vous une idée d'où cela vient?
Sub OuvertureFichier()
Dim a As Variant, Nom As String
Application.ScreenUpdating = False
Nom = ActiveWorkbook.Name
other = Application.Dialogs(xlDialogOpen).Show
Sheets("test2").Select
Columns("I:K").Select
Selection.Copy
Application.ScreenUpdating = True
Workbooks(Nom).Activate
Sheets("Sheet2").Select
Range("A1").Select
Selection.Paste
End Sub
bonsoir,
vérifie le nom de tes feuilles "test2" et " sheet2"