Mr.hieudoanxd
Thành viên thường trực
- Tham gia
- 25/10/19
- Bài viết
- 322
- Được thích
- 150
Bài toán của em là: Em muốn mở một Workbook khác từ Workbook đang sử dụng.
Có 2 trường hợp xẩy ra Workbook đó có thể mở hoặc không.
Trong trường hợp Workbook đã mở thì chuyển đến làm việc với workbook đó, trường hợp báo lỗi do chưa mở thì mở workbook
Em bẫy lỗi bằng On Error Goto Fixit
Tuy nhiên khi chạy code, em không hiểu vì sao nó luôn chạy vào Nhãn FixIt.
P/s: Em không muốn khi Workbook đã mở thì sử dụng Workbooks.Open vì nó sẽ hiện hộp thoại ReOpen nếu không may chọn Yes sẽ không hay. Không biết có thể sửa lại đoạn Code này hoặc có cách nào ko hiện thị hộp thoại ReOpen hay cách giải quyết bài toán này của em không ạ?
Có 2 trường hợp xẩy ra Workbook đó có thể mở hoặc không.
Trong trường hợp Workbook đã mở thì chuyển đến làm việc với workbook đó, trường hợp báo lỗi do chưa mở thì mở workbook
Em bẫy lỗi bằng On Error Goto Fixit
Tuy nhiên khi chạy code, em không hiểu vì sao nó luôn chạy vào Nhãn FixIt.
Mã:
Sub Go_VLDV()
Const cFilename = "Vat lieu dau vao.xlsm" 'Khai bao hang so
Dim Fullname As String
Fullname = ActiveWorkbook.Path & "\" & cFilename
On Error GoTo FixIt
Windows("Vat lieu dau vao.xlsm").Activate
FixIt:
Workbooks.Open (Fullname)
Exit Sub
End Sub
