Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 11:29:24
Algorhitmus, der kleinste Summe von Zahlen berechnet
15.10.2025 10:27:00
Zusammenführen / Synchronisieren von zwei Dateien
15.10.2025 09:51:49
Wenns mit Zahl und Buchstaben
15.10.2025 08:22:15
Privat Sub ObjExcel_Sheet Change....deaktivieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
552to556
552to556
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ist eine Tabelle leer?

Forumthread: ist eine Tabelle leer?

ist eine Tabelle leer?
21.01.2005 15:30:22
KViertel
Hallo,
ich suche nach einer Lösung für folgendes Problem.
In einer Arbeitsmappe befinden sich Tabellen, die je nach Arbeitsfortschritt Daten enthalten oder auch nicht. Gibt es eine Möglichkeit möglichst einfach festzustellen, ob in einer Tabelle Daten sind, oder nicht. Genügen würde mir, wenn nur ein Wahrheitswert übergeben würde; außerdem sollte es schnell gehen.
MfG. Klaus
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ist eine Tabelle leer?
21.01.2005 15:32:39
Josef Ehrensberger
Hallo Klaus!
Ist eine leere Tabelle ganz leer, oder sind Formeln vorhanden?

Gruß Sepp
AW: ist eine Tabelle leer?
21.01.2005 15:44:51
Josef Ehrensberger
Hallo Klaus!
Wenn die Tabelle wirklich leer ist, dann zB. so:


      
Function sheetEmpty(Optional Tabelle As String) As Boolean
Dim sht As Worksheet
On Error GoTo errorhandler
   If Tabelle <> "" Then
      Set sht = Sheets(Tabelle)
   Else
      Set sht = ActiveSheet
   End If
sheetEmpty = Application.CountA(sht.Cells) = 0
Exit Function
errorhandler:
sheetEmpty = False
End Function
Sub test()
MsgBox sheetEmpty("Tabelle1")
End Sub 

     Code eingefügt mit Syntaxhighlighter 3.0


Gruß Sepp
Anzeige
AW: ist eine Tabelle leer?
21.01.2005 15:47:35
harry
hi,
versuchs mal so:

Sub leer()
ActiveSheet.UsedRange.Select
If IsEmpty(Selection) = True Then
MsgBox "leer"
Else: MsgBox "voll"
End If
End Sub

liebe grüße,
harry
AW: ist eine Tabelle leer?
21.01.2005 20:14:55
kviertel
Hallo Josef, Hallo Harry,
danke für den Hinweis. Die Tabellen werden im Laufe einer Anwendung gefüllt oder auch nicht. Ich wollte zwischendurch testen, ob Werte in den Tabellen stehen um sie dann der Übersichthalber auszublenden.
MfG. Klaus
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige