Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

simuler fleche bas

  • Initiateur de la discussion Initiateur de la discussion meliokan
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

meliokan

Guest
bonsoir à tous.

Je souhaiterai savoir comment simuler l'appuie sur 'fleche bas' sur une feuille excel.

Je m'explique.

Lorsque je filtre une feuille avec un certain critère (ACC par exemple), j'obtiens ceci:


-------A--------B
1----Famille----Nbre
30----ACC------1
31----ACC------2
32----ACC------3
33----ACC------4
50
51
52
etc...

donc les lignes 2 à 29 et 34 à 49 ont été masquées.

Si je fait: range("A"&65536).end(xlup).row
excel me retourne 33, ce qui est normal, mais comment obtenir par formule le premier numéro de la ligne qui contient ACC ?

J'ai bien trouvé une solution qui dit que:

fin = range("A"&65536).end(xlup).row
do until ("A"&fin)<>("A"&fin-1)
fin=fin-1
loop

comme ça j'aurai la première ligne contenant ACC, et donc son numéro.
Bon, ça c'est bien pour 10 lignes, mais pour 1000, le procédé devient lourd.

On peut passer de la ligne 1 à la 30 rien qu'en appuyant une fois sur la flèche bas du clavier.

Peut-on simuler l'appuie de cette touche par programmation, comme si on appuyait sois-même sur cette touche ?

Merci pour vos réponses (et surtout pour m'avoir lu jusqu'au bout)😀
 
Re : simuler fleche bas

Bonsoir,

As tu essayé avec la formule equiv ? en effet, si tu fais =EQUIV("acc";A1:A500;0) il te renvoit 33.

Tu peux faire de même en vba si tu veux absolument passer par le code.

Bonne soirée

Juju
 
Re : simuler fleche bas

Merci juju d'avoir répondu

Oui je souhaite passer par le vba.

Pour la ligne 33 ça ne pose pas de problème, mais comment détecter la ligne 30?
 
Re : simuler fleche bas

Bonjour meliokan, juju 69

La macro suivante doit être lancée une fois le filtre appliqué :

Code:
Sub Filtre()
Set PlageFiltre = Range("A2", Range("A65536").End(xlUp)).SpecialCells(xlVisible)
Set Cellule1 = PlageFiltre.Cells(1) 'Set Cellule2 = PlageFiltre.Cells(2)
Cellule1.Select
End Sub

Voir le fichier joint.

A+
 

Pièces jointes

Re : simuler fleche bas

Re,

Set a = b est obligatoire pour définir la variable objet a. Une cellule ou une plage, une feuille, un classeur etc... sont des objets.

Pour les variables "normales" (une valeur nombre, un texte) il suffit d'écrire a = b

A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
38
Affichages
1 K
Réponses
5
Affichages
904
Réponses
7
Affichages
985
Réponses
15
Affichages
985
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…