Wie fülle ich Zellen basierend auf Bedingungen automatisch aus?

0

Ich muss eine Zelle basierend darauf, ob 2 Zellen bestimmte Werte enthalten, automatisch füllen und dann automatisch ausführen. Das habe ich bisher:

Private Sub Worksheet_Change(ByVal Target As Range)
     If target.Cells(5, "B").Value = "Secured" And target.Cells(6, "B").Value = "Amendment" Then
        Cells(10, "B") = "T2 - Medium Risk"
    End If

End Sub 

Die if-Anweisung wäre =IF(AND(D34="Secured",D35="Amendment"),"yes","") Aber das "Ja" muss in einer anderen Zelle sein

sjk1193
quelle
Wenn Sie D34 und B34 benötigen, sollten Sie wechseln .Cells(5,"B") und .Cells(6,"B") zu .Cells(34,"D") und .Cells(35,"D").
Kyle

Antworten:

0

Das ist was Sie suchen

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
     If Not Intersect(Target, Range("B5:B6")) Is Nothing Then
        If Cells(5, 2) = "Secured" And Cells(6, 2) = "Amendment" Then
            Cells(10, 2) = "T2 - Medium Risk"
        End If
    End If
End Sub

Sie möchten, dass es ausgelöst wird, wenn sich die Änderung in diesen beiden Zellen befindet, und wenn sie übereinstimmen, füllen Sie eine andere Zelle. Wenn Sie es löschen möchten, können Sie das auch tun.

Raystafarian
quelle