renommer bouton de commande + l'affecter à ttes les feuilles [Excel] - VB/VBA/VBS - Programmation
Marsh Posté le 17-07-2009 à 16:16:04
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
Marsh Posté le 13-07-2009 à 11:58:07
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.