title image


Smiley Re: Nummer der letzten Bildschirmzeile ermitteln?
Hallo Hermann,



so sollte es gehen.







Sub LetzteSichtbareZeile()

Dim rng As Range

Set rng = ActiveWindow.VisibleRange

MsgBox rng.Cells(rng.Count).Row - 1

End Sub



Code eingefügt mit Syntaxhighlighter 2.5





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: