Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 09:31:31
Bild "In Zelle platzieren"
25.04.2024 09:23:47
Spalten in Kreuztabelle hinzufügen/löschen je nach Vorgabe
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
940to944
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
940to944
940to944
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blatt nach Fehler durchsuchen

Blatt nach Fehler durchsuchen
21.01.2008 13:13:44
Bernd
Hallo,
ich würde gerne ein Excel-Tabellenblatt bzw. einen Tabellenbereich nach Fehlermeldungen wie z.B. #DIV/0! oder ähnlichem durchsuchen und falls auch nur eine Zelle gefunden wird, dann soll dies z. B. durch eine bedingte Formatierung deutlich werden. Die bedingte Formatierung soll dabei nicht auf die betreffende Zelle angewendet werden, sondern soll vielmehr auf eine x-beliebige Zelle angewendet werden. Ich stelle mir das im Grunde so vor, dass in einem Extra-Tabellenblatt solche "Checks" komprimiert aufgelistet werden und ich auf einen Blick sehe, ob irgendwelche Datenfehler in den einzelnen Sheets vorliegen.
Gruß
Bernd

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blatt nach Fehler durchsuchen
21.01.2008 13:24:00
Wolli
Hallo Bernd, versuche dies
{=ODER(ISTFEHLER(A1:G34))} (als Matrixformel)
ist immer Wahr, wenn irgendwo im genannten Bereich ein Fehler auftritt.
=ODER(ISTFEHLER(A1:G34)) als bedingte Formatierung scheint sogar ohne "Matrix-Klammern" zu funktionieren.
Gruß, Wolli

AW: Blatt nach Fehler durchsuchen
22.01.2008 00:01:00
Daniel
Hallo
über diese Matrix-Formel (mit strg+shif+enter eingeben, ohne geschweifte Klammern)

{=SUMME(ISTFEHLER(C4:C16)*1)}


oder diese Formel (normal eingeben)


=SUMMENPRODUKT(ISTFEHLER(C4:C15)*1)


kannst du die Fehler in einem Zellbereich zählen.
Es gibt dabei verschiedene Fehlertypen, daher gibt es auch verschiedene Formeln:
IstFehler
IstFehl
IstNV
die jeweils unterschiedliche Fehler zählen.
welche funktion du für was einsetzen musst, kannst du im Formelassistenten nachlesen
Gruß, Daniel

Anzeige
AW: Blatt nach Fehler durchsuchen
22.01.2008 23:46:34
Gerd
Hallo Bernd,
schau mal, ob Du damit hinkommst. Um Farbe habe ich mich nicht gekümmert.

Sub test()
Dim wsP As Worksheet, wsF As Worksheet
Dim rngCheck As Range, rngF As Range
Dim vntErrorCells As Variant
Dim lngCt As Long
Set wsF = ThisWorkbook.Worksheets("Tabelle2") ' Ausgabetabelle
Set wsP = ThisWorkbook.Worksheets("Tabelle1") ' zu prüfende Tabelle
Set rngCheck = wsP.Range("A2:E100") 'Prüfbereich
wsF.Columns("A:B").ClearContents ' wg. Wiederholungen Ausgabespalten leeren
On Error Resume Next
Set rngF = Intersect(rngCheck, wsP.Cells.SpecialCells(xlCellTypeFormulas, xlErrors))
On Error GoTo 0
If rngF Is Nothing Then
wsF.Range("B2") = 0
Else
wsF.Range("B2") = rngF.Cells.Count
vntErrorCells = Split(Replace(rngF.Address, ":", ","), ",")
For lngCt = 0 To UBound(vntErrorCells)
wsF.Range("A" & lngCt + 5).Value = vntErrorCells(lngCt)
wsF.Range("B" & lngCt + 5).Value = wsP.Range(vntErrorCells(lngCt))
Next
End If
End Sub


Gruß Gerd

Anzeige
Besten Dank fuer die unterschiedl. Lösungen!
23.01.2008 14:05:00
Bernd

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige