Dom vraagje misschien
Hoe kan ik een formulierknop een naam geven, en wat als ik het nummer van de knop niet meer weet, om hem te manipuleren, visible bijvoorbeeld.
Hierbij de voorbeeld macro, deze werkt.
Doch ik heb er nog andere waarvoor ik terug andere knoppen zou moeten maken, ivb naamgeving, geen nummer meer.


Sub StartHulpknoppenTonen()                                                                 ' Knop 26 is de grote knop
    Dim strIngave As String
    Dim strWachtwoord As String
    BeveiligingTotaalAAN
    strWachtwoord = Range("AanpassenWachtwoord").Value
    strIngave = InputBox(" Geef het wachtwoord", "   W A C H T W O O R D", "")
    If strIngave = strWachtwoord Then
        BeveiligingTotaalAF
        ActiveSheet.Shapes("Knop 26").Select
        Selection.ShapeRange.ZOrder msoSendToBack
        BeveiligingTotaalAAN
        Range("A1").Select
        Application.Goto Reference:="StartPositie"
    Else
        BeveiligingTotaalAAN
        MsgBox " Verkeerd wachtwoord, geen toegang ", vbOKOnly + vbCritical, "   F O U T !"
    End If
End Sub

Ben maar een amateurke en zoek het soms veel te ver
Al doende leert men natuurlijk
Wel handig zo'n goede Hulp website
Soms is het wel echt simpel natuurlijk
In ieder geval, bedankt