Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1192to1196
1192to1196
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehler bei deiner IF Bedingung abfangen

Forumthread: Fehler bei deiner IF Bedingung abfangen

Fehler bei deiner IF Bedingung abfangen
Hans
Hallo Leute,
ich habe folgendes Problem in einer Private Sub Worksheet_Change(ByVal Target As Range) VBA Anwendung.
Sobald wird was in Zelle B5 geschrieben wird, wird in Zelle I5 durch diesen Befehl eine Formel geschrieben
Target.Offset(0, 7).FormulaR1C1 = "=IF(ISBLANK(RC[-7]),"""",(VLOOKUP(RC[-7],[Preise.xls]EP!C1:C7,7,0)))"
Wenn der Wert in Zelle I5 "0" ist soll die Formel gelöscht werden.
Das mache ich mir einer normalen IF Bedingung
If Range("I5") = 0 Then
Range("I5").ClearContents
End If
Wenn aber den Wert, der in B5 geschrieben wird nicht gibt kommt in die Zelle I5 "#NV" und der Debuggmodus wird mir Laufzeitfehler 13 gestartet.
Kann mir jemand helfen wie ich das Abfangen kann?
mfg
hans
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Fehler bei deiner IF Bedingung abfangen
09.01.2011 14:04:21
Nepumuk
Hallo,
If IsError(Range("I5") ) Then
Gruß
Nepumuk
AW: Fehler bei deiner IF Bedingung abfangen
09.01.2011 14:07:17
Tino
Hallo,
ich würde es in etwa so angehen.
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("B5")) Is Nothing Then
        Application.EnableEvents = False
        With Target.Offset(0, 7)
            
            .FormulaR1C1 = _
            "=IF(ISBLANK(RC[-7]),"""",VLOOKUP(RC[-7],[Preise.xls]EP!C1:C7,7,0))"
            
            If IsError(.Value) Then
                .Cells = Empty
            ElseIf .Value = 0 Then
                .Cells = Empty
            End If
        
        End With
        Application.EnableEvents = True
    End If
End Sub
Gruß Tino
Anzeige
AW: Fehler bei deiner IF Bedingung abfangen
09.01.2011 20:16:03
Hans
Lieben Dank
Ihr habt mir sehr geholfen
LG
Hans
;

Forumthreads zu verwandten Themen

Löschen von Zeilen unter 1 Bedingung
Zeilen

Hallo,
ich habe in einer Excel Liste Produkte geführt, die den aktuellen Lagerbestand anzeigen.
Dort werden auch die Produkte aufgeführt, deren Produkte einen Lagerbestand von 0 haben.
Der Lagerbestand wird in Spalte B aufgeführt, die Produkte stehen in Spalte A. Der Datenbereich b...
08.08.2008 20:15:00
Thread-ID: 1000407
5 Beiträge
2 Bedingungen - ZÄHLENWENN
Toby

Hi!
Unten meine aktuelle Formel. Nun möchte ich aber, daß Excel zählen soll, wenn es ungleich X und ungleich Leerfeld ist.
Oder er soll nur dann zählen, wenn eine Zahl drin steht.
=ZÄHLENWENN(C3:AJ3;"X")
Bestimmt leicht für euch ...
Danke, Toby ...
10.08.2008 18:26:00
Thread-ID: 1000661
4 Beiträge
Zellen prüfen / Ausgabe wenn Bedingung erfüllt
Kay

Hallo,
Ich brauche dringend Eure Hilfe. Unter https://www.herber.de/bbs/user/54533.xls findet Ihr eine Mappe, in welcher in Spalte A
1 für "Kaufen"
0 für " "
-1 für "Verkaufen"
steht. IN SPALTE B SIND BISHER NUR MANUELL ERSTELLTE BEISPIELEINTRÄGE ENTHALTEN, DAMIT ERSICHTLIC...
12.08.2008 09:51:36
Thread-ID: 1001078
3 Beiträge
If...Then... bei verschiedenen Bedingungen?
Vic

Hallo zusammen
Ich habe folgendes Problem und weiss nicht, wie ich das über mein Marko gelöst bekomme:
In der Spalte "H" habe ich diverse Werte (zwischen 0 und X) und in der Spalte "K" ebenfalls. Nun möchte ich, dass es in der Spalte "L" eine "0" ausgibt, wenn "H" den Wert Null hat und...
13.08.2008 15:00:00
Thread-ID: 1001553
5 Beiträge
Anzeige
Hilfe ! Zellen einfärben mit bedingung
sockel939

Hallo Leute,
wie schaffe ich es per makro ( ! )
alles was links neben zelle m2 bis m1000 steht einzufärben.
Also wenn in M2 z.B. a steht, alle zellen von L2 bis A2 = Grün
M3 z.B. Hallo = L3 bis A3 = Rot usw.
Weis nicht in welcher reihenfolge ich die makros aufnehmen soll :-...
15.08.2008 15:09:00
Thread-ID: 1002195
5 Beiträge
Unterschiedliche Werte mit Bedingung
kerberus

Hallo liebes Forum
Ich benötige mal wieder eure Hilfe. Das Ziel: eine Formel die mir die Anzahl unterschiedliche Eintragungen liefert. Folgender Code konnte ich bis jetzt erstellen:
Function ZUnterschiede(Kriterium As String, Kriteriumbereich As Range, Wertebereich As Range) _ As D...
22.08.2008 10:34:00
Thread-ID: 1003771
3 Beiträge
2 zellen als Bedingung
sockel939

Guten Morgen an alle,
habe diesen code hier gebastelt!
Würde ihn jetzt gerne um 2 Bedingungen erweitern
und zwar soll der bereich L4:L1000 und N4:N1000 als Bedingung hinzukommen,
hab aber keinen Plan wies geht.
For Each Zelle In Range("K4:K1000")
If Zelle = "overhauled"...
23.08.2008 04:57:59
Thread-ID: 1004065
10 Beiträge
ganze Zeile nach Bedingung formatieren
Tom

Hallo
wie kann ich denn ausgehend von der aktuellen Zeile diese mittels VBA formatieren.
Hintergrund:
Steht in Spalte N der Wert "Ja", dann ändere den Hintergund dieser Zeile von A bis R in grau ab (Interner Farbwert von Excel sollte 15 sein)
Wird diese Formatierung mittels VBA...
26.08.2008 14:48:36
Thread-ID: 1004813
3 Beiträge
Summe mit 2 Bedingungen
TobiasM

Hallo Excel-Experten,
ich würde gerne eine Summe mit zwei Bedingungen berechnen:
Wenn Wert in Spalte H gleich "EUR" und Wert in Spalte I gleich ""2005", dann Summe der entsprechenden Werte in Spalte J.
Könnte mir jmd. bitte einen Hinweis zur Formel geben?
Vielen Dank!!!
Tobi...
28.08.2008 10:11:30
Thread-ID: 1005310
3 Beiträge
Anzeige
Datum nach Prüfung mehrer Bedingungen anzeigen
Wilfried

Hallo, brauche dringend Hilfe !!
In einer Tabelle mit Kundendaten wird in Spalte C2:C350 zu Prüfzwecken ein "x" eingetragen. In Spalte AB2:AB350 erfolgt der Eintrag "N" wenn der Kunde nicht erschienen ist. In Spalte Z2:Z350 steht das dazugehörige Datum. Ich benötige eine Formel, welche mi...
28.08.2008 13:27:54
Thread-ID: 1005419
18 Beiträge
If Bedingung
Urmila

Hallo,
wie kann ich sagen ob in irgendeiner Zelle der Spalte (z.B. E) selektiert ist und in der aktiven Zelle ein Datum steht (Spalte E in diesem Fall im Format Datum)?
LG
Urmila
01.09.2008 09:24:24
Thread-ID: 1006329
4 Beiträge
Zählenwenn funktion an zweite Bedingung knüpfen
Simon

Hallo,
ich komme schon wieder mal nicht weiter und bräuchte eure Hilfe:
Ich will eine Zählenwenn funktion an eine zweite Bedingung knüpfen. kontkret sieht das folgendermaßen aus:
Ich habe folgende Spalten:
Kundennummer Bestellmenge
1000 5
1001...
02.09.2008 09:05:00
Thread-ID: 1006644
7 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige