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

Fehlermeldung #DIV/0!

Fehlermeldung #DIV/0!
02.02.2005 17:45:42
Manu
Hallo Ihr da,
hoffe es geht euch gut und ich hoffe Ihr könnt mir helfen.
Ich lasse in einer Excel Datei mittels Makro den Mittelwert der Zellen H3:H1000
in Zelle I1 anzeigen (über = Mittelwert(H3:H1000). Nur wenn im genannten Bereich kein Mittelwert berechnet werden kann (durch evtl. vorkommende Zeichen, ca., .....) kommt in der Zelle die Fehlermeldung #DIV/0!
Da mein Makro folgendes überprüft
If mH1 = "" Then GoTo 787
habe ich das Problem das bei genanntem Fall das Makro hängenbleibt mit Fehler2007.
Wie schaffe ich es das auch bei dem Fehlerwert #DIV/0! mein Makro das gleiche macht wie bei If mH1 = "" Then GoTo 787
Ich hoffe Ihr versteht mich.
Danke für die Mühe
Manu
Hier der Makroausschnitt
'Range("I1").Select
' ActiveCell.FormulaR1C1 = "=Mittelwert(Z(2)S(-1):Z(999)S(-1))"
'mH1 = Range("I1").Value
'If mH1 = "" Then GoTo 787
dat wars

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

Betreff
Datum
Anwender
Anzeige
AW: Fehlermeldung #DIV/0!
02.02.2005 18:03:20
Matthias
Hallo Manu,
Range("I1").Select
ActiveCell.FormulaR1C1Local = "=Mittelwert(Z(2)S(-1):Z(999)S(-1))"
mh1 = Range("I1").Value
If TypeName(mh1) = "Error" Then GoTo 787
If mh1 = "" Then GoTo 787
Gruß Matthias
AW: Fehlermeldung #DIV/0!
03.02.2005 13:12:41
Manu
Danke für die Hilfe.
Endlich klappt es.
Gruß Manu
PS: konnte erst leider heute wieder an den Rechner.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige