Möglichst viele Zeilen oberhalb anzeigen
27.07.2016 10:34:13
Peter
Mit nachstehendem Code wähle ich die Zelle A32 an. Vorgängig wähle ich jedoch die Zelle A1 an. Dadurch erreiche ich, dass ich nach Ablauf des Codes möglichst viele Zellen oberhalb A32 sehe.
Kann man das eleganter machen?
Gruss, Peter
Sub xx()
With wbSheet
.Activate
.Range("A1").Activate
.Range("A32").Activate
End With
End Sub
Anzeige