Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1104to1108
1104to1108
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen farbig markieren

Forumthread: Zeilen farbig markieren

Zeilen farbig markieren
Frank
Guten Abend und Hallo,
Ich habe eine ComboBox die mit Werten Zahlen gefüllt ist. Wenn ich nun einen Wert auswähle wird diese entsprechende Zeile in Excel markiert. ABer wie erreiche ich, dass sobald ich die nächste wähle, die alte Zeile ohne Farbe angezeigt wird?
Private Sub ComboBox1_Change()
Cells(Left(ComboBox1.Text, 2), 1).Select
Range(Cells(Left(ComboBox1.Text, 2), 1), Cells(Left(ComboBox1.Text, 2), 100)).Interior. _
ColorIndex = 6
'wie markiert man die ganze Zeile?
End Sub
Gruß, Frank
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
so funktioniert es nicht...
22.09.2009 21:39:28
Frank 

Private Sub ComboBox1_Change()
Dim markierte_Zeile As Long
Range(Cells(markierte_Zeile, 1), Cells(markierte_Zeile, 100)).Interior.ColorIndex = xlNone
Cells(Left(ComboBox1.Text, 2), 1).Select
Range(Cells(Left(ComboBox1.Text, 2), 1), Cells(Left(ComboBox1.Text, 2), 100)).Interior. _
ColorIndex = 6
markierte_Zeile = Left(ComboBox1.Text, 2)
End Sub
denn der Wert für markierte_Zeile wird ja nach dem durchlaufen der Prozedur nicht gespeichert.
Anzeige
AW: so funktioniert es nicht...
22.09.2009 21:48:53
Frank
Ich habe jetzt eine Lösung gefunden, indem ich mir ein Hilfslabel erstellt habe mit visible = false, aber es gibt sicherlich eine elegantere Lösung...
Private Sub ComboBox1_Change()
Dim markierte_Zeile As Long
If Label1.Caption = "" Then
Else
Range(Cells(Label1.Caption, 1), Cells(Label1.Caption, 100)).Interior.ColorIndex =  _
xlNone
End If
Cells(Left(ComboBox1.Text, 2), 1).Select
Range(Cells(Left(ComboBox1.Text, 2), 1), Cells(Left(ComboBox1.Text, 2), 100)).Interior. _
ColorIndex = 6
markierte_Zeile = Left(ComboBox1.Text, 2)
Label1.Caption = markierte_Zeile
End Sub

Anzeige
AW: so funktioniert es nicht...
22.09.2009 23:34:06
Daniel
HI
möglich wäre:
- pauschal mal alle Zellen entfärben mit
Cells.Interior.Colorindex = xlnone
die eleganteste Mehtode wäre meiner Ansicht nach folgende:
- folgenden Code einrichten: 
Private Sub Combobox1_Change()
thisWorkbook.Names.Add Name:="ZeilenMarker", RefersToR1C1:="=" & Combox1.Text
End Sub

- für alle Zellen, die eventuell markiert werden sollen, folgende Bedingte Formatierung einrichten:
als Formel: =Zeile()=ZeilenMarker und das entsprechende Muster
die Methode über die Bedingte Formatierung hat den Vorteil, daß sie einfach zu programmieren ist und eventuell bestehende Hintergrundfarben erhalten bleiben und nicht gelöscht werden.
Gruß, Daniel
Anzeige
AW: so funktioniert es nicht...
23.09.2009 21:03:57
Frank
Die Idee mit der bedingten Formatierung finde ich sehr gut und zeigt mir einen ganz anderen Weg auf. Vielen Dank dafür. Manchmal ist man so auf die Lösung eines Problems versteift, dass eine neutrale Sicht doch sehr helfen kann...
DANKE.
AW: Zeilen farbig markieren
23.09.2009 06:19:43
hary
Moin Frank
Wenn keine anderen Farben vorhanden. probiers mal so. 

'--Tabellenname anpassen und evtl UsedRange aendern ----------
Worksheet("Tabelle1").UsedRange.EntireRow.Interior.ColorIndex = xlNone 'setzt alle Farben im  _
benutzten Bereich zurueck
Cells(Left(ComboBox1.Text, 2), 1).EntireRow.Interior.ColorIndex = 6 'wie markiert man die  _
ganze Zeile? so!!!

gruss hary
Anzeige
AW: Zeilen farbig markieren
23.09.2009 21:02:17
Frank
Hallo Hary. Vielen Dank für deine Hilfe. Den EntireRow Befehl kannte ich nicht. Somit weiß ich wieder etwas mehr :-)
DANKE und Gruß, Frank
;

Forumthreads zu verwandten Themen

Änderung Zeilen und Spaltenbezug
lass

Hallo, ich habe folgendes Problem.
Ist
(Zeile2/Spalte A2): Auftrag xyz; (Zeile2/Spalte B2):Mitarbeiter 1; (Zeile2/Spalte C2)= Mitarbeiter 2
(Zeile3/Spalte A3): Auftrag xyz; (Zeile3/Spalte B3):Mitarbeiter 3; (Zeile3/Spalte C3)= Mitarbeiter 4
(Zeile4/Spalte A...
15.09.2008 08:29:55
Thread-ID: 1009654
17 Beiträge
In Zeile suchen und Spalte löschen
Ralf

Hallo Excel - Experten,
nach laaaaaaanger Suche habe ich
im Archiv eine Lösung gefunden, die meinem Problem
sehr nahe kommt - - - es muß nur andersherum laufen :-)
Dieser Code unten sucht in einer Spalte nach einem best. Wert
und löscht die entsprechende Zeile, ich bräuchte...
23.10.2008 09:42:32
Thread-ID: 1018520
7 Beiträge
wenn Spalte F nicht leer, ganze Zeile markieren
maxx_1985

Hallo mit'mander
Ich hab ein kleines VBA Probelem. Naemlich das fogende:
Wenn Zelle in Spalte F NICHT leer, dann die ganze Zeile markieren (einfach markieren, keine Farbe und nichts).
Bin gerade dabei mit dem Recorder was zu basteln (da ich noch kein vba kann) und bin an ganau diese...
19.11.2008 18:37:00
Thread-ID: 1026165
11 Beiträge
Zeilen durchsuchen und alle Spalten auslesen.
LOTHARP

Hallo Zusammen,
ich habe eine Tabelle in der ich mir den Maxwert einer bestimmten Zeile wiedergeben lasse mit folgendem MAkro gelöst:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Column = 9 And Target.Row >= 2 And Target.Row
In de...
10.12.2008 11:36:41
Thread-ID: 1031637
4 Beiträge
Anzeige
unerklärliche Spalten- und Zeilenköpfe
Bernhard

Liebe Excel-Fangemeinde,
bei einem Übungsbeispiel einer Schulungsteilnehmerin trat folgendes Phänomen auf (siehe Screenshot):

Auf dem ersten Tabellenblatt wurden einige einfache Formatierungen (unter anderem doppelt unterstrichen, hochgestellt und durchgestrichen) ganz normal über...
15.12.2008 11:58:00
Thread-ID: 1032990
3 Beiträge
Zeile und Spalte markieren
Karsten

Hallo Excel Freunde,
ich habe die Adresse von 2 Zellen (ZeileA, SpalteA) und (ZeileB, SpalteB) und möchte den gesmten Bereich markieren und dann kopieren.
Habe folgendes probiert:
Set Bereich1 = Rows("ZeileA:ZeileB")
Set Bereich2 = Columns("SpalteA:SpalteB")
Set Gesamtb = Un...
18.12.2008 15:54:47
Thread-ID: 1033909
5 Beiträge
Anzeige
Zeilen und Spalten ausblenden
Andreas

Hi Leute,
Hab folgendes Problem:
Ich hab mehrere Tabellenblätter mit Tabellen, in denen in Abhängigkeit von Einträgen auf einer Übersichtsseite bestimmte Zeilen und Spalten mit einem Makro ausgeblendet werden sollen.
Hier Mein Beispiel-File:
https://www.herber.de/bbs/user/58482...
16.01.2009 15:21:22
Thread-ID: 1040598
8 Beiträge
Anzeige
Makro Spalte S bis letzter Wert Spalte A markieren
Jonathan

Hallo zusammen,
ich habe folgendes Probelem:
Ich möchte gerne Spalte S bis zum letzten Wert von Spalte A (variabel) markieren (damit im Anschluss der Spalte ein Rahmen gegeben werden kann).
Gibt es hierfür ein Makro?
Vielen Dank schon mal für eure Hilfe.
Gruß
Jonathan
30.01.2009 12:31:58
Thread-ID: 1045358
3 Beiträge
Wert in Spalte und entsprechender Zeile Finden
Klaus

Hi,
folgendes Problem:
Meine ExcelSpalten werden fortlaufend erweitert mit neuen Nummern.
Ich möchte jetzt eine Möglichkeit, in einer Zelle (usedrange +2) bei Eingabe einer neuen (existierenden)
Spaltenbezeichnung, automatisch den Zellenwert aus einer bestimmten Zeile haben. Da...
18.02.2009 15:51:00
Thread-ID: 1051850
3 Beiträge
Anzeige
Tastenkombination für "Gesamte Zeile Markieren"
Tobias

Gibt es eine Tastenkobination für "Gesamte Zeile markieren" oder muß man das immer umständlich mit der Maus machen ?
02.03.2009 14:31:51
Thread-ID: 1055569
5 Beiträge
wert in zeile suchen und spalte kopieren
Astrid

Hallo Fachleute,
Ich stecke bei folgendem Excel problem fest:
Ich habe eine relativ komplexe Exceldatei mit der ich die Ergebnisse aus einem Simulationsprogramm auswerte. Alle Auswertung bezieht sich auf Werte aus einem Blatt "Datei" mit einer festen Struktur. D.h. ich habe in Zelle A 1...
11.03.2009 12:41:00
Thread-ID: 1059072
9 Beiträge
Bestimmte Zeilen und Spalten löschen
jo_cindy

Hallo Leute, hab mal wieder eine Frage:
Nachfolgende Exceldatei bekomme ich aus meiner Zeiterfassung ausgelesen. Die rot markierten Bereiche (nur zur Erklärung hier rot gekennzeichnet!) benötige ich aber nur, alle anderen Daten sollen nicht nur ausgeblendet werden, sondern gelöscht werden....
28.04.2009 19:32:33
Thread-ID: 1071712
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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