Excel erste Zeile einfrieren

So hab es jetzt mal in einen Code gefasst:

Attribute VB_Name = "Modul1"
Sub Einfrieren()
Attribute Einfrieren.VB_ProcData.VB_Invoke_Func = " \n14"
'
' Einfrieren Makro
'

'
Sheets("Tabelle1").Select
With ActiveWindow
.SplitColumn = 0
.SplitRow = 1
End With
ActiveWindow.FreezePanes = True
End Sub


Mein Problem jetzt ist, dass ich die Funktion Split Column und Split Row im ActiveX nicht finden kann.

Anzeige