Heren,

Is het mogelijk een makro te laten lopen na het vragen van een paswoord???
Ik ben nl van gekoppelde bestanden afgestapt, en wil nu dmv beveiligde makro`s mensen toegang verschaffen tot een bepaald gedeelte van een bestand.

Bvd
Piet is de Naam

Als rechtgeaard foefelaar zou ik dan gewoon een foutief paswoord ingeven, de boodschap negeren en vervolgens doodleuk naar uw sheet inhoud(2) gaan. Nog niet helemaal feilproof, denk ik...?

De enige echte
Straandjanet

Je kan mss bovenstaande code in een loop plaatsen en bvb na 3 foutieve codes het bestand afsluiten.
Of in het begin de tabbladen verbergen en na het ingeven van het correcte paswoorde de tabbladen terug zichtbaar maken. (dit lukt wel door wat te prutsen met de eigenschappen van de sheets via de VBA-editor.

1. Worksheets("Naam van het blad").Visible = False en Worksheets("Naam van het blad").Visible = True

2. Een gewone loop kan al heel wat doen. bv. For i = 1 to 3, waarbij variabele i telt hoeveel pogingen al gedaan zijn. of Do While pw <> "piet", als je bv. meer dan oneindig veel pogingen wilt toelaten. (met een button natuurlijk om de gebruiker zelf te laten stoppen, of je zit in een oneindige lus)

Experimenteer maar wat, maar dit moet zeker mogelijk zijn. Goed uitkijken wat je waar zet, bij dit probleem gaat het heel belangrijk zijn welke instructie je op welk moment in de code staat.

WG