Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Re: un bouton recherche

Re: un bouton recherche

3 réponses
Avatar
papyty
Salut Dédé
Oui j'ai vu ton post et déja testé ça gaz.
J'avais également vu les arguments dans l'aide mais comment trouver les
valeurs à affecter??
Merci de ta réponse
@+
Thierry

"Dédé" <NOSPAMsugus12002@yahoo.fr> a écrit dans le message de news:
OZmYZqUcDHA.1880@TK2MSFTNGP10.phx.gbl...
> Salut Papyty !
>
> un coup d'oeil dans mon dernier post ,..... ;-))
>
> Salutations
> Dédé
>
> --
> Pour répondre, enlever le NOSPAM
> "papyty" <papyty@yahoo.fr> a écrit dans le message de
> news:%23n8tyWUcDHA.1180@TK2MSFTNGP11.phx.gbl...
> > Salut Magalie
> > Je ne sais pas pourquoi ça ne fonctionne pas mais peut être une idée de
> > recherche
> > si tu selectionne ta plage ou toutes les cellules de la feuille AVANT
> > d'exécuter la macro
> > Application.Dialogs(xlDialogFormulaFind).Show
> > elle fonctionne.
> > Si ça peut aider
> > @+
> >
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Dédé
Salut ;-)))

Ben c'est ce que je suis en train de chercher ;-))

J'ai trouvé cela :
Tape "liste d'arguments de boîte de dialogue intégrée" dans l'aide de VBA et
tu devrait trouver un bout (mais pas tout ...)

Salutations
Dédé

--
Pour répondre, enlever le NOSPAM
"papyty" a écrit dans le message de
news:%
Salut Dédé
Oui j'ai vu ton post et déja testé ça gaz.
J'avais également vu les arguments dans l'aide mais comment trouver les
valeurs à affecter??
Merci de ta réponse
@+
Thierry

"Dédé" a écrit dans le message de news:

Salut Papyty !

un coup d'oeil dans mon dernier post ,..... ;-))

Salutations
Dédé

--
Pour répondre, enlever le NOSPAM
"papyty" a écrit dans le message de
news:%
Salut Magalie
Je ne sais pas pourquoi ça ne fonctionne pas mais peut être une idée
de



recherche
si tu selectionne ta plage ou toutes les cellules de la feuille AVANT
d'exécuter la macro
Application.Dialogs(xlDialogFormulaFind).Show
elle fonctionne.
Si ça peut aider
@+









Avatar
jerrykhann
Bonjour à tous...
halala, cette recherche quelle misère ! :-)
concernant les arguments un début de piste (arguments commentés entre
parenthèses) :
'Application.Dialogs(xlDialogFormulaFind).Show Text, in_num(arg2 'DANS'),
at_num(arg3 'Cell Entiere'), by_num(arg4 'Sens'), dir_num, match_case(arg6
'respect casse'), match_byte

Je disais quelle misère car j'ai quelques problèmes aussi avec cette
fonction et j'aimerais savoir si d'autres l'ont, je m'explique, je suis sous
Excel XP et la fonction marche, mais lorsqu'on l'a exécutée une 1ère fois
(par macro) et qu'on veut ensuite le faire "à la main" (ou à la souris :-)
Excel plantait (à l'imparfait, car depuis passage en XP SP2 Excel ne plante
plus mais refuse tout bonnement de faire une recherche "à la main"
(Edition-Rechercher))
J'ai remarqué aussi que sous Excel XP la boite de dialogue qui s'ouvrait
était celle des versions antérieures et non celle de Excel XP qui est
légèrement différente !

Voila...

"Dédé" a écrit dans le message de
news:
Salut ;-)))

Ben c'est ce que je suis en train de chercher ;-))

J'ai trouvé cela :
Tape "liste d'arguments de boîte de dialogue intégrée" dans l'aide de VBA
et

tu devrait trouver un bout (mais pas tout ...)

Salutations
Dédé

--


Avatar
michdenis
Bonjour jerrykhann,

Voici la ligne de code avec ses arguments:


Les arguments de la boîte de dialogue ressemblent étrangement à la méthode
"Find" de l'objet "Range". Voici l'ordre de leur présentation : What,
LookIn, LookAt, SearchOrder, SearchDirection, MatchCase

Application.Dialogs(xlDialogFormulaFind).Show "titi", 3, xlWhole, xlByRows,
xlNext, True

Sous XP, il semble y avoir un petit "bug", on ne peut utiliser les
constantes textes pour l'argument "Lookin" (xlvalues, xlformulas,
xlcomments), on doit utiliser leur constante numérique en lieu et place :
1 = xlformulas
2= xlvalues
3= xlcomments


Concernant ton problème d'utilisation de la fonction à partir de la feuille
de calcul suite à une opération du même type en VBA, j'ai éprouvé la même
problématique.

Voici ce que j'ai fait : ( je n'ai pas d'explications )

J'ai sélectionné une feuille vierge, et j'ai lancé la petite procédure.
Évidement excel n'a rien trouvé mais suite à cette manipulation, je ne fus
plus en mesure de reproduire ce comportement étrange. Tout fonctionne
rondement !!!

Les sceptiques seront confondus !!!

;-)))


Salutations!





Salutations!







"jerrykhann" a écrit dans le message de
news:
Bonjour à tous...
halala, cette recherche quelle misère ! :-)
concernant les arguments un début de piste (arguments commentés entre
parenthèses) :
'Application.Dialogs(xlDialogFormulaFind).Show Text, in_num(arg2 'DANS'),
at_num(arg3 'Cell Entiere'), by_num(arg4 'Sens'), dir_num, match_case(arg6
'respect casse'), match_byte

Je disais quelle misère car j'ai quelques problèmes aussi avec cette
fonction et j'aimerais savoir si d'autres l'ont, je m'explique, je suis
sous

Excel XP et la fonction marche, mais lorsqu'on l'a exécutée une 1ère fois
(par macro) et qu'on veut ensuite le faire "à la main" (ou à la souris :-)
Excel plantait (à l'imparfait, car depuis passage en XP SP2 Excel ne
plante

plus mais refuse tout bonnement de faire une recherche "à la main"
(Edition-Rechercher))
J'ai remarqué aussi que sous Excel XP la boite de dialogue qui s'ouvrait
était celle des versions antérieures et non celle de Excel XP qui est
légèrement différente !

Voila...

"Dédé" a écrit dans le message de
news:
Salut ;-)))

Ben c'est ce que je suis en train de chercher ;-))

J'ai trouvé cela :
Tape "liste d'arguments de boîte de dialogue intégrée" dans l'aide de
VBA


et
tu devrait trouver un bout (mais pas tout ...)

Salutations
Dédé

--