@DERY FEBRIAN ... umumnya kalau freezepanes itu kan dari sisi kanan tarik/geser kekiri untuk kolom, atau dari bawah/tarik keatas untuk baris, kebalikan dari itu bisa nggak ...
Tidak bisa, demikian yang saya tahu.
@DERY FEBRIAN ... saya ingin menggeser cell namun cel yang berwarna tidak ikut tergeser dan jika posisi kolom kita rubah kesebelah kanan juga ...
[1]. Jika maksudnya ingin agar area yang terlihat dilayar tidak dapat digulir atau digeser, misalkan seperti gambar berikut:
bisa saja menggunakan script yang ± seperti berikut:
Sub AturScrollArea()
Dim lRows As Long, lCols As Long
Dim sAddr As String
Application.ScreenUpdating = False
Application.EnableEvents = False
With Sheet1
sAddr = .Parent.Windows(1).VisibleRange.Address
sAddr = .Range(sAddr).SpecialCells(xlCellTypeBlanks).Address
lRows = .Range(sAddr).Rows.Count - 1
lCols = .Range(sAddr).Columns.Count - 1
.ScrollArea = .Range(sAddr).Resize(lRows, lCols).Address
End With
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub
[2]. Jika maksudnya baris dan kolom yang berwarna tetap tidak bergerak (statis) sementara area edit dapat melampaui baris ke-21 dan atau melampaui kolom P (lihat contoh area pada gambar di atas), maka hal tersebut tidak bisa dilakukan, meskipun menggunakan Freezepanes. Apabila Scroll Area dari jendela Worksheet:
— tidak didefinisikan, maka Excel menetapkan yang dapat digulir adalah batas baris dan kolom maksimum.
— didefinisikan pada range tertentu, namun range tersebut melebihi batas tampak (Viewable Area) dari jendela Worksheet, maka area tersebut masih dapat digulir sampai batas baris dan kolom yang ditentukan.
— didefinisikan pada range tertentu, namun range tersebut lebih kecil dari batas tampak (Viewable Area) dari jendela Worksheet, maka area tersebut tidak dapat digulir melebihi batas tampak jendela.
Demikian yang saya ketahui dan yang dapat saya jelaskan.