Bonjour,
Lorsque je lance la macro: Application.Dialogs(xlDialogFormulaFind).Show , 2 j'aimerais pouvoir la stopper si la valeur recherchée n'existe pas dans la feuille.
Un grand merci pour votre aide
Bonjour,
Je ne comprends pas.
Il a bien fallu que tu lances la recherche en cliquant sur "Find Next", non ?
Tu peux l'arrêter à tout moment en cliquant sur "Close".
EDIT : mais par "arrêter", tu veux peut-être dire autre chose, comme être informé de l'erreur sans provoquer de bug ?
Il suffit alors d'une simple gestion d'erreur, comme dans cet exemple :
On Error Resume Next Application.Dialogs(xlDialogFormulaFind).Show , 547 If Err.Number = 1004 Then MsgBox "valeur inexistante" On Error GoTo 0
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
