Excel Makro: Wenn Wert vorhanden, dann...
15.05.2018 15:32:35
Weiland
ich kenne mich mit VBA leider gar nicht aus. Für ein Projekt habe ich mehrer große Tabellen mit verschieden Werten darin. Nun muss ich einen Wert in eine Zelle eintragen, vorausgesetzt ein anderer von mir bestimmter Wert in einer anderen Zelle kommt darin vor. Eigentlich ziemlich simpel.
Das würde dann folgendermaßen aussehen:
In Spalte G und H befinden sich Werte (z.B. G3="2" / H3="3" ; ... ; G20="50" / H20="6"; ... und so weiter).
Wenn jetzt der Wert "2" in der Spalte G oder H vorkommt, dann möchte ich, dass in die gleichen Zeile in der Spalte I der Wert "3" eingetragen wird.
Ich habe es ansatzweise probiert, komme aber nicht weiter. Einfacher halber nur mal mit einer Spalte als Suchkriterium.
Hier den Code den ich verwendet habe:
If Intersect(Range("G"), Target) Is Nothing Then Exit Sub
If Target = "8320000" Then
Range("I" & Target.Row) = "3"
Else
Range("I" & Target.Row) = ""
End If
End Sub