wenn Fehler und SVERWEIS in vba-Makros

Meine Aufgabe, eine Formel schreiben, die gehören, wenn, WENNFEHLER und SVERWEIS

Muss ich die Formel anwenden, bis das Ende der letzten Zeile die Werte enthält .

wenn SVERWEIS wirft NA , dann sollte die Zelle leer sein , othewise der Wert sollte ersetzt werden mit dem numerischen Wert "1"

aber wenn Formel versucht, aber es gibt Fehler

Sub testt()

Dim l As Long

l = Sheets(1).Range("A1:A" & Sheets(1).Cells(Sheets(1).Rows.Count, "A").End(xlUp).Row).Count
    With Sheets("Sheet1")
        .Range("d1").Formula = "=IF(iferror(vlookup(c2,$D:$D,1,false),""),"",1)"
        .Range("d1").AutoFill Destination:=Range("d1:d" & l), Type:=xlFillDefault

    End With

End Sub
  • Es gibt nur wenige Dinge, die machen keinen Sinn, aus deinem Beispiel. Für den Anfang, die Berechnung der letzten Zeile verwendet Sheets(3) Sheets(1) in die gleiche Formel, dann Sheets("Tabelle3") verwendet mit dem Ergebnis. Auch Ihre 'IF' - Anweisung in der Formel nicht über einen bedingten Wert. Sie sollten versuchen, die Formel in der Tabelle zuerst.
  • ich habe die Formel . Hoffe nun u, es besser zu verstehen
InformationsquelleAutor PASUMPON V N | 2012-12-29
  1. 0

    Ich denke, dass das problem mit der WENN-Teil der Formel, insbesondere der logischen test. Für eine Tabellenkalkulation WENN-Funktion die Formel dafür lautet:

    =IF(logical_test, value_if_true, value_if_false)

    Den logischen test (aus der Excel-Hilfe-Datei) ein beliebiger Wert oder Ausdruck, der zu WAHR oder FALSCH ausgewertet. Zum Beispiel, A10=100 ein logischer Ausdruck; wenn der Wert in Zelle A10 gleich 100 ist, wird der Ausdruck zu TRUE ausgewertet wird. Sonst wird der Ausdruck zu FALSE ausgewertet wird.

    Ihre logische test ist einfach:

    iferror(vlookup(c2,$D:$D,1,false),"")

    Vielleicht soll es auch sein:

    iferror(vlookup(c2,$D:$D,1,false),"") = ""

    Geben die Formel (mit 'Der König' s Vorschlag zu):

    "=IF(iferror(vlookup(c2,$D:$D,1,false),"""")="","",1)"
    • Vielen Dank für ur help
    InformationsquelleAutor CuberChase
  2. 0

    Mein Erster Gedanke... in VBA, die Sie verwenden sollten zwei "für alle" in deiner Formel...

    Auch, will man mit ISTFEHLER.

    Ich würde ersetzen Sie die Formel, wie unten

    .Range("d1").Formula = "=IF(iserror(vlookup(c2,$D:$D,1,false)),"""",1)"

    Ansonsten bitte lassen Sie uns wissen, welche Fehler Sie bekommen.

    • es zeigt nicht Fehler , Aber das bin ich nicht immer die Leerzeichen in einigen Zellen und einigen Zellen, die "1" ist nicht zu ersetzen, der Wert
    InformationsquelleAutor The King
Schreibe einen Kommentar