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

Letzte beschriebene zelle in zeile vba

Letzte beschriebene zelle in zeile vba
26.04.2017 15:23:36
Marcus
Hallo,
wie markiere ich per vba die letzte beschriebene Zelle in Zeile A?
VG

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

Betreff
Datum
Anwender
Anzeige
AW: Letzte beschriebene zelle in zeile vba
26.04.2017 15:25:39
Marcus
Beziehungweise ich benötige ein Makro das von Zelle A1 bis zur letzten beschriebenen Zelle in Zeile A markiert.
AW: Letzte beschriebene zelle in zeile vba
26.04.2017 15:28:16
Crazy
Hallo
meinst du so?
Sub test()
Dim lngLetzte As Long
lngLetzte = Cells(Rows.Count, 1).End(xlUp).Row
Range("A1:A" & lngLetzte).Select
End Sub
MfG Tom
AW: Letzte beschriebene zelle in zeile vba
26.04.2017 15:34:29
Marcus
Hallo Tom,
danke sehr.
Leider klappt es noch nicht ganz. Hintergrund: Ich möchte die beschrifteten Zellen in Zeile1 als Überschriften haben. Gestartet bei A1 - A... Diese möchte ich per Makro entsprechend direkt formatieren:
Dim lngLetzte As Long
lngLetzte = Cells(Rows.Count, 1).End(xlUp).Row
Range("A1:A" & lngLetzte).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorDark1
.TintAndShade = -0.149998474074526
.PatternTintAndShade = 0
End With
Leider ändert er irgendwie nur ZelleA1 der Rest bleibt weiß.
Hast du eine Idee?
Anzeige
AW: Letzte beschriebene zelle in zeile vba
26.04.2017 15:39:35
Crazy
Hallo
du kennst schon den Unterschied zwischen Zeilen und Spalten?
Sub test()
Dim lngLetzte As Long
lngLetzte = Cells(1, Columns.Count).End(xlToLeft).Column
Cells(1, 1).Resize(1, lngLetzte).Select
End Sub
MfG Tom
AW: Letzte beschriebene zelle in zeile vba
26.04.2017 15:48:52
Marcus
Schonmal gehört ja. Klappt. Danke sehr!
AW: Letzte beschriebene zelle in zeile vba
26.04.2017 15:33:59
Daniel
Hi
Range(Cells(1, 1), Cells(Rows.count, 1).end(xlup)).Select
Gruß Daniel

182 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige