Extra melding wanneer alleen lezen versie is geopend

[Meaurk]

Hallo!

Ik heb een bestand gemaakt waar maar één persoon tegelijkertijd in mag werken. Het bestand heeft verschillende macro's en is niet gedeeld.
Standaard krijg je als je een bestand opent welke reeds geopend is een pop-up met daarin de melding dat je het bestand als alleen lezen opent. Helaas vergeten sommige personen dit na een tijdje.

Is het daarom mogelijk om middels een macro automatisch een extra melding (via message box ofzo) te genereren wanneer er een waarde ingevuld worden in het bestand wanneer deze in alleen lezen is geopend? (Ik gebruik Excel 2016)

Alvast bedankt!

 

[Gijsbert1]

Zoiets?

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Not ActiveWorkbook.ReadOnly = False Then
MsgBox "file is read only!!!"
End If
End Sub

 

[Meaurk]

Jep, werkt prima! Dankjewel!

 

[Academy]

Zoiets?

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Not ActiveWorkbook.ReadOnly = False Then
MsgBox "file is read only!!!"
End If
End Sub

Idem hier. Laat ik daar nu net naar op zoek zijn.
Dank ook namens mij. :thumb: