Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1948to1952
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

VBA: Zellen in Aktiver Zeile ausfüllen

VBA: Zellen in Aktiver Zeile ausfüllen
09.10.2023 09:23:13
Micha
Hallo zusammen,

im Moment lasse ich über eine CommandButton die aktive Zeile ausfüllen.



Private Sub CommandButton1_Click()
On Error Resume Next
Set Zeile = Rows(ActiveCell.Row)
'Zeile.Interior.ColorIndex = xlNone
Zeile.Interior.ColorIndex = 27
End Sub


Durch eine Änderung müsste ich den Bereich jetzt auf den Spaltenbereich C bis N, der aktiven Zeile, eingrenzen.
Habe aber keine Idee wie.
Vielleicht habt ihr eine Idee?
Danke euch
Gruß Micha

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Zellen in Aktiver Zeile ausfüllen
09.10.2023 09:29:54
daniel
Da gibt es viele Möglichkeiten

Meine Favoriten:

ActiveCell.EntireRow.Resize(, 12).Offset(0, 2)

Intersect(ActiveCell.EntireRow, Range("C:N"))

Gruß Daniel
AW: VBA: Zellen in Aktiver Zeile ausfüllen
09.10.2023 09:55:53
GerdL
Moin Micha!

Cells(ActiveCell.Row, 3).Resize(1, 12).Interior.ColorIndex = 27


Gruß Gerd
AW: VBA: Zellen in Aktiver Zeile ausfüllen
09.10.2023 10:45:45
Micha
Funktioniert perfekt.
Ich danke euch

VG Micha

closed
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige