Salut à tous,  
bon g 2 souçis en programmation VB Excel...
Explication:
 
 

Tout d'abord je demande à l'utilisateur de saisir un numéro de service(de type string) et ensuite il choisit s'il veut afficher juste ce service ou tout les service commançant par ce kil a saisit... Comment faire??? Si kkun a une solution ça serait cool

Et ensuite le 2ème: l'utilisateur saisi des info (Nom Prénom...ect) et l'enregistre dans une feuil excel. Le pb est ke le dernier enregistrement ecrase le précedent... l'enregistrement se fait sur la même ligne... Une idée??? Merci d'avance

pour ton pb d'affichage il y a deux solutions :
soit un filtre :  
dim xlwks as excel.worksheet
set xlwks = activesheet (ou autre feuille)
xlwks.Range(de ton tableau).Select exemple range("A1:E89" )
Selection.AutoFilter Field:=1 (la colonne pour le filtre), Criteria1:=valur saisi & "*" (cherchera tout ce qui commence par "valeur saisie" ), Operator:=xlAnd
ou alor tu supprime toutes les lignes qui ne contiennes pas ce que tu veux :
dim longueur,compteur as integer
longueur = len(la cellue ou textbox...où est sont saisi le champs de recherhce)
compteur = 0
for i = debu de ta bleau to fin de ton tableau
   if mid(xlwks.cells(i-compteur,colonne du champs service),1,longueur) <> cellule de saisie then
       xlwks.cells(i-compteur,colonne du champs service).entirerow.delete
       compteur = compteur + 1
    end if
next i
le compteur est nécessaire car tu supprime une ligne  
ex : je supprime la ligne 25 alors la ligne 26 devien 25...

mais g pa tro compri ton deuxième pb...

Merci je v essayer dessuite.
G réussi à résoudre le 2ème pb :-)

g un pb sur cette ligne:
xlwks.Range("A1:W25" ).Select  
 
message d'erreur: select method of range class failed    
 
     

tu as bien défini au début :  
dim xlwks as excel.worksheet
set xlwks = activesheet
quand tu écris juste : xlwks.
VB te propose plusieurs solutions ?

esseye peut etre
xlwks.range(xlwks.cells(1,1),xlwks.cells(25,23)).select

Salut g pas pu répondre plus tot car pb d'internet, mais g tjrs le même pb ecel par contre    
 
G bien défini dim xlwks as excel.worksheet et set xlwks = activesheet.  
Qd je tape xlwks. il y a plusieurs propositions donc me suis pas trompé là, et la méthode avec range ne change rien au pb.
 
Je me demande si le pb ne viens pas de l'activsheet. En fait mon bouton se trouve sur la feuille "Menu", mais le pgm est sensé faire une recherche dans une autre feuille nommée "Base"... c peut être ça, si oui kel est la solution?

Personne n'a de solution alors???

Ben si. Active ta feuille.

Oki ça marche mais ça fait pas du tout ce ke je voudrais ke ça fasse... Je voudrais ke qd le gars clique sur OK, tout les services commençant par ce kil a saisit s'affiche...
Je v devenir fou   ragnagna

Ben tu sélectionnes les cellules qui contiennent les noms de services, tu boucles dessus et tu compares le contenu avec ce que le "gars" a saisi à l'aide de l'opérateur LIKE.