Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message de
news: uZ4ZdF3PFHA.3988@tk2msftngp13.phx.gbl...
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
, j'ai un beau message "Erreur 1004 : la méthode sort a échoué
à mon avis tu devrais peut-être t'assurer que tu te trouves bien dans la
...(ma variable Ordre vaut 2)..??!!
Normal, la valeur est une constante tranformée en 1 ou 2 selon qu'il s'agit
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
, j'ai un beau message "Erreur 1004 : la méthode sort a échoué
à mon avis tu devrais peut-être t'assurer que tu te trouves bien dans la
...(ma variable Ordre vaut 2)..??!!
Normal, la valeur est une constante tranformée en 1 ou 2 selon qu'il s'agit
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message de
news: uZ4ZdF3PFHA.3988@tk2msftngp13.phx.gbl...
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
, j'ai un beau message "Erreur 1004 : la méthode sort a échoué
à mon avis tu devrais peut-être t'assurer que tu te trouves bien dans la
...(ma variable Ordre vaut 2)..??!!
Normal, la valeur est une constante tranformée en 1 ou 2 selon qu'il s'agit
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message
de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message
de
news: uZ4ZdF3PFHA.3988@tk2msftngp13.phx.gbl...
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message
de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates
ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message de
news: uZ4ZdF3PFHA.3988@tk2msftngp13.phx.gbl...
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message de
news: uZ4ZdF3PFHA.3988@tk2msftngp13.phx.gbl...
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message de
news: uZ4ZdF3PFHA.3988@tk2msftngp13.phx.gbl...
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Merci pour cette prompte et claire réponse....Mais en fait, j'avais trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué ...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour Pierre,
Lorsque l'on ne connaît pas le nom de la constante qui identifie le groupe
de constantes auxquelles ont référent, utilises
l'explorateur d'objets, tu fais une recherche sur xlDescending et tu vas
obtenir dans la colonne de gauche, l'item approprié.
Salutations!
"Pierre Fauconnier" a écrit dans le
message de news: %
On peut aussi simplier un peu dans les if, en ne testant que la valeur
égale
à xlAscending.
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
Else
Ordre = xlAscending
End If
Ainsi, Ordre est initialisé à xlAscending à la première utilisation...
--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin (
proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci
"Thierry" a écrit dans le message de
news: eb%Merci pour cette prompte et claire réponse....Mais en fait, j'avais
trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance
la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué
...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message
de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour Pierre,
Lorsque l'on ne connaît pas le nom de la constante qui identifie le groupe
de constantes auxquelles ont référent, utilises
l'explorateur d'objets, tu fais une recherche sur xlDescending et tu vas
obtenir dans la colonne de gauche, l'item approprié.
Salutations!
"Pierre Fauconnier" <pierre.fauconnier@nospam.nospam> a écrit dans le
message de news: %23GtfPL5PFHA.1236@TK2MSFTNGP14.phx.gbl...
On peut aussi simplier un peu dans les if, en ne testant que la valeur
égale
à xlAscending.
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
Else
Ordre = xlAscending
End If
Ainsi, Ordre est initialisé à xlAscending à la première utilisation...
--
Pierre Fauconnier (pierre.fauconnier@nospam.nospam)
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin (
proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message de
news: eb%23kym3PFHA.1172@TK2MSFTNGP12.phx.gbl...
Merci pour cette prompte et claire réponse....Mais en fait, j'avais
trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance
la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué
...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!
Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" <petithory.thierry@club-internet.fr> a écrit dans le message
de
news: uZ4ZdF3PFHA.3988@tk2msftngp13.phx.gbl...
Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))
Bonjour Pierre,
Lorsque l'on ne connaît pas le nom de la constante qui identifie le groupe
de constantes auxquelles ont référent, utilises
l'explorateur d'objets, tu fais une recherche sur xlDescending et tu vas
obtenir dans la colonne de gauche, l'item approprié.
Salutations!
"Pierre Fauconnier" a écrit dans le
message de news: %
On peut aussi simplier un peu dans les if, en ne testant que la valeur
égale
à xlAscending.
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
Else
Ordre = xlAscending
End If
Ainsi, Ordre est initialisé à xlAscending à la première utilisation...
--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin (
proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci
"Thierry" a écrit dans le message de
news: eb%Merci pour cette prompte et claire réponse....Mais en fait, j'avais
trouvé
ce type dans la liste et mon anglais étant quasi parfait, j'avais cru
deviner que ca pouvait coller. MAIS, car il y a un mais, quand je lance
la
macro, j'ai un beau message "Erreur 1004 : la méthode sort a échoué
...(ma
variable Ordre vaut 2)..??!!
J'hésite entre brancher mon PC sur le 380 ou le jeter dans la baignoire
pleine !!Bonjour
Dim ordre As XlSortOrder
Cordialement
Pascal
"Thierry" a écrit dans le message
de
news:Bonjour tout le monde !
Les possibilités de VBA dépassant quelque peu les capacités des quelques
neurones qui me restent, et n'ayant pas envie de lire les 23.738 pages
d'aide, voici donc ma question :
Je crée une barre d'outils avec 2 boutons qui me permettent de faire du
tri sur une zone sélectionnée par macro; c'est un tri simple sur des
dates ou des numéros d'ordre.
Je souhaite qu'un click trie en ordre ascendant et qu'un deuxième click
sur le même bouton trie en ordre descendant, ça donne a peu près :
Dim Ordre As ???????? Je dois déclarer cette variable en quel type ????
If Ordre = xlAscending Then
Ordre = xlDescending
ElseIf Ordre = xlDescending Then
Ordre = xlAscending
End If
....
Selection.Sort key1:=Range("A1"), order1:=Ordre, Header:=xlGuess,
ordercustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom
D'avance merci de vous pencher sur mon minusculissime souci !
@+tp :-))