Forums Neueste Beiträge
 

1. sichtbaren wer bei gefilterter Liste ausgeben

20/01/2009 - 15:52 von thomas müller | Report spam
Hallo,

habe einen Datensatz, bei dem ich in mehreren Spalten per Autofilter
Filterungen vornehme. Wenn nun alle Filter gesetzt sind, möchte ich aus
Spalte A (in der ich vorher keine Filter gesetzt habe) den 1. sichtbaren
Wert in eine beliebige Zelle ausgeben?

Wie stelle ich das an?

Alles unter Xl2007

Danke

thomas
 

Lesen sie die antworten

#1 Andreas Killer
22/01/2009 - 15:25 | Warnen spam
thomas müller schrieb:

habe einen Datensatz, bei dem ich in mehreren Spalten per Autofilter
Filterungen vornehme. Wenn nun alle Filter gesetzt sind, möchte ich aus
Spalte A (in der ich vorher keine Filter gesetzt habe) den 1. sichtbaren
Wert in eine beliebige Zelle ausgeben?


Nun ja, der 1. sichbare Wert wàre die Überschrift, falls Du eine hast.

Die sichbaren Zellen bekommst Du via SpecialCells:

Sub Test()
Dim A As Range, R As Range
Set A = ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible)
For Each R In A
Debug.Print R.Value
Next
End Sub

Andreas.

Ähnliche fragen