Bonjour,
En voulant exécuter une macro je tombe sur le message d'erreur suivant :Le but étant de créer un fichier xlcsv de métadonnés à partir d'un tableau de donnéesErreur d'exécution '1004', la méthode Select de la classe Range a échoué
Voici le code lié à la macro :
Merci d'avance,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub Export_CSV() Sheets(8).Range(A & 3 & ":" & AZ & 8 - 1 + NumEchéancier * 3).Select Selection.Copy Workbooks.Add ActiveSheet.Paste Application.CutCopyMode = False Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:=s, FileFormat:=xlCSV, CreateBackup:=False ActiveWindow.Close Application.DisplayAlerts = True End Sub
Partager