Ich soll in einer Excel Datei (Excel2010) die aus 6 Arbeitsblätten besteht vor dem Schließen einige Felder überprüfen lassen. Falls eines der Felder nicht ausgefüllt ist, soll es einen Hinweis geben.
Für Tabelle 1 (name des ersten Arbeitsblatts) habe ich das auch geschafft und es funktioniert auch. Wie kann ich das Verändern, sodass alle Tabellen (Tabelle1-6) überprüft werden?
Kann ich die Tabellen mit der Namens Definition alle zusammen ansprechen?
hier mein bisheriger Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim c As Range
For Each c In Worksheets("Tabelle_1").Range("CheckAbfrage") 'Pflichtfelder aus Tabelle 1 --> _
soll auf alle Tabellen erweitert werden,
If c = "" Then
MsgBox c.Address & " muss noch ausgefüllt werden"
c.Parent.Select
c.Activate
Exit For
End If
Next
End Sub
Vielen Dank schonmal!