Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1664to1668
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeile farbig hinterlegen

Zeile farbig hinterlegen
03.01.2019 08:41:02
Martin
Hallo,
ich würde gerne eine Zeile farbig hinterlegen. In der Variable "lngNaechsteFreieZeile" ist die Nummer der Zeile gespeichert.
Beim Befehl
Worksheets("Tabelle1").Row(lngNaechsteFreieZeile).Interior.ColorIndex = 6
kommt die Fehlermeldung
Laufzeitfehler 438
Objekt unterstützt diese Eigenschaft oder Methode nicht.
leider funktioniert IntelliSense nach dem Worksheets("Tabelle1"). nicht, sodass ich das mit .Row..... eher geraten habe....
Hoffe mir kann jemand weiterhelfen.
Danke im Voraus!
Gruß Martin

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Rows nicht Row owT.
03.01.2019 08:43:23
ChrisL
.
AW: Rows nicht Row owT.
03.01.2019 10:35:59
Martin
Danke für den Tip, mit Rows anstatt Row klappt es... Danke
Worksheets("Tabelle1").Rows(lngNaechsteFreieZeile).Interior.ColorIndex = 6
AW: Zeile farbig hinterlegen
03.01.2019 08:44:14
Hajo_Zi
Hallo Martin,
wir können nicht sehen wie "lngNaechsteFreieZeile" belegt wird.
frage jemand der neben Dir sitzt der sieht die Datei.
Die meisten hier sehe Sie nicht.

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Die Beiträge werden auch ignoriert, es erfolgt keine Antwort.
AW: Nur zur Info
03.01.2019 09:51:45
Dieter(Drummer)
Hallo Hajo,
nur ein kleiner Tipp. Du hast warscheinlich einen fertigen Text (Teil), den du dann in Antworten bei Bedarf einfügst, u.a. diesen: "Die meisten hier sehe Sie nicht."
Mir ist nur aufgefallen, dass bei "sehe" ein "n" am Ende fehlt, also "sehen".
Bitte nicht als Rechthaberei oder Meckerei ansehen und es liegt mir fern, dich zu kritisieren.
Gruß, Dieter(Drummer)
Anzeige
AW: Zeile farbig hinterlegen
03.01.2019 08:46:35
JoSi
Hi Martin,
versuch es mal so:
Sub Zeile_einfärben()
Worksheets("Tabelle1").Range("A" & IngNaechsteFreieZeile).EntireRow.Interior.Color = 6
End Sub
Gruß,
Johannes

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige