Bouton de trie sur une feuille différentes

[petergab94]

Bonjour j'essaie de modifier ce petit code VBA qui fonctionne quand le bouton de trie est placé sur la feuille, mais je voudrais le mettre sur une feuille de synthése (donc differentes des données).

code :
Private Sub CommandButton1_Click()
Range("A8").Select
Range("A8:O22").Sort Key1:=Range("O8"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub


je me doute qu'il faut ajouter worksheets("Synthése") mais ou et comment ..mystére !! help please !!!

 

[mromain]

Re : Bouton de trie sur une feuille différentes

bonjour petergab94,

essaye avec ce code :

Private Sub CommandButton1_Click()
[COLOR=Red][B]With Worksheets("Synthése")[/B][/COLOR]
    [B][COLOR=Red].[/COLOR][/B]Range("A8:O22").Sort Key1:=[B][COLOR=Red].[/COLOR][/B]Range("O8"), Order1:=xlDescending, Header:=xlGuess, _
    OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
[COLOR=Red][B]End With[/B][/COLOR]
End Sub

a+

 

[petergab94]

Re : Bouton de trie sur une feuille différentes

Merci de ta réponse rapide , mais cela ne fonctionne pas .....

une autre idée ?

 

[mromain]

Re : Bouton de trie sur une feuille différentes

Merci de ta réponse rapide , mais cela ne fonctionne pas .....

une autre idée ?

Chez moi ça fonctionne.
La plupart du temps, le code que je poste est testé (sinon, je le précise).

a+

 

[petergab94]

Re : Bouton de trie sur une feuille différentes

Mille excuse .... j'avais une jolie faute de frappe ....

SA Fonctionne !!!
encore merci ... trop sympa .