pb macro

Le
Marc T
Bonjour,
j'ai cette macro qui fonctionne:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 9 And Target.Count = 1 Then
m = Target
[A2:Q1000].Sort Key1:=[H2], Key2:=[C2], Key3:=[D2]
[I:I].Find(What:=m, LookIn:=xlValues).Select
End If
End Sub

par contre dès que je rajoute un critère en respectant pourtant le
format , Key4:=[G2] ça bug !!!!
je comprends pas, merci de votre aide
MarcT
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
michdenis
Le #16707841
Lors d'un trie, excel ne permet pas d'utiliser plus de 3 critères
lorsque tu le fais directement dans la feuille de calcul...
c'est le même principe qui s'applique en VBA.

Un coup de 3 + un coup de 1

Le code te sera donné si tu fais les manoeuvres dans la feuille
en utilisant l'enregistreur de macro



"Marc T"
Bonjour,
j'ai cette macro qui fonctionne:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 9 And Target.Count = 1 Then
m = Target
[A2:Q1000].Sort Key1:=[H2], Key2:=[C2], Key3:=[D2]
[I:I].Find(What:=m, LookIn:=xlValues).Select
End If
End Sub

par contre dès que je rajoute un critère en respectant pourtant le
format , Key4:=[G2] ça bug !!!!
je comprends pas, merci de votre aide
MarcT
Marc T
Le #16715701
On 3 sep, 16:41, "michdenis"
Lors d'un trie, excel ne permet pas d'utiliser plus de 3 critères
lorsque tu le fais directement dans la feuille de calcul...
c'est le même principe qui s'applique en VBA.

Un coup de 3   + un coup de 1

Le code te sera donné si tu fais les manoeuvres dans la feuille
en utilisant l'enregistreur de macro

"Marc T"
Bonjour,
j'ai cette macro qui fonctionne:
Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Column = 9 And Target.Count = 1 Then
   m = Target
   [A2:Q1000].Sort Key1:=[H2], Key2:=[C2], Key3:=[D2]
   [I:I].Find(What:=m, LookIn:=xlValues).Select
 End If
End Sub

par contre dès que je rajoute un critère en respectant pourtant le
format , Key4:=[G2] ça bug !!!!
je comprends pas, merci de votre aide
MarcT



Bonjour,
merci de cette réponse qui de plus me permet en plus de devenir
autonome ...
Amicordialement
MarcT
Publicité
Poster une réponse
Anonyme