Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
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 !
Bonsoir a tous dans excel je n'ai pas la fonction FILTRE puis je l'avoir et comment ont fait pour l'avoir merci de votre aide ! la marche a suivre exactement dans la mesure du possible moi j'ai excel 2016 que j'ai acheter !
Bonsoir
Normalement (j'ai Excel 2016 aussi), dans le bandeau en haut tu as un onglet données, en cliquant dessus des sous menus s'ouvre, et tu peux avoir " trier et filtrer"
Bonsoir.
D'après ce que j'en ai vu, elle n'est guère compliquée à écrire en VBA. Mais il n'accepte pas que je l'appelle FILTRE. Alors j'ai enlevé le 'E' à la fin :
VB:
Function FILTR(ByVal TDonn, ByVal TCond)
Dim LE&, LS&, C&
If TypeOf TDonn Is Range Then TDonn = TDonn.Value
If TypeOf TCond Is Range Then TCond = TCond.Value
For LE = 1 To UBound(TDonn, 1)
If TCond(LE, 1) Then
LS = LS + 1
For C = 1 To UBound(TDonn, 2)
TDonn(LS, C) = TDonn(LE, C)
Next C: End If: Next LE
Do While LS < UBound(TDonn, 1)
LS = LS + 1
For C = 1 To UBound(TDonn, 2)
TDonn(LS, C) = ""
Next C: Loop
FILTR = TDonn
End Function
La Function n'a rien à faire dans le module objet Feuil1 (Feuil1)
Mettez la dans le module standard Module1.
Cela fait, En D1:E10 validé par Ctrl+Maj+Entrée :
Code:
=FILTR($A$1:$B$10;$A$1:$A$10=$C$2)
Affiche les lignes A1:B10 contenant en colonne A la valeur spécifiée en C2
Refaites la manip que j'ai indiquée au poste #8
Il y bien eu un module inséré s'appelant Module1, mais il contient des Sub qui n'ont pas de sens, et c'est dans le module Feuil1 que vous avez mis le code de ma Function FILTR. Double-cliquez sur un nom de module dans l'explorateur de projet pour le sélectionner.
- 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