Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1466 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Excel] renommer bouton de commande + l'affecter à ttes les feuilles

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[Excel] renommer bouton de commande + l'affecter à ttes les feuilles

n°1904879
morigann
Posté le 13-07-2009 à 11:58:07  profilanswer
 

Bonjour,  
 
J'ai cherché la solution à mon problème dans plusieurs discussions mais je comprends pas grand chose...  
J'ai créer une macro fonction recherche, je l'ai affecté à un bouton, le problème c'est que :  
1_ je n'arrive pas à renommer ce bouton ("CommandButton1" )
Voici ma macro:
 
Sub Recherche_terme()  
 
Dim terme As String  
 
terme = InputBox("Entrez le terme recherché" )  
Cells.Find(what:=terme).Activate  
 
End Sub  
 
Private Sub CommandButton1_Click()  
Call Recherche_terme  
End Sub
 
Avec cette macro la recherche de termes s'effectue seulement sur la feuille sur laquelle je travaille.
 
2_ je ne sais pas comment affecter ma macro à toutes les feuilles (sauf celle où se trouve le bouton) à partir de ce seul bouton.
 

mood
Publicité
Posté le 13-07-2009 à 11:58:07  profilanswer
 

n°1906214
produvba
Posté le 17-07-2009 à 16:16:04  profilanswer
 

Cela vient de la collection cells à mon avis.
Sans aller voir la doc (sinon fait F1 sur cells) essaie Activeworkbook.cells pour avoir toutes les cells de tout le workbook.
Sinon, il faut faire une boucle
For each ws in Activeworkbook.worksheets
          ws.cells.find(... la même chose que ce que tu as écrit
next ws
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Excel] renommer bouton de commande + l'affecter à ttes les feuilles

 

Sujets relatifs
VBA Excel[VBA] créer fichier excel à partir d'onglet
Macro ExcelMacro excel 2007 remplir tableau recap
[Excel] Calcul de moyenne automatisé[Excel] Formule de recherche multicritère
[EXCEL] Identifier la cellule sélectionnéevariable vba et fonction excel
Interface requête Base de données EXCELAddition toute bête en VBA (Macro Excel)
Plus de sujets relatifs à : [Excel] renommer bouton de commande + l'affecter à ttes les feuilles


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR