alle macro's stoppen als een macro vanuit een andere macro is geopend

[Robert Smidt]

Hallo beste Helpmijers,

Ik heb een macro die moet kijken of de q: schijf actief is, dat werkt allemaal prima. Maar omdat ik die code vaak gebruik heb ik besloten hier een aparte macro van te maken en vanuit willekeurige macro's op te roepen, dat gaat ook allemaal prima.

Nu komt echter mijn probleem. Wanneer de betreffende macro de Q:/schijf niet vindt moet hij beide macro's afbreken. Welke code kan ik hiervoor gebruiken? Ik werk met Excel '97.

Alvast bedankt

Groeten, Robert

 

[wampier]

"exit sub" denk ik dat je bedoeld

 

[Robert Smidt]

nee helaas

nee, dan stopt hij alleen de tweede macro, hij moet ook de eerste macro afbreken.

 

[wampier]

Function bestaatdir() As boolean
  if direxist (hier de (uitkomst van) je dircheck macro)
    bestaatdir = true
  else
    bestaatdir =false
  end if
end function

in je hoofdprogramma:

if (!bestaatdir) then
  exit sub
end if

 

[Robert Smidt]

Super, het werkt

Bedankt voor de oplossing, de tekst heb ik een beetje aangepast maar de strekking is dezelfde. Wel jammer dat het niet in één regel vanuit de tweede macro kan. Ik ben niet zo'n voorstander van teveel "vervuiling" in de codes, maar als het niet anders kan is dit een goeie oplossing.

Nogmaals allemaal bedankt.

Groeten, Robert