Gratis tips Excel - Excel werkblad enkel kunnen sluiten wanneer er bepaalde cel is ingevuld


Tips Excel		go to : Index

Tip 202
Excel Tip

Excel werkblad enkel kunnen sluiten wanneer er bepaalde cel is ingevuld
Op vraag van Dirk Schoonjans, toon ik jullie een manier hoe je instelt dat je een Excel-werkboek niet kunt afsluiten wanneer er een bepaalde cel niet is ingevuld. Wens je het Excelbestand te downloaden, klik hier

Sluit je Excel wanneer in dit geval cel A1 niet is ingevuld, dan krijg je het bericht dat cel A1 niet leeg mag zijn.

Dit kan enkel met behulp van VBA. De code hiervoor is: Private Sub Workbook_BeforeClose(Cancel As Boolean) If Sheets("Blad1").Range("A1").Value = "" Then Cancel = True MsgBox "Cell A1 mag niet leeg zijn" Else ActiveWorkbook.Close SaveChanges:=True End If End Sub


Een woordje uitleg:
If Sheets "Blad1", dat is de naaam van mijn werkblad Range("A1") dat is het bereik
Value = " ", wanneer de waarde van het bereik leeg is
Then Cancel = True, dus dan cancel je de close procedure En geef je een messagebox weer met de tekst "Cell A1 mag niet leeg zijn"
Is dit niet het geval, dus is cell A1 niet leeg, dan sluit en bewaar je het werkbook. ActiveWorkbook.Close SaveChanges:=True

GratisCursus.be denkt aan jullie.

> Index