code wijzigen zodat hij niet achter een wachtwoord vraagt

[davylenders123]

Het stukje code van hieronder verwijderd een buton uit een werkblad.

Er wordt echter elke keer achter een wachtwoord gevraagd als ik de code laat werken omdat het werkblad beveiligd is met een wachtwoord.

Wat moet er aan de code worden aangepast zodat hij niet meer achter het wachtwoord vraagd en gewoon de buton verwijderd?
Het wachtwoord is1234

Heb vba ook beveilig met een paswoord.

ActiveSheet.Unprotect
    ActiveSheet.Shapes("Button 13").Select
    Selection.Delete
    ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:= _
        False

 

[Ginger]

Als VBA het gebruikte password niet weet zal hij daarom gaan vragen (logisch toch?). Dus moet je dat password in je code meegeven.

ActiveSheet.Unprotect Password:="jouw password"

Groet, Leo

 

[davylenders123]

Leo

Heb u code gebruikt en werkt ook.
Ik krijg echter nog wel een foutmelding.

"fout 50289 tijdens het uitvoeren.
Kan bewerking niet uitvoeren omdat project is beveiligd."

Vba is ook beveilig met het zelfde wachtwoord.
Als ik het wachtwoord eraf haal werkt alles perfect.
Maar het wachtwoord op vba zou er ook op moeten blijven staan.

 

[edmoor]

Kijk eens hier:
http://www.mrexcel.com/forum/showthread.php?t=12163

 

[davylenders123]

edmoor

Sorry maar geraak niet echt wijs uit de link.
Mijn engels is ook niet al te beste .