QQ31 Freeze Sheet
QQ31 Lock sheet ไม่ให้ขยับ Freeze Sheet
File https://1drv.ms/x/s!Ak8Fla2fCeo63WiC3...
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Application.EnableEvents = False
Sheets("Report").Move Before:=Sheets(Application.Max(1, ActiveSheet.Index - 8))
Sh.Activate
Application.EnableEvents = True
End Sub
/ excelwizard
/ xcwizard
/ excelsuperfan