Umarım yapmak istediğimi anlatabilmişimdir.

8
●104

Sub Freeze_Panes()
'first, ensure that no panes are frozen
ActiveWindow.FreezePanes = False
'select the row that you want to freeze based on
Rows("10:1").select
'freeze panes
ActiveWindow.FreezePanes = True
End SubEğer tek bir satırı sabit tutmak istersenizRows(10).Select