Opslaan onder voorwaarde celinhoud

[stefano]

Is het mogelijk om in een document met meerdere tabbladen te voorzien dat het document niet kan opgeslagen worden wanneer alle verplichte velden in tabblad 1 zijn ingevuld?

Als voorbeeld:

In cel A1 is een drop down list actief waaruit een selectie van gegevens dient gemaakt te worden. De eerste lijn in de box is blanco. Zolang er geen item uit de lijst geselecteerd wordt kan het document niet opgeslagen worden.

Ik heb hier rond gespeurd maar vind niks in die aard.

dank voor jullie antwoord.

Stefano

 

[Conseclusie]

Gebruik de event-macro "Workbook_BeforeSave" hiervoor.
Zoiets als:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If <jouw criterium> Then
    MsgBox "Document niet opgeslagen.", vbCritical, "LET OP"
    Cancel = True
End If
End Sub

 

[stefano]

ik test het uit, dank alvast