Filtrer une plage choisie par inputbox

Bonjour,

Je cherche à filtrer une plage de cellules selon la couleur de fond, après avoir défini par inputbox.

  • la plage à filtrer
  • la couleur retenue

En gros, voilà ce que je veux demander :

Range("zz1000").Select

ActiveCell.Value = InputBox("Quelle est la 1ère cellule à filtrer selon la couleur ?", "Plage à filtrer", "A1")

ActiveCell.Offset(0, 1).Range("a1").Select 'aaa1000

ActiveCell.Value = InputBox("Quelle est la dernière cellule à filtrer selon la couleur ?", "Plage à filtrer", "A17")

ActiveCell.Offset(1, -1).Range("a1").Select 'zz1001

ActiveCell.Value = InputBox("Quelle couleur souhaitez-vous garder ?", "Couleur", "Jaune")

Bon, maintenant, je voudrais rédiger la macro, c'est à dire surtout définir les variables, pour que le filtre aille chercher

  • le début et la fin de la plage dans les cellules "zz1000" et "aaa1000" - à moins qu'on ne puisse faire en une seule fois (dans cet exemple: A1:A17) ?
  • la couleur dans la cellule "zz1001" - encore faut-il la traduire en code couleur ?

C'est un peu beaucoup pour moi, et je ne trouve nulle part de réponse.

Merci d'avance pour votre aide, Cordialement, Mimouch

Bonjour

Un exemple tiré d'un autre Forum

Cordialement

82triecouleurs.zip (8.29 Ko)

J'ai bien tout téléchargé, je vais désosser le code VBA à tête reposée, pour essayer de comprendre le fonctionnement et voir s'il répond en totalité à mon problème.

D'ores et déjà, merci Amadeus, à +

Rechercher des sujets similaires à "filtrer plage choisie inputbox"