2016-06-27 5 views
0

Ich habe Spalte A, die variable Menge von verschiedenen Werten enthält, sondern auch folgende drei Werte enthält; "Kurz", "Stein", "Neuer".automatisch ändernden Zellwert

Was ich tun möchte, ist folgendes; Wenn der Zellenwert "Kurz" ist, möchte ich, dass dieser Wert automatisch in "Team1" geändert wird. Wenn es "Stein" ist dann "Team2" und wenn es "Neuer" ist dann "Team3". Wenn es ein anderer Wert ist, dann will ich nichts passieren.

Vielleicht sollte so etwas funktionieren, aber ich weiß jetzt nicht, wie ich das programmieren soll;

If ValueA1= "Kurz" then ValueA1= "Team1" 

Wie kann dies richtig kodieren?

+0

Planen Sie die Verwendung von VBA oder möchten Sie dies vermeiden? – Clusks

+0

wenn es ohne VBA funktioniert, wäre das auch gut. Ich meine, wenn Excel automatische Funktionen hat, die direkt für "Kurz", "Team1" usw. schreibt. –

+0

Wenn es Ihnen nichts ausmacht, dann können Sie wahrscheinlich [this] (http://stackoverflow.com/questions) anwenden/17016085/Excel-VBA-automatisch-ersetzen-Wörter-mit-einem anderen-Verwenden-was-Ersatz). Keine Möglichkeit mit Formeln, die keine neue Spalte erstellen, die dann nur eine einfache IF-Anweisung wäre. Sie können immer auch suchen und ersetzen, aber ich nehme an, Sie wollen das vermeiden? – Clusks

Antwort

2

Hier ist ein schneller Weg, um es mit einigen einfachen VBA-Code zu tun, nicht sicher, ob es am effizientesten ist, aber es sollte die Arbeit erledigt haben!

Sub replaceWords() 

Dim i As Long 

For i = 1 To Rows.Count 
    If Cells(i, 1).Value = "Kurz" Then 
     Cells(i, 1).Value = "Team 1" 
    ElseIf Cells(i, 1).Value = "Stein" Then 
     Cells(i, 1).Value = "Team 2" 
    ElseIf Cells(i, 1).Value = "Neuer" Then 
     Cells(i, 1).Value = "Team 3" 
    End If 
Next i 

End Sub 
+0

danke! Es klappt –

Verwandte Themen