Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 18:41:19
vba Zeilen duplizieren ab aktiver Zeile bis letzte Zeile
25.04.2024 18:22:55
Zeilen mit bestimmtem Datum in andere Mappe übertragen
25.04.2024 18:14:45
VBA - Excell - Kopie und "Diebstahl" Schützen
25.04.2024 17:49:39
Bedingte Formatierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1740to1744
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1740to1744
1740to1744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Püfen, ob mehrere Zellen leer sind

Püfen, ob mehrere Zellen leer sind
20.02.2020 15:02:18
gig
Hallo,
ich brauche wieder einmal eure Hilfe.
Ich habe ein Tabellenblatt bei dem dem in den Zellen A2:G2 Input erforderlich ist.
Ein von mir aufgenommenes Makro sollte nur dann ausgeführt werden, wenn jede einzelne Zelle von A2:G2 mit Daten gefüllt ist. Ist eine oder alle Zellen leer, so soll eine MsgBox "(Bitte zuerst Daten eingeben") ersteinen und nach dem OK-Klick das gesamte Makro abgebrochen werden.
Wie kann ich den Code des von mir aufgenommenen Makros verändern damit dies geschieht?
Vielen Dank im Voraus.

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Püfen, ob mehrere Zellen leer sind
20.02.2020 15:05:13
onur
Mit der Tastatur?
Spass bei Seite - woher soll das Jemand wissen, wenn du das Makro nicht postest?
AW: Püfen, ob mehrere Zellen leer sind
20.02.2020 15:19:47
gig
Der Code des aufgenommenen Makros spielt keine Rolle.
Ich möchte zu Beginn des Makros etwas wie...
If IsEmpty(Cells(1, 1)) Then
MsgBox "Bitte zuerst Daten eingeben"
End If
stellen. Nur soll halt der gesamte Bereich von A2:G2 ausgewertet werden.
AW: Püfen, ob mehrere Zellen leer sind
20.02.2020 15:20:55
onur
Dann noch viel Glück dabei !
AW: Püfen, ob mehrere Zellen leer sind
20.02.2020 15:22:05
Werner
Hallo,
so: 
Public Sub aaa()
If WorksheetFunction.CountBlank(Range("A2:G2")) > 0 Then
MsgBox "Fehler: Es sind nicht alle Daten erfasst."
Exit Sub
Else
MsgBox "Alles gefüllt, hier dein Makro"
End If
End Sub
Gruß Werner
Anzeige
AW: Püfen, ob mehrere Zellen leer sind
20.02.2020 15:21:48
UweD
Hallo
so?
    If WorksheetFunction.CountBlank(Range("A2:G2")) > 0 Then
         MsgBox "Bitte zuerst Daten eingeben"
    Else
        MsgBox ("Alles Gut")
        'Dein MAkro 
    End If

LG UweD
Anzeige
AW: Püfen, ob mehrere Zellen leer sind
20.02.2020 15:48:58
gig
Vielen Dank Werner und Uwe,
funktioniert perfekt!
Gerne u. Danke für die Rückmeldung. o.w.T.
20.02.2020 16:16:15
Werner

307 Forumthreads zu ähnlichen Themen

MSGBox wenn Zelleninhalt geleert wurde?!
Tom

Hallo!
Ist es denn eigentlich möglich zu überprüfen ob eine Zelle gerade geleert wurde?
Hintergrund ist, dass ich gern sicherstellen möchte, dass der User wirklich den Zelleninhalt löschen wollte.
Ich würde gern eine Mitteilung erscheinen lassen wenn eine Zelle vom Inhalt her gelösc...
26.08.2008 15:07:01
Thread-ID: 1004826
6 Beiträge
Anzeige
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Makro unterbrechen wenn bestimmte Zelle leer
WalterK

Guten Morgen,
wer kann mir beim folgenden Code eine kleine Änderung durchführen:
1.) das Makro sollte abgebrochen werden, wenn im Blatt "Daten" die Zelle "AB12" leer ist und
2.) es sollte eine MsgBox mit dem Hinweis kommen, dass die Eingabe bei "AB12" fehlt und das sollte mit OK bes...
03.10.2008 07:29:45
Thread-ID: 1013985
10 Beiträge
Anzeige
VBA leere Zelle finden und obere Inhalte einfügen
Carmen

Hallo Zusammen,
leider habe ich so ganz wenig Ahnung von VBA, weiß aber auch nicht wie ich mir sonst normal mit
Excel weiterhelfen könnte da es zuviele Daten sind.
Hab folgendes Problem, ich möchte gerne dass alle leeren Zellen in den Spalten B-D mit dem Inhalt der Zellen eine Zeile...
08.12.2008 17:08:41
Thread-ID: 1031133
5 Beiträge
Kopieren von Nichtleeren Zellen per Formel
Nichtleeren

Moin,
auf der Arbeit soll ich eine Tabelle anpassen:
In Tabellenblatt1 ist eine Matrix M6:P109, in einigen Zeilen (Artikelnummern in loser Reihenfolge) stehen Werte, (die Artikel, die im Bürobestand fehlen) in den meisten nicht.
Die Zeilen, in denen Werte stehen, sollen nun in Tabel...
10.01.2009 20:43:46
Thread-ID: 1038525
4 Beiträge
Kurze , dumme Frage: Prüfen, ob Zelle leer
Dieter

Hi,
wie kann ich denn prüfen , ob die Zelle B230 im Tabellenblatt "Umsatz" leer ist ?
(Wichtig, es ist nicht das Aktive Tabellenblatt)
Danke Dieter
29.01.2009 13:21:56
Thread-ID: 1044976
8 Beiträge
Zählenwenns... Leere Zelle
UweD

Hallo
Ich habe 2 Tabellen, wo (fast) täglich 1. Produktionsrückstände und 2. Fehler aufgelistet sind.
Es kommt vor, daß eine Tabelle mal an einem Tag nicht abgefragt und gefüllt wird.
In der Zusammenfassung wird dieser Tag dann mit 0 gewertet. Wie stelle ich es an, daß an diesem Tag...
13.02.2009 10:55:00
Thread-ID: 1050400
5 Beiträge
Wenn Dann mit Werten zwischen 2 Zellen
Thomas

Hallo,
montagsgemäß steh ich gerade auf dem Schlauch und benötoge Hilfe für folgendes Problem:
ich habe mind. 10 Werte in % von 50% bis 110%
In den Zellen A1 bis A10 steht ein Text, dahinter also in B1 bis B10 die Prozentwerte.
Dann steht in C1 ein Objektspezifischer Wert/ein E...
23.02.2009 11:55:52
Thread-ID: 1053025
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
6
2
9
2
4
3
7
4
2
3
7
1
4
3
23
23
1
6
9
4
4
9
4
4