www.KarlMarx.com
XLDnaute Junior
Bonjour à tous,
voici ce qu'Excel m'affiche quand j'exécute ma macro :
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 14-05-2008 par er52011
'
Sheets("Réalisé M").Select
Rows("1:1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=4, Criteria1:="<>"
ActiveWindow.SmallScroll ToRight:=12
Selection.AutoFilter Field:=19, Criteria1:="<>"
ActiveWindow.ScrollColumn = 1
Range("A2:E2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Variations commandes").Select
Range("A2").Select
ActiveSheet.Paste
Range("C10").Select
End Sub
Il me dit qu'il y a un problème à ce niveau là.
J'ai créé cette macro manuelement.
Pouvez-vous m'aider ?
KM
voici ce qu'Excel m'affiche quand j'exécute ma macro :
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 14-05-2008 par er52011
'
Sheets("Réalisé M").Select
Rows("1:1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=4, Criteria1:="<>"
ActiveWindow.SmallScroll ToRight:=12
Selection.AutoFilter Field:=19, Criteria1:="<>"
ActiveWindow.ScrollColumn = 1
Range("A2:E2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Variations commandes").Select
Range("A2").Select
ActiveSheet.Paste
Range("C10").Select
End Sub
Il me dit qu'il y a un problème à ce niveau là.
J'ai créé cette macro manuelement.
Pouvez-vous m'aider ?
KM