Office: Markieren mehrerer Zeilen über ein Makro

Vielleiht kann mir jemand behilflich sein bei folgendem Problem:
Ich will Makrofunktionen haben, die eine bzw im Anschluss mehrere Zeilen markieren, dabei hat jede Zeile ihr eigenes Makro zum markieren der jeweiligen Zeile.
Im Ablauf sollte es so aussehen:
Beim betätigen des ersten Makros (z.B. Makro für Zeile 2) soll die Zeile 2 vollständig markiert werden.
Beim Betätigen des nächsten Makros (z.B. Makro für Zeile 5) soll die Zeile 5 vollständig markiert werden, aber die davor markierte Zeile ebenfall markiert bleiben.
Dieser Vorgang sollte dann beliebig oft für verschiedene Zeilen weitergeführt werden könnnen, so das die bereits ausgewählten Zeilen markiert bleiben.

Vielen Dank schon mal für Eure Antworten.
Randy7

 

Hallo,

dieser Code markiert Zeile 1 , 2 und die Zeilen 7:10.

Code:

Sub zeilen_Markieren()
Range("1:1, 2:2, 7:10").Select
End Sub

Gruß

 

Danke für Deine Antwort.
Das markieren mehrerer zeilen hab ich klar schon hinbekommen, das bzw. die Makros die ich suche sollten bei der Ausführung immer nur eine Zeile markieren. Bis dahin ist es ja noch kein Problem. Es solle aber für jede gewünschte zeile ein eigenes Makro vorhanden sien das nur diese eine Zeile markiert. Also sozusagen viele makros mit denen man wahlweise die jeweilige Zeile markiert ohne die markierungen zuvor wieder aufzuheben. Sozusagen eiine Selektion beliebiger Zeilen!!

 

Hallo wieso machst das nicht einfach über STRG? Also z.b bei Zeile 2 Anfangen markieren STRG gedrückt halten nächste Zeile...?

 

Ja das wäre sicher das einfachste!! Aber ich will das über eiene Funktion steuern., da die leute die das später nutzen solen mit sooo schwierigen Tastenkombinationen überfordert wären ;-)
Meinst das ist nicht möglich??

 

Hm also du meinst du klickst z.b in a10 dann soll Zeile 10:10 markiert sein dann klickst z.b in A3 dann soll zeile 3:3 markiert sein die markierung in 10:10 soll aber bleiben so in etwa?

 

Ja ganz genau so soll das dann aussehen!! Am besten wäre das natürlich über so ein Kontrollkästchen aus den Steuerelementen!! Dann würde man auch gleichzeitig deutlich erkennen welche Zeilen man schon "abgehakt" hat!!

 

ähhhh, also muss ja nicht unbedingt in ein eine Zelle klicken, am besten wie gesagt ein Kontrollkästchen oder einen button hinter dem das makro hinterlegt ist. also jede zeile sein eigenes Kontrollkästchen bzw. button!!

 

Hm reicht dir nicht auch eine Farbe oder so? Oder das die einzelnen Zellen durchgestrichen werden?Also z.B. so du schreibst in eine Zelle ein Kreuz und die ganze Zeile wird rot oder durchgestrichen. Beim selektieren ist das Problem das sobald du irgendwoanderst hinklickst die Selection wieder aufgelöst wird.

Gruß

 

Schau dir mal die Mappe an sobald du in A1:A10 ein x einträgst wird die ganze Zeile "markiert".

Gruß

 

Danke für die Mühe. Die Zeilen müssen markiert sein, so das diese dann mit einem weiteren Makro kopiert und auf ein weiteres Tabellenblatt eingefügt werden. Bis auf dieses "marieren" ist es ja kein problem. Scheint wohl so, das es nicht funktioniert wie ich es mir vorgestellt habe.
Schade aber danke nochmal!!

 

Hi gook,
wie hast denn das mit den durchgestrichenen Zellen bei x eingabe gemacht?? wie kann ich das mit einer Frabe hinterlegen anstatt den strichen?? Würde vielleicht do so klappen!!

 

Ok hab die Funktion jetzt im VBA Editor endeckt. kannst mir vielleicht noch zeigen was man da reinschriebne muss wenn man es mit grün hinterlegen will anstatt den strichen bzw. anstatt schrägen gerade striche??
Danke

 

Hallo!

dann nim z.B den Code

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Integer
For i = 1 To 10
If Cells(i, 1).Value = "x" Then
Rows(i).Interior.ColorIndex = 4
Else
Rows(i).Interior.ColorIndex = xlColorIndexNone
End If
Next i
End Sub

es wäre auch möglich alle Zeilen die eine X Markierung haben irgendwo anderst hinzukopieren.

Gruß

 

Super danke. Wäre gut alles mit x markierten zeilen auf ein anderes Tabellenblatt zu kopieren, so dass da dan aber wieder alles untereinader steht. Wollte dasw zwar irgendwie jetzt mit ner "wenn-funktion " lösen aber wenns eleganter geht wäre ich dir dankbar wenn du mir das zeigen könntets!!
Gruß