Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
476to480
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
476to480
476to480
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

VBA: Erstes sichtbares Feld auswählen

VBA: Erstes sichtbares Feld auswählen
27.08.2004 13:38:08
Andrea
Hallo,
folgendes hoffentlich einfaches Problem:
Ich setze eine Autofilter und würde dann gerne per VBA die erste sichtbare
Zeile auswählen. Wie mache ich denn das?
Gruß und schönes WE
Andrea

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Erstes sichtbares Feld auswählen
27.08.2004 14:07:09
Basti

Sub til()
Dim C As Range
Dim a As Integer
a = 0
For Each C In rows("1:50")
If C.Hidden = False Then
If a = 0 Then
a = C.Offset(0, 0).Column
End If
End If
Next C
End Sub

hab das gestern oder vorgestern von einem hier fuer spalten bekommen.
weiss nich ob das so geht, aber der ansatz her stimmt
Original ( zählt aber nur bis Spalte vor der ersten sichtbaren):

Sub til()
Dim C As Range
Dim a As Integer
a = 0
For Each C In Columns("AB:IV")
If C.Hidden = False Then
If a = 0 Then
a = C.Offset(0, -1).Column
End If
End If
Next C
MsgBox (Cells(3, a))
End Sub

Anzeige
AW: VBA: Erstes sichtbares Feld auswählen
P@ulchen
Hi Andrea,
zB.:
Range("A2:" & Range("A2").End(xlDown).Address).SpecialCells(xlCellTypeVisible).Select
Gruß aus Leipzig
P@ulchen
Das Forum lebt auch von den Rückmeldungen !

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige