Office: Mehrere Zellen auf Inhalt prüfen

Hallo zusammen,

habe da noch ein kleines übel zu bewältigen, und komme da irgendwie nicht so ganz weiter.
Ich habe auf einem Tabellenblatt verschiedene Zellen, die ich auf Inhalt prüfen möchte. Wenn nicht alle definierten Zellen ausgefüllt, dann MSG Box.
Also bsp. C2, G2, E2, C8, E8, E9, G14, D35 und noch ein par mehr.
Wie ich eine einzelne Zelle auf Inhalt prüfe weiß ich, aber ich komme nicht dahinter, wie man verschiedene (ca.40) Zellen prüfen kann.

Code:

Ob mir da nochmal einer weiterhelfen kann?
Habe leider bei Herber oder sonstigen Seiten nix brauchbares gefunden.

:)

 

Hi,

du könntest zum Beispiel die zu prüfenden Zellen in einem Namen sammeln und dann alle Zellen in einer For Each Schleife testen.

 

Nochmals danke,

wie kann man denn Zellen in einem Namen sammeln?

 

Du kannst in Excel Namen für Bereiche vergeben.
Markier einfach alle Zellen die zu testen sind und geh dann nach Einfügen-Namen-Definieren.
Gibt dem ganzen einen schönen Namen (z.B: TestBereich) und click dann auf Hinzufügen.
Im Code kannst du dann mit [TestBereich] da drauf zugreifen.

 

Hallo Styrkar,

mmmh, okay. Habe ich mal ausprobiert, bin aber nicht unbedingt auf ein gültiges Ergebnis gestossen, denn was mich noch stutzig macht ist, wie kann ich einem ganzen Bereich sagen, wenn ein Teil von Dir nicht ausgefüllt dann MsgBox?
Z.B. A1-A7 ist ausgefüllt A8 aber nicht und A9-A15 ja.
Dann kann ich ja mit = "" oder < oder > ja gar nichts anfangen?!!!
Müsste ich da dann nicht jede einzelne Zelle ansprechen die ausgefüllt werden muß?

 

Klar mußt du das. Vielleicht wirds mit dem Beispiel hier klarer:

Code:

Der Code erstellt einen Namen 'ZuTesten' für die Zellen B4, B6, D4, D6, F4, F6 und prüft dann welche dieser Zellen leer sind und gibt das Ergebnis aus.

 

So sieht das ganze ja schon sehr gut aus, vielen dank erstmal dafür.
Nur noch eine kleine Frage.

Code:

Then Exit Sub gefällt mir nicht so ganz. Ich würde gerne ein weiteres Makro starten, also quasi eine Verschachtelung.
Prüfe Zellen, wenn Bedingungen positiv erfüllt, dann "Mein Makro", sont Fehlermeldung.
Habe es so probiert, aber irgendwie kommt dann nicht das gewünschte Ergebnis raus. Ob Du mir da noch mal helfen könntest?
Code:

 

Hmm, ich nehme mal an da kommt ein Fehler bei raus.
Wenn du mehrere Befehle in einem if-Block zusammenstellen willst muß auch irgentwann ein End If kommen:
Code:

Noch übersichtlicher wirds wenn du die Befehle in eine neue Sub packst:
Code:

 

Hallo,

ich habe mit VBA hauptsächlich in Access gearbeitet, aber wäre es nicht auch sinnvoll, die felder nicht nur auf leere Zeichenfolge abzufragen, sondern auch auf null, oder gibt es das in Excel nicht?

Code:

Gruß
Olli

@Styrkar
Ist der Spruch in deiner Signatur aus Serenity?

 

Hi,
IsNull wird nix funktionieren. Alternativ könnte man den Test aber mit IsEmpty(z.Value) durchführen, beides ist aber nicht notwendig.

Und ja, da kommt er her.

 

Sooo,
habe noch ein wenig rumbasteln müssen, aber nun klappt es dank Deiner Hilfe.
Vielen lieben Dank, hast mir sehr weitergeholfen!

 

Um das Thema nochmals aufzugreifen,

ich habe auf meinem Tabellenblatt nun noch zwei Checkboxen (Steuerelemt Toolbox) hinzugefügt.
Folgendes wollte ich damit erreichen.

Wenn ich checkbox1 (Ja) oder checkbox2 (nein) anklicke, dann Nachricht.
Soweit kein Problem
Code:

Nun wollte ich aber noch eine Erweiterung/Prüfung reinbringen.

Code:

Folgenden Fehler bekomme ich
"Objekt erforderlich"

Was will ich erreichen?
Wenn checkbox1 angeklickt ist, soll Bereich "test" geprüft werden.
Wenn checkbox2 angeklickt ist, soll Bereich "test1" geprüft werden.
Aber erst dann, wenn ich diese Prozedur aufrufe und nicht wenn ich die Checkbox selbst anklicke. Bekomme das irgendwie nicht auf die Kette.

Ob mir da nochmals einer helfen könnte?

 

Moin, Bravestar,

Kontrollkästchen auf einer Tabelle erwarteb die Angabe der Tabelle vor der Abfrage:

Code:

Und bei Bereichen für Namen würde ich sicherheitshalber immer die absoluten Bezüge setzen...

 

Hi Jinx,

hatte das dann schon so ähnlich gelöst gehabt.
Aber mal ne Frage zu den Bereichen,

ich habe da ein Problem.
Ich würde gerne meherer verbundene und einzelne Zellen auf Inhalt prüfen.
Habe dies soweit auch geschafft nur gibt es jetzt auf einmal Probleme.
Folgendermaßen bin ich vorgegangen.

Zuerst habe ich die zu prüfenden Zellen markiert und sie/ihnen über EINFÜGEN - NAMEN definiert/einen Namen vergeben.
Danach habe ich mich in meinem Code auf diesen Namen bezogen.
Nun wollte ich mehrer Zellen die verbunden sind aber auch einzelne genauso defineren, damit ich sie über meinen Code ansprechen kann, bekomme aber dann eine Fehlermeldung.

Die Formel in diesem Arbeitsblatt enthält einen oder mehrere ungültige Bezüge.
Überprüfen SIe, ob der Pfad, der Name der Arbeitsmappe und der Name des Bereiches oder des Zellbezuges korrekt sind.

Gibt es daher eine Möglichkeit mehrere Zellen auch ohne Namensdefinition anzusprechen?

 

Moin, Bravestar,

ich persönlich halte absolut nichts von Verbundenen Zellen. Von Verbundenen Zellen wird immer die linke obere Zelle angesprochen. Bei Namen sollten bitte immer absolute Bezüge verwendet werden, sonst wird der Bezug relativ zur aufrufenden Zelle aufgezeigt, was nette Überraschungen bringen kann.

Code:

E4 ist Teil der verbundenen Zelle E4:F6.