Mit
Selection.Offset(0, 1).Select
wird ja eine oder mehrere Zellen in der nächsten Spalte ausgewählt.
Wie muss der Befehl lauten, falls Spalten ausgeblendet sind und ich mit Selection in der nächsten sichtbaren Spalte landen will?
Gruss, Peter
If Cells(Selection.Row, Selection.Column + 1).EntireColumn.Hidden = False Then
Cells(Selection.Row, Selection.Column + 1).Select
End If