Hoàn thiện code VBA

[doanhhoang79]

Tôi sử dụng sự kiện Workbook_Open() và đoạn code sau:

[COLOR=Blue]Private Sub Workbook_Open()
Application.Worksheets("Sheet1").ScrollArea = "A1:A10000"
End Sub[/COLOR]

Tuy nhiên, lại không thể sử dụng thanh cuộn scrollbar sang trái, sang phải được.

Tôi muốn làm sao ta có thể sử dụng scrollbar lên, xuống, sang trái, sang phải.

Mong các anh chị giúp đỡ hoàn thiện code được theo ý muốn, tôi đang rất cần.

Mong tin các anh chị

 

[ndu96081631]

Tôi sử dụng sự kiện Workbook_Open() và đoạn code sau:

Private Sub Workbook_Open()
Application.Worksheets("Sheet1").ScrollArea = "A1:A10000"
End Sub

Tuy nhiên, lại không thể sử dụng thanh cuộn scrollbar sang trái, sang phải được.

Tôi muốn làm sao ta có thể sử dụng scrollbar lên, xuống, sang trái, sang phải.

Mong các anh chị giúp đỡ hoàn thiện code được theo ý muốn, tôi đang rất cần.

Mong tin các anh chị

Muốn cuộn thoải mái thì xóa đoạn code ấy đi

 

[nguyentuhp]

Đoạn code sau cho phép ScrollArea từ cột A đến cột AA, hàng 1 đến hàng 100

Application.Worksheets("Sheet1").ScrollArea = "A1:AA100"