waarschuwing beveiliging

[bikkel9]

beste mensen

heb met hulp van jullie een programma gemaakt wat datum en tijd invoert door dubbelklikken op de cel
maar de digibeten krijg je het niet geleerd en wordt de tijd handmatig ingevoerd en kan excel hier niet meer mee rekenen nu heb ik de cellen beveiligd en er voor gezorgd dat
de beveiliging er met het dubbelklikken vanaf gaat en er weer op komt en dit werkt goed de tijd komt er netjes in de cel
het probleem is nu dat ik het waarschuwingsschermpje krijg dat de cel beveiligd is en moet er steeds op ok gedrukt worden
is het mogelijk deze waarschuwing uit te zetten in de macro?
bijgevoegd de macro

alvast bedankt voor de moeite

bikkel9

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

    With Target
        
     Unprotect Password:="helpmij"

        Select Case .Column
        
            Case 2
                
                .Value = Date
                .NumberFormat = "m/d/yyyy"
                
            Case 5, 6
            
                .Value = Now - Date
                .NumberFormat = "h:mm"
            
        End Select
        
    End With
 Protect Password:="helpmij"
 
End Sub

 

[Wigi]

Krijg je dat schermpje tijdens uitvoering van de code?

 

[bikkel9]

Hoi wigi

als ik dubbel klik in de cel geeft hij netjes de tijd aan
daarna komt het scherm ik kan niet zien of dat nog in de macro zit als ik op oke klik
is de cel nog wel actief
zal het prog wel even strippen en toevoegen

 

[bikkel9]

hierbij het excel bestand

 

[Warme bakkertje]

Haal het terug beveiligen uit je eerste macro en plaats hem in een ander event bv

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Protect Password:="helpmij"
End Sub

Mvg

Rudi

 

[bikkel9]

hoi Rudi

hoe kom ik vanuit de macro in het andere event
is het mogelijk het voorbeeld in de test voorbeeld te plakken?

alvast bedankt

 

[Wigi]

Plak die code onder of boven de reeds bestaande code.

 

[bikkel9]

beste Wigi en rudi
het werkt ga weer verder bouwen
er is meteen een andr probleem opgelost

groeten

en bedankt

Bikkel9