cellen beveiligen tegen slepen

[fikje]

Ik heb een excelblad voor urenregistratie.

Deze is beveiligd op de 'invoercellen' na. De invoercellen kunnen (per ongeluk) versleept worden, waardoor formules die naar die cellen verwijzen niet meer werken. Hoe kan ik de invoercellen ALLEEN beveiligen tegen het verslepen?
(excel 2010)

 

[Niels28]

ALT-F11
plaats onderstaande code bij thisworkbook.
Dan wordt de verslepen uitgeschakeld als je het bestand opend en weer ingeschakeld als je het sluit.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    With Application
        .CellDragAndDrop = True    
    End With
End Sub

Private Sub Workbook_Open()
    With Application
        .CellDragAndDrop = False
    End With
End Sub

Niels

 

[Thankyou]

2x False ?
Moet de eerste niet True zijn?

 

[Niels28]

Klopt helemaal, soms te haastig met antwoorden.

Dank je, aangepast in vorige post.

Niels

 

[fikje]

Het werkt, bedankt.
Maar: bij gebruikers die hun beveiligingsniveau hoog hebben staan (macro-beveiliging), wordt deze macro standaard uitgeschakeld.

Is er geen optie in excel?

 

[Warme bakkertje]

De gebruikers verplichten hun macrobeveiliging te verlagen alvorens ze het bestand kunnen inzien.
Hiervan zijn tal van voorbeelden te vinden op dit forum.

 

[fikje]

Gevonden, bedankt!