Bonjour à tous,
J'utilise cette formule dans VBA pour un tri automatique
Private Sub Worksheet_Change(ByVal Target As Range)
Range("R3:r65536").Sort Key1:=Range("R3"), Order1:=xlAscending, Header:=xlNo
Range("T3:t65536").Sort Key1:=Range("T3"), Order1:=xlAscending, Header:=xlNo
End Sub
Comme ce fichier est partagé avec mes collègues de travail,
J'ai opter pour l'option protection avec mot de passe.
Mais voila ce qui me dit quand je tape un nom
Erreur d'exécution "1004"
La méthode Sort de la classe Range a échoué :
Auriez vous une solution à me proposer
Merci d'avance
Par contre je ne voudrais pas que mon mot de passe soit dans le VBA
Marcelio
J'utilise cette formule dans VBA pour un tri automatique
Private Sub Worksheet_Change(ByVal Target As Range)
Range("R3:r65536").Sort Key1:=Range("R3"), Order1:=xlAscending, Header:=xlNo
Range("T3:t65536").Sort Key1:=Range("T3"), Order1:=xlAscending, Header:=xlNo
End Sub
Comme ce fichier est partagé avec mes collègues de travail,
J'ai opter pour l'option protection avec mot de passe.
Mais voila ce qui me dit quand je tape un nom
Erreur d'exécution "1004"
La méthode Sort de la classe Range a échoué :
Auriez vous une solution à me proposer
Merci d'avance
Par contre je ne voudrais pas que mon mot de passe soit dans le VBA
Marcelio