Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Wenn Wert enthalten, dann 4 Zellen Später....

Wenn Wert enthalten, dann 4 Zellen Später....
28.02.2019 14:53:03
Ronny
Servus!
Da ich jetzt immer mehr beruflich damit zu tun habe, komm ich ins Schleudern
Ich habe Falsche Werte markiert und Überschrieben.
Jetzt will ich den Roten Wert in "AH" prüfen und 4 Zellen später "AL" einen Wert eintragen.
z.B. habe ich den neuen Wert 110519 -> dieser soll jetzt in AL den Wert Laufschiene erhalten.
Damit bin ich sicherlich auf dem Holzweg...?
Sub Werte_Wechseln()
Dim Zelle As Range
For Each Zelle In Range("AH2:AH150")
If Target = "110519" Then Cells(Target.Row, 4) = "LAUFSCHINE"
If Target = "125495" Then Cells(Target.Row, 4) = "BLECH"
If Target = "123865" Then Cells(Target.Row, 4) = "RE-ROHR"
If Target = "123924" Then Cells(Target.Row, 4) = "Q-ROHR"
If Target = "123910" Then Cells(Target.Row, 4) = "Q-ROHR"
If Target = "123849" Then Cells(Target.Row, 4) = "RE-ROHR"
If Target = "159209" Then Cells(Target.Row, 4) = "AL-BL"
If Target = "128688" Then Cells(Target.Row, 4) = "PLATTE"
Next Zelle
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Wert enthalten, dann 4 Zellen Später....
28.02.2019 14:57:50
guennih
Statt "if target" "if Zelle"
Statt "Cells(Target.Row, 4)" "Zelle.offset(0,4)"
Gruß,
Günther
AW: Wenn Wert enthalten, dann 4 Zellen Später....
01.03.2019 09:56:10
Ronny
Super!
Vielen Dank!
Beste Grüße
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

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