Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
944to948
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
944to948
944to948
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bereich leer, dann Fehlermeldung

Bereich leer, dann Fehlermeldung
29.01.2008 17:29:50
mtremer
Hallo Excel-Freunde,
das ist bestimmt eine leichte Aufgabe für Euch:
Ich möchte in einen definierten Bereich (A16:I20) prüfen, ob ein Text oder eine Zahl eingetragen ist.
Wenn nicht, soll eine Fehlermeldung erscheinen.
Wie kann ich das machen?
Danke.
Viele Grüße
Marco

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich leer, dann Fehlermeldung
29.01.2008 17:49:00
Horst
Hi,
das kannst du mit der Funtion ANZAHL2() prüfen.
mfg Horst

AW: Bereich leer, dann Fehlermeldung
29.01.2008 17:57:00
mtremer
Hallo Horst,
ich hatte eigentlich gehofft, das in meinen eh schon bestehenden Code einzubauen.
Ist das möglich?
Danke.
Viele Grüße
Marco

AW: Bereich leer, dann Fehlermeldung
29.01.2008 17:56:25
Erich
Hallo Marco,
wenn du Fehlerwerte ausschließen willst, kannst du besser ZÄHLENWENN verwenden:
 ABCDEFGHI
1344FALSCH       
1445WAHR       
15         
1616x#DIV/0!16x16x16x16x16x16x16x
1717x17x17x17x17x17x17x17x17x
1818x18x18x18x18x18x18x18x18x
1919x19x19x19x19x19x19x19x19x
2020x20x20x20x20x20x20x20x20x

Formeln der Tabelle
ZelleFormel
A13=ZÄHLENWENN(A16:I20;"*")
B13=ZÄHLENWENN(A16:I20;"*")=45
A14=ANZAHL2(A16:I20)
B14=ANZAHL2(A16:I20)=45
B16=1/0

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Bereich leer, dann Fehlermeldung
29.01.2008 17:58:00
mtremer
Hallo Erich,
ich hatte eigentlich gehofft, das in meinen eh schon bestehenden Code einzubauen.
Ist das möglich?
Danke.
Viele Grüße
Marco

AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:08:00
Erich
Hi Marco,
meine Formel mit ZÄHLENWENN war Unfug, sie zählt nur Texte, keine Zahlen.
Besser funzt das mit SUMMENPRODUKT:
 ABCDEFGHI
1344FALSCH       
1445WAHR       
15         
1616x#DIV/0!16x16x16x16x16x16x16x
1717x17x17x17x17x17x17x17x17x
18181818181818181818
1919x19x19x19x19x19x19x19x19x
2020x20x20x20x20x20x20x20x20x

Formeln der Tabelle
ZelleFormel
A13=SUMMENPRODUKT(--ISTTEXT(A16:I20))+SUMMENPRODUKT(--ISTZAHL(A16:I20))
B13=SUMMENPRODUKT(--ISTTEXT(A16:I20))+SUMMENPRODUKT(--ISTZAHL(A16:I20))=45
A14=ANZAHL2(A16:I20)
B14=ANZAHL2(A16:I20)=45
B16=1/0

In VBA sieht das so aus: 

Sub Makro2()
If Evaluate("=SUMPRODUCT(--ISTEXT(A16:I20))+SUMPRODUCT(--ISNUMBER(A16:I20))")

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:29:40
mtremer
Hallo Erich,
ich weiß nicht woran es liegt, aber der Code hat bei mir nicht funktioniert.
Der von Horst dagegen klappt...
Trotzdem danke.
Viele Grüße
Marco

AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:35:12
Erich
Hi Marco,
was bedeutet "hat bei mir nicht funktioniert"?
Kommt keine Fehlermeldung, wenn du eine erwartest? Oder umgekehrt?
Oder meldet VBA einen Fehler?
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:39:00
mtremer
Sorry.
Er meldet immer "Fehlermeldung", egal, ob der Bereich gefüllt oder leer ist ;-)
Viele Grüße
Marco

AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:44:36
Erich
Hi Marco,
hier mal eine Beispielmappe, neu darin ist nur Makro3:
https://www.herber.de/bbs/user/49505.xls
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Bereich leer, dann Fehlermeldung
29.01.2008 19:01:38
mtremer
aaaah, Dein Code zählt die nicht freien Zellen.
Desswegen kam logischerweise die Fehlermeldung, zumal ich eine Zeile verrutscht bin.
In dieser Zeile sind ja auch die Überschriften drin...
Dann war das wohl mein Fehler.
Danke für Deine Hartnäckigkeit. Ansonsten hätte ich das nicht erkannt ;)
Viele Grüße
Marco

Danke für Rückmeldung - freut mich! (oT)
29.01.2008 19:23:50
Erich

AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:21:00
Daniel
Hi
da anscheinend keiner Versteht, daß du Code haben willst, probier mal das hier, getrennt nach Zahlen und Texten, Formeln werden nicht berücksichtigt:

Sub Zählen()
Dim anzTexte As Long
Dim anzZahlen As Long
Dim Meldung As String
With Range("A16:I20")
On Error Resume Next
anzTexte = .SpecialCells(xlCellTypeConstants, 2).Cells.Count
anzZahlen = .SpecialCells(xlCellTypeConstants, 2).Cells.Count
On Error GoTo 0
Meldung = "Zellen gesamt: " & .Cells.Count & Chr(10)
Meldung = Meldung & "davon Texte: " & anzTexte & Chr(10)
Meldung = Meldung & "davon Zahlen: " & anzZahlen & Chr(10)
End With
MsgBox Meldung
End Sub


Gruß, Daniel

Anzeige
AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:33:00
Erich
Hi Daniel,
bei
anzZahlen = .SpecialCells(xlCellTypeConstants, 2).Cells.Count
müsste statt der 2 eine 1 stehen oder
anzZahlen = .SpecialCells(xlCellTypeConstants, xlNumbers).Cells.Count
Nebenbei: In meinem letzten Beitrag war ein Codebeispiel.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

AW: Bereich leer, dann Fehlermeldung
29.01.2008 19:07:00
Daniel
Danke für die Korrektur.
man sollte doch nicht immer kopieren.
OK, Sorry, ich hatte dein Beispiel nicht vollständig runtergescrollt.
Gruß, Daniel

AW: Bereich leer, dann Fehlermeldung
29.01.2008 18:10:00
Horst
Hi,

Sub t()
If Application.CountA([A16:I20]) = 0 Then
MsgBox "Leer"
Else
MsgBox Application.CountA([A16:I20]) & " Einträge"
End If
End Sub


mfg Horst

Anzeige

306 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