VBA Excel Boite Rechercher/Remplacer

Fermé
justtry - 28 août 2009 à 02:53
 Mantix - 19 avril 2011 à 22:12
Bonjour tout le monde,
Voilà je voudrais connaitre le nom de cette boite de dialogue, celle qu'on obtiens en appuyant sur Ctrl+F,
j'ai essayé avec l'enregistreur sans succès. En plus, j'ai fais un petit test : un Count sur la collections Dialogs et apparemment il y aurait plus de 800 boites, mais lorsqu'on saisie le code (ex : Application.Dialogs (...).Show) l'environnement, c'est à dire l'éditeur VBA là, ne nous propose pas 800 quand même !
Alors je sais pas si c'est possible de l'appeler (la boite) via une macro.

Merci d'avance...
A voir également:

8 réponses

JvDo Messages postés 1978 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 28 septembre 2020 858
31 août 2009 à 13:25
Bonjour,
une piste : Application.Dialogs(xlDialogFormulaFind).Show
le pb c'est que ça affiche en anglais chez moi!
cordialement
1
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
31 août 2009 à 13:41
Application.Dialogs(xlDialogFormulaReplace).Show

méthode pour voir la liste des boites dans l'aide:
dialogs.collection d'objets
Listes d'arguments de boîte de dialogue intégrée.

1
bonjour, tester cela..

SendKeys "^f" à la place de Application.Dialogs(xlDialogFormulaReplace).Show

cordialement
1
Avec "^h" cela ouvre la boîte Remplacer, avec "^f" cela ouvre la boîte Chercher.
Merci
0
hello!
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Up
0
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 293
31 août 2009 à 13:26
je crois qu'il n'y en a pas... :-( sous VBA avec Application.Dialogs(xl....).show

du moins je n'en ai jamais trouvé mais la fonction existe bien.

Désolé!
0
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 293
31 août 2009 à 15:52
Merci Michel,
tu m'as appris quelque chose.
Bonne journée.
j'avais regardé à recherche ( find) mais pas à remplacer (replace)
Bonne journée
0
ok merci je vais voir ça
0