robpellan52
XLDnaute Nouveau
Bonjour
J'ai des données contenues dans un onglet ( nom de onglet est AUTO )et je veux copier par macro ces données vers un autre onglet ( nom de cet onget est DATABASE)
Code utilisé et qui ne fonctionne pas :
Sheets("Auto").Range("A4:I4").Select
Selection.Copy
Sheets("database").Select
Range("a1").End(xlDown).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Auto").Select
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Au moment de l'exécution de cette macro je recois un message d'erreur
Erreur d'exécution 1004
La méthode Select de la classe range a échoué
J'ai des données contenues dans un onglet ( nom de onglet est AUTO )et je veux copier par macro ces données vers un autre onglet ( nom de cet onget est DATABASE)
Code utilisé et qui ne fonctionne pas :
Sheets("Auto").Range("A4:I4").Select
Selection.Copy
Sheets("database").Select
Range("a1").End(xlDown).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Auto").Select
Range("A2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Au moment de l'exécution de cette macro je recois un message d'erreur
Erreur d'exécution 1004
La méthode Select de la classe range a échoué