Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
680to684
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
680to684
680to684
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

MsgBox wenn Arbeitsblatt leer

MsgBox wenn Arbeitsblatt leer
13.10.2005 12:14:59
Rainer52
Hallo,
ich habe ein hoffentlich kleines Problem:
in einem Workbook mit 23 Tabellenblättern möchte ich überprüfen, ob ein anderes Tabellenblatt leer ist. Wenn ja, dann soll eine Meldung erfolgen und das ursprüngliche Tabellenblatt soll weiterhin aktiviert bleiben, wenn nein, dann soll das neue Tabellenblatt aktiviert werden.
Folgenden Code habe ich eingegeben, aber es funktioniert nicht:

Sub CommandButton6_Click()
If IsEmpty("Spiel5") = True Then
msgbox "Es liegen keine Informationen vor!"
Else
Worksheets("Spiel5").Activate
End If
End Sub

Ich hoffe mir kann jemand helfen.
Gruß
Rainer

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MsgBox wenn Arbeitsblatt leer
13.10.2005 12:26:51
Uduuh
Hallo,
if worksheetfunction.counta(sheets("Spiel5").cells)=0 Then
Gruß aus’m Pott
Udo

AW: MsgBox wenn Arbeitsblatt leer
13.10.2005 12:30:59
Rainer52
Hallo,
es funktioniert klasse.
Vielen Dank
Rainer
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige