problème lors de l'interruption volontaire de de l'exécution

Question

bonjour!

j'ai une interface qui permet de saisir des crit&#232;res de recherche. Elle comporte un bouton Ok, back (revenir au menu qd la recherche n'est pas la,c&#233;e) et cancel search (arr&#234;te la recherche quand celle-ci est lanc&#233;e). Pour cela, pour le bouton cancel search, j'ai le code suivant:

Private Sub Cancel_Click()
bol = True
Sheets(SheetOfSearch).Select
Unload BillingByMonth
BillingSupplier.Show
End Sub

et dans la sub principale j'ai :

Select case truc

case machin
        For Row = SearchBeginning To SearchLimit
            If bol = True Then
            DoEvents
            Exit Sub
            End If
      ... (il y a du code entre le for et le next)

      Next
case...

end select  

Apr&#232;s le end select, j'ai encore du code. A la fin de la recherche, j'affiche une msgbox pour informer le user.

mais probl&#232;me: si j'interromps ma recherche (qui r&#233;affiche le menu et unload le form de saisie de crit&#232;res), et que j'en effectue une autre, cette nouvelle recherche se fait (jusque l&#224; tant mieux), mais apr&#232;s &#234;tre finie et avoir affich&#233; la msgbox correspondant &#224; cette recherche, le code s'ex&#233;cute &#224; nouveau mais avec un bordel inimaginable pour les r&#233;sultats et m'affiche la msgbox correspondant &#224; la recherche normalement annul&#233;e...

J'ai essay&#233; aussi avec Exit for... mais rien y fait...

A l'aideueueueueueueu!
  Daydayerement V&#244;tre

econs · Answer

Est ce que bol est bien d&#233;clar&#233;e en Public sur ta feuille ?



SearchBeginning Et SearchLimit sont-elles remises &#224; jour quand tu arr&#234;tes ta recherche ?




Manu
-------------------------------------------
Une question bien pos&#233;e, c'est une chance de r&#233;ponse bien adapt&#233;e.

Daydayer · Answer

ah non... et si je le d&#233;clare avec dim? ca ne marchera pas?

  Daydayerement V&#244;tre

Problème lors de l'interruption volontaire de de l'exécution

2 réponses

Discussions similaires