• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Afsluiten excel

Status
Niet open voor verdere reacties.

Egbert12345

Gebruiker
Lid geworden
13 dec 2010
Berichten
496
Goedemiddag, zie mijn voorbeeld.

Voor een applicatie wil ik een controle inbouwen. Als in kolom L een getal is ingevuld en in kolom N een datum ontbreekt moet er een melding verschijnen. Die controle lukt wel, maar ik wil graag dat bij het afsluiten van excel die controle wordt uitgevoerd, maar dat bij het constateren daarvan Excel niet wordt afgesloten. Ik meende dat te kunnen doen met AUTO_CLOSE, maar ik vergeet kennelijk iets. Kunnen jullie mij aangeven wat ik vergeet?
 

Bijlagen

  • Afsluiten.xlsm
    14,2 KB · Weergaven: 8
In de ThisWorkbook sectie:
Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    For A = 2 To 100
        If Cells(A, 12) > 0 And Cells(A, 14) = "" Then
            Cells(A, 14).Select
            MsgBox "Er ontbreekt een betaaldatum."
            Cancel = True
            Exit For
        End If
    Next
End Sub
 
Laatst bewerkt:
Daarvoor heeft Excel Validation uitgevonden.
Contole bij afsluiten is achteraf en te laat.
Voorkom dat gebruikers denken dat ze iets 'verkeerd' hebben gedaan.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan