Hallo,
ist es möglich mit SVerweis das Suchkriterium direkt zu ersetzen?
Das Suchkriterium ist in A1. Jetzt möchte ich das der zurückgegeben Wert nicht in z.B. B1 steht,
sondern dieser sollte direkt A1 ersetzen.
Hallo!
Ohne VBA nicht direkt, weil das Zirkelbezüge gibt. Was du machen kannst, ist, das Ergebnis in meinetwegen B1 auszugeben und dann als Wert nach A1 kopieren.
Liebe Grüße
Alex
So habe ich es bisher auch gemacht, ist aber leider ein riesen Datenblatt und es sind nur einzelne Zellen bei denen dies Vorkommt.
Dann werde ich es wohl so beibehalten.
Trotzdem vielen Dank.
Hallöchen,
Du kannst eine Formel in einer kompletten Spalte anwenden. Im Prinzip eine Formel für wenn SVERWEIS was findet, dann das, sonst das was schon drinsteht. Dann kannst Du die komplette Spalte kopieren …
Hallo,
mit Hilfe von VBA könnte man so etwas bewerkstelligen. Hier mal ein Ansatz:[
attachment=30011]
Gruß
Marcus
Hallo,
hier einmal ein Codeschnipsel mit select Case:
Private Sub WorkSheet_Change(ByVal Target As Range)
Dim Speicher As Variant
Application.EnableEvents = False
Speicher = Range("A2").Value
Select Case Speicher
Case Is = 1
Range("A2") = "sehr gut"
Case Is = 2
Range("A2") = "gut"
Case Is = 3
Range("A2") = "befriedigend"
Case Is = 4
Range("A2") = "ausreichend"
Case Is = 5
Range("A2") = "mangelhaft"
Case Is = 6
Range("A2") = "ungenügend"
End Select
On Error GoTo ende
Application.EnableEvents = True
ende:
Exit Sub
End Sub
Dabei brauchst Du keinen Schalter. beim verlassen der Zelle klappt das von alleine.
Gruß
Marcus