Tắt thanh cuộn ngang

[chibi]

Chào các bạn!
Tôi có một sheet với phần nhập dữ liệu chỉ gồm ít cột, phần hiển thị vừa chiều ngang của màn hình, các cột khác tôi chọn hide. Tôi đã tắt thanh cuộn ngang bằng cách

Private Sub Worksheet_Activate()
ActiveWindow.DisplayHorizontalScrollBar = False
End Sub

Nhưng nếu vào Tools -> Options -> View vẫn cho hiện lại thanh này được.
Các bạn có thể giúp mình khoá luôn chức năng này để không bật được thanh cuộn ngang khi đang ở sheet này được không?
Xin cảm ơn.

 

[tedaynui]

Chào Chibi.
Để giới hạn vùng, Chibi dùng lệnh này xem
ActiveSheet.ScrollArea = "$B$3:$F$18"
Chibi thay "$B$3:$F$18" thành vùng hiển thị tương ứng
Thân !

 

[chibi]

Cảm ơn tedaynui. Rất hay, đơn giản mà hiệu quả. Đúng là đẹp dịu dàng mà không chói loá.

 

[tedaynui]

Chào Chibi.
Còn một cách khác không phải dùng đến VBA. Nhưng hình như chỉ có tác dụng với Excel 2003 về sau. Chibi chọn vùng muốn hiển thị, Format Cells - Protection - bỏ dấu tích Locked đi. Sau đó Protect sheet sẽ hiện ra thông báo của Protect Sheet, ở mục Allow all users of this worksheet to, bạn bỏ dấu tích select lock cells và OK
Chúc bạn thành công.