Clever-Excel-Forum

Normale Version: Ausgeblendete Spalten einblenden
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Seiten: 1 2 3
Hallo Edgar,

nach rechts scrollen bis Spalten A:D nicht sichtbar sin.
E2 auswählen und Fenster fixieren.
Code:
Sub M_snb()
  Sheets(1).Columns.Hidden = False
  ThisWorkbook.Windows(1).FreezePanes = False
  Sheets(1).Range("A4:G4") = Split(Replace(Space(7), " ", "222|"), "|")
  Sheets(1).Columns.AutoFit
End Sub
Seiten: 1 2 3