Xin Add-in cố định vùng di chuột (Scroll Area) cho Office 2010

Bình thường mình làm như trong ảnh rất là bất tiện, vừa mất công lại không thể lưu sau khi đóng file. Các anh chị có add-in nào giải quyết được vụ này ko ạ?

Bạn có thể sử dụng một trong 2 sự kiện này cho đối tượng ThisWorkbook:

Private Sub Workbook_Open()
    Dim Sh As Worksheet
    For Each Sh In ThisWorkbook.Sheets
        Sh.ScrollArea = "A16:T55"
    Next
End Sub

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Sh.ScrollArea = "A16:T55"
End Sub

Cách thứ nhất áp dụng cho trường hợp bạn không có nhu cầu thêm/xóa sheet, còn cách thứ 2 áp dụng cho trường hợp có thể phát sinh việc thêm, xóa sheet trong quá trình làm việc với file.

Làm theo yêu cầu cho bạn luôn.
Sử dụng trong menu chuột phải nhé.

www.giaiphapexcel.com/diendan/threads/xin-add-in-c%E1%BB%91-%C4%91%E1%BB%8Bnh-v%C3%B9ng-di-chu%E1%BB%99t-scroll-area-cho-office-2010.114897/

Khóa học SprinGO phù hợp

Khóa học Power PI – Ứng dung trong Nhân sự

TỔNG QUAN KHÓA HỌC: POWER BI CHO NGÀNH NHÂN SỰ Khóa học Power BI cho Nhân sự được thiết kế dành riêng cho các...

Xem khóa học