Helas cela ne fonctionne pas. J'ai le message suivant de VBA "Erreur d'exécution "9" , L'indice n'appartient pas à la sélection ''
Voici la macro que j'utilise présentement:
' copyall Macro
' Macro enregistrée le 2006-02-26 par Michel
'
Sheets("transition" ).Select ' on choisit la feuille "transition"
Range("A2:F2" ).Select 'on select les cellules A2 à F2
Range("F2" ).Activate
Selection.Copy
Sheets("rapports" ).Select
Range("a2:F2" ).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, transpose:=False
Application.CutCopyMode = False
Selection.Sort Key1:=Range("C3" ), Order1:=xlDescending, Key2:=Range("B3" ) _
, Order2:=xlDescending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
Range("A9" ).Select '// Ici il faut trouver la formule pour placer curseur à première ligne vide
'// pour de nouvelles données (cumuler les données)
'
End Sub
Si tu as d'autres idées cela pourrait m'aider
Merci beaucoup