Tipps & Tricks: Detail

Hier finden Sie zu dem ausgewählten Tipp oder Trick die detaillierten Angaben.

Wenn in den folgenden Erläuterungen Texte wie MsgBox formatiert sind, handelt es sich um konkret einzugebende Inhalte wie VBA-Code oder die Eingabe von Werten. Menüs wie Datei Speichern sind wie hier zu sehen formatiert. Schaltflächen oder Registerkarten auf Dialogen werden wie Menüs behandelt.

Alle Tipps sind nach bestem Wissen geprüft, aber selbstverständlich ohne Gewähr. Sollten Sie doch einen Fehler darin entdecken, würden wir uns freuen, wenn Sie uns per E-Mail Bescheid sagen.

Tabellenblatt nur mit Bedingung öffnen ID 378

Wenn Sie in Excel von Ihren Benutzern oder Benutzerinnen auf mehreren Blättern Dateneingaben verlangen, ist das oft wie in einem Assistenten organisiert, also die Werte auf Tabellenblatt 1 müssen vorhanden sein, bevor das Weitergehen in Tabellenblatt 2 sinnvoll ist. Das lässt sich sogar sehr einfach überprüfen. Der folgende Code muss im Tabellenmodul derjenigen Tabelle eingefügt werden, welches noch nicht betreten werden darf, wenn die Zelle mit dem Bereichsnamen PruefDaten (die in irgendeinem anderen Blatt sein kann) noch unausgefüllt ist:

Private Sub Worksheet_Activate()

With Application.Range("PruefDaten")

If .Value = "" Then

.Parent.Activate

End If

End With

End Sub

Beim Versuch, dieses Tabellenblatt zu betreten, wird automatisch dessen Worksheet_Activate-Ereignis ausgelöst. Darin prüfen Sie nun den Wert der Zelle namens PruefDaten. Falls diese leer ist, wird deren Parent-Objekt, also ihre zugehörige Tabelle, aktiviert. Ihr Code muss also gar nicht konkret "wissen", wo sich der Bereich befindet.