Trucs et astuces Express > cree une macro de recherche sous excel

Version complète : cree une macro de recherche sous excel

Trucs et astuces Express > Discussions Informatique > Microsoft Office 2003 / 2007 > Excel

jeantitou

02-04-2008 - 5:09

bonjour je cherche a cree une fonction recherche sous excel,alors j'ai fait une feuille e calcul je souhaiterais integres une macro me permettant de faire une recherche ds ma feuille sans utilisé les fonctions de la barre d'outils.Pour facilite la saisis des données je voudrais cree un formulaire a partir de cette meme feuille avec des boutons de recheche.
vous remerciants par avance tres tres debutant urgent

services12move

24-04-2008 - 9:48

Bonjour, voici un code qui permet de faire une recherche dans la colonne A.

Le mot clé à chercher doit être entré en B2
Le nombre d'occurences trouvées s'affiche en B3
Les résultats s'affichent en D2... jusque D(?)... tout dépende du "nombre" de résultats à afficher

Les champs vérifiés débutent en A5 et vont jusque A1000 (peut être modifié)

CODE

Sub recherche()
Dim compt As Integer
Set Plage = Range("A6", "A1110")
compt = 0
For I = 6 To 1110
   If InStr(Plage.Cells(I).Text, Range("B2").Text) Then
    compt = compt + 1
    Cells(1 + compt, 4) = Cells(I + 5, 1).Value
   End If
Next I
Cells(3, 2) = compt
End Sub

Groumphy

01-05-2008 - 1:14

Heu,... Il n'y aurait pas eu plus facile avec le masque de saisie et les tableaux croisés dynamique ? (ai pas regardé totalement...)

Ceci une version "bas débit" de notre forum. Pour voir la version complète avec plus d'information, la mise en page et les images, veuillez cliquez ici.