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

Brauche mal eure Hilfe: "Zelleninhalte überprüfen"

Brauche mal eure Hilfe: "Zelleninhalte überprüfen"
04.11.2003 10:28:10
Hubert
Hallo,

mag lachhaft klingen, aber wie kann ich am effektivsten überprüfen, ob (wie unten aufgelistet) die Zellen leer sind oder nicht:

Diese Zellen sollen "geprüft" werden:
F6,F7,E10 bis E12,E14,E24,E26,E16 bis E18,E20 bis E22,E28 bis E37 und
letztendlich A69 bis :K100.

Bei einzelnen Zellen haut das hin (if isempty([F6]) then ....

Geht das auch mit z.B. if isempy([E16:E18]) then ... ???

Schon mal Danke !!!
Hubert

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

Betreff
Datum
Anwender
Anzeige
AW: Brauche mal eure Hilfe: "Zelleninhalte überprüfen"
04.11.2003 10:40:17
worti
Hallo Hubert,
versuch's mal so oder so ähnlich:

Sub Anzahlen()
Dim c As Range
Dim intI As Integer
'Prüfen, ob alle Zellen eines selektierten Bereichs leer sind
intI = 0
For Each c In Selection
intI = intI + 1
Next
If Application.WorksheetFunction.CountBlank(Selection) = intI Then
MsgBox "alles Blank"
Else
MsgBox "Nicht alles Blank"
End If
End Sub


Worti
AW: Brauche mal eure Hilfe: "Zelleninhalte überprüfen"
04.11.2003 11:02:48
Hubert
Hallo worti,

Danke !! So funktioniert's !!!

(Als Anfänger in Sachen Excel-VBA hat man' schon schwer....:-))

Hubert
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige