Lỗi chuyển sheet bằng userform (1 người xem)

[vthanhtung79]

Chào các bác. Em đang bị lỗi như sau
- File excel của e có vài sheet. (Mỗi sheet này chỉ có vài cell unlock để nhập liệu. các Sheet đã được protect sheet (không có pass))
- Mỗi sheet có một nút gọi UserForm. Từ userform này bấm nút chọn sheet để nhảy tới sheet khác thì con trỏ vẫn nằm lại trên sheet đầu tiên mà nó load lên chứ không hoạt động trên sheet vừa nhảy tới)
Em sử dụng code sau

Private Sub S1_Click()
Worksheets("Sheet1").Select
UserForm1.Hide
End Sub

Các bác xem dùm em phải sửa lỗi này như thế nào ạ ?

 

[huuthang_bd]

Chào các bác. Em đang bị lỗi như sau
- File excel của e có vài sheet. (Mỗi sheet này chỉ có vài cell unlock để nhập liệu. các Sheet đã được protect sheet (không có pass))
- Mỗi sheet có một nút gọi UserForm. Từ userform này bấm nút chọn sheet để nhảy tới sheet khác thì con trỏ vẫn nằm lại trên sheet đầu tiên mà nó load lên chứ không hoạt động trên sheet vừa nhảy tới)
Em sử dụng code sau

Private Sub S1_Click()
Worksheets("Sheet1").Select
UserForm1.Hide
End Sub

Các bác xem dùm em phải sửa lỗi này như thế nào ạ ?

Click sheet nào thì chọn sheet đó rồi làm việc trên sheet đó. Tôi thấy bình thường chứ có gì bất thường đâu.

 

[vthanhtung79]

Click sheet nào thì chọn sheet đó rồi làm việc trên sheet đó. Tôi thấy bình thường chứ có gì bất thường đâu.

Trên sheet khi bấm nút menu gọi userform, từ uerform đó chọn sheet khác thì con trỏ vẫn nằm trên các cell của sheet đầu tiên bác ạ. Bác thử check lại file e gửi kèm đó.

 

[giaiphap]

Chào các bác. Em đang bị lỗi như sau
- File excel của e có vài sheet. (Mỗi sheet này chỉ có vài cell unlock để nhập liệu. các Sheet đã được protect sheet (không có pass))
- Mỗi sheet có một nút gọi UserForm. Từ userform này bấm nút chọn sheet để nhảy tới sheet khác thì con trỏ vẫn nằm lại trên sheet đầu tiên mà nó load lên chứ không hoạt động trên sheet vừa nhảy tới)
Em sử dụng code sau

Private Sub S1_Click()
Worksheets("Sheet1").Select
UserForm1.Hide
End Sub

Các bác xem dùm em phải sửa lỗi này như thế nào ạ ?

Bạn sửa chổ.

Worksheets("Sheet1").Select

Thành đoạn code dưới xem sao.

Worksheets("Sheet1").Active

 

[vthanhtung79]

Bạn sửa chổ.

Worksheets("Sheet1").Select

Thành đoạn code dưới xem sao.

Worksheets("Sheet1").Active

Dạ không được bác ơi

Bài đã được tự động gộp: 12/6/18

Bác @ndu96081631 có thể xem giúp em được không ạ ?

 

[quanluu]

Chào các bác. Em đang bị lỗi như sau
- File excel của e có vài sheet. (Mỗi sheet này chỉ có vài cell unlock để nhập liệu. các Sheet đã được protect sheet (không có pass))
- Mỗi sheet có một nút gọi UserForm. Từ userform này bấm nút chọn sheet để nhảy tới sheet khác thì con trỏ vẫn nằm lại trên sheet đầu tiên mà nó load lên chứ không hoạt động trên sheet vừa nhảy tới)
Em sử dụng code sau

Private Sub S1_Click()
Worksheets("Sheet1").Select
UserForm1.Hide
End Sub

Các bác xem dùm em phải sửa lỗi này như thế nào ạ ?

Trên máy mình chạy bình thường, không có vấn đề gì cả.

 

[Hau151978]

Mình không chạy thử nhưng ở bài 4 bạn thử thay Active thành Activate xem

 

[vthanhtung79]

Trên máy mình chạy bình thường, không có vấn đề gì cả.

Mình không chạy thử nhưng ở bài 4 bạn thử thay Active thành Activate xem

Rất xin lỗi các bác. Em đã thử chạy trên PC thì không bị lỗi như em chạy trên laptop. Rất cảm ơn các bác đã giúp đỡ