Thema Datum  Von Nutzer Rating
Antwort
Rot Der angebene Code soll das Automatisch bis Spalte IV ausführen
 20.06.2019 13:51:58 Gast3412
Solved
20.06.2019 15:06:06 Gast60792
Solved
20.06.2019 16:14:08 Gast13081
NotSolved
20.06.2019 19:44:41 Gast48376
NotSolved

Ansicht des Beitrags:
Von:
Gast3412		 Datum:
20.06.2019 13:51:58		 Views:
1145		 Rating:
     
Antwort:
 Nein
Thema:
Der angebene Code soll das Automatisch bis Spalte IV ausführen

Hallo,

für C9 funktioniert der Code wunderbar. Allerdings hätte ich gerne, dass das von C9 bis IV9 automatische funktioniert. Ein Weg wäre natürlich die Zeilen immer wieder zu kopieren und die Range anzupassen, allerdings doch ein sehr mühsamer weg. Ich denke, dass das besser geht nur sind meine Kenntnisse dahingehend sehr begrenzt.

So sieht der Code aus.

Sub Change

Sheets("Überprüfen").Select

   Select Case Range("C9").Value
        Case 1
            Range("C9").Value = "Schwarz"
        Case 2
            Range("C9").Value = "Blau"
        Case 3
            Range("C9").Value = "Rot"
        Case 4
            Range("C9").Value = "Grün"
        Case 5
            Range("C9").Value = "Gelb"
        Case 6
            Range("C9").Value = "Lila"
        Case 7
            Range("C9").Value = "Pink"
        Case Else
            Range("C9").Value = ""
    End Select

End Sub

 

Vielen Dank schon mal für die Hilfe:)

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Der angebene Code soll das Automatisch bis Spalte IV ausführen
 20.06.2019 13:51:58 Gast3412
Solved
20.06.2019 15:06:06 Gast60792
Solved
20.06.2019 16:14:08 Gast13081
NotSolved
20.06.2019 19:44:41 Gast48376
NotSolved