Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
196to200
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
196to200
196to200
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Prüfen, ob Zellen leer sind

Prüfen, ob Zellen leer sind
04.01.2003 23:10:30
Martin Springer
Hallo,

Ich möchte wissen, ob alle Zellen innerhalb einer Markierung leer sind. Mein eigener Versuch geht nur dann, wenn nur eine einzige Zelle markiert ist:

If IsEmpty(Selection) = False Then MsgBox "voll" Else MsgBox "leer"

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Prüfen, ob Zellen leer sind
04.01.2003 23:36:01
Urs
Sub prüfen()
Hallo Martin
einfache Variante, die läuft:

Sub prüfen()
Dim rng As Range
For Each rng In Selection
If IsEmpty(rng) = False Then
MsgBox rng.Address & " ist voll"
Exit Sub
End If
Next rng
MsgBox "leer"
End Sub

liebe Grüsse
Urs

Re: Prüfen, ob Zellen leer sind
05.01.2003 00:08:45
Boris
Hallo Martin,

Die Funktion im Beispiel liefert wahr, wenn alle 40 Zellen im Bereich D1:E20 leer sind, ansonsten (naturgemäß;-))) FALSCH.

Gruß Boris

P.S.: Als Excel-Funktion: =ANZAHLLEEREZELLEN(D1:E20)


Re: Prüfen, ob Zellen leer sind
05.01.2003 00:41:29
L.Vira
Option Explicit
Sub leer()
If Selection.Cells.Count = _
WorksheetFunction.CountBlank(Selection) Then
MsgBox "Selektion ist leer!"
End If
End Sub
Anzeige
Und die einfachste aller Varianten:
05.01.2003 01:33:54
Boris

Gruß Boris

P.S.: Ist mir auch grad erst in den Sinn gekommen;-))

hinweis leer ungleich leer
05.01.2003 10:28:46
andre
hallo allerseits,
noch ein hinweis, was leer ist - siehe kommentare:
die beiden varianten bringen unterschiedliche ergebnisse:

gruss andre


300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige