Lệnh ẩn Excell này khác nhau như thế nào?

Liên hệ QC

anhtotbung35

Thành viên hoạt động
Tham gia
16/2/09
Bài viết
149
Được thích
26
Nghề nghiệp
Kế toán
Trong VBA có 2 lệnh này, mình thấy lệnh nào cũng đều ẩn đi excell:
Application.Visible = True (hoặc False)
Application.DisplayAlerts = True (hoặc False)
Nhưng không biết 2 lệnh này khác nhau về chức năng như thế nào?
_)()(-
 
Trong VBA có 2 lệnh này, mình thấy lệnh nào cũng đều ẩn đi excell:
Application.Visible = True (hoặc False)
Application.DisplayAlerts = True (hoặc False)
Nhưng không biết 2 lệnh này khác nhau về chức năng như thế nào?
_)()(-

Mình trình độ VBA dạng ABC nên cũng có thắc mắc giống bạn, sao mà ngôn ngữ lập trình phong phú thế, mong các Thầy, các Pro trên diễn đàn viết cho một bài về các câu lệnh tương đương. Xin cám ơn các Sư phụ trước!
 
Upvote 0
Trong VBA có 2 lệnh này, mình thấy lệnh nào cũng đều ẩn đi excell:
Application.Visible = True (hoặc False)
Application.DisplayAlerts = True (hoặc False)
Nhưng không biết 2 lệnh này khác nhau về chức năng như thế nào?
_)()(-

2 câu này hoàn toàn khác nhau chứ không giống nhau nha bạn.

1.) Application.Visible = True (hoặc False)

Application.Visible = False '--> Ẩn cửa sổ ứng dụng của Excel, trường hợp này sử dụng trên userform, chỉ hiện userform trên màn hình

Application.Visible = True '--> Hiện lại cửa sổ ứng dụng của Excel

2.) Application.DisplayAlerts = True (hoặc False)

Application.DisplayAlerts = False '--> Bỏ qua những nhắc nhở của Excel Ví dụ khi ban xóa 1 sheet nó hiện thông báo bạn có muốn xóa không, khi thêm dòng này vào nó không còn hiện thông báo đó nữa

Application.DisplayAlerts = True '--> Sau khi bỏ thông báo thì phải tra về mặc định của nó.
 
Upvote 0
2 câu này hoàn toàn khác nhau chứ không giống nhau nha bạn.

2.) Application.DisplayAlerts = True (hoặc False)
Application.DisplayAlerts = False '--> Bỏ qua những nhắc nhở của Excel Ví dụ khi ban xóa 1 sheet nó hiện thông báo bạn có muốn xóa không, khi thêm dòng này vào nó không còn hiện thông báo đó nữa

Cho mình hỏi thêm, trong trường hợp xóa sheets (delete hoặc cancel) hay tắt file (Yes hoặc No hoặc Cancel) thì nó sẽ mặc định là gì?
Vì trong trường hợp này nó không còn hiện thông báo nhắc nhở.
 
Upvote 0
Cho mình hỏi thêm, trong trường hợp xóa sheets (delete hoặc cancel) hay tắt file (Yes hoặc No hoặc Cancel) thì nó sẽ mặc định là gì?
Vì trong trường hợp này nó không còn hiện thông báo nhắc nhở.
Bạn thử làm như sau:
Sub Caigido()
'Tat thong bao
Application.DisplayAlerts = False
'Dong lenh xoa cua ban o day

'..............

'Sau khi tat xong phai mo len lai, (tra ve mac dinh cua no

Application.DisplayAlerts = True

End sub
 
Upvote 0
Thế còn hai câu:
MsgBox Application.ThisWorkbook.Path

MsgBox CurDir
Thì có tương đương không bạn?
Giống nhau là đều lấy đường dẫn
Nhưng Application.ThisWorkbook.Path thì lấy kết quả chính xác của file đó. Còn CurDir thì nó lấy đường dẫn mà trước đó bạn mở hoặc lưu 1 file.
Bạn test thử nhé, cùng 1 đoạn code trên bạn thử chạy code lần 1, ghi lại đường dẫn.
Xong bạn mở 1 file nào đó = file\open (hoặc nhấn Ctrl+O) ở 1 đường dẫn khác, rồi quay lại chạy code, từ đó rút ra kết luận nhé
 
Upvote 0
Giống nhau là đều lấy đường dẫn
Nhưng Application.ThisWorkbook.Path thì lấy kết quả chính xác của file đó. Còn CurDir thì nó lấy đường dẫn mà trước đó bạn mở hoặc lưu 1 file.
Bạn test thử nhé, cùng 1 đoạn code trên bạn thử chạy code lần 1, ghi lại đường dẫn.
Xong bạn mở 1 file nào đó = file\open (hoặc nhấn Ctrl+O) ở 1 đường dẫn khác, rồi quay lại chạy code, từ đó rút ra kết luận nhé

Rất đúng, nếu các bạn giỏi tiếng anh một chút thì có thể hiểu ý nghĩa của 2 hàm này
1) hàm Application.ThisWorkbook.Path: ở đây ta phân tích từ "ThisWorkbook", ThisWorkbook ý nghĩa của nó chính là trỏ vào file excel mà bạn đang cài lệnh và thường xử dụng trong viết code VBA (không hẳn là file đang active nha bạn) => Application.ThisWorkbook.Path chính là đường dẫn trỏ tới file bạn đang làm việc
2) hàm CurDir: được viết tắc từ Curent Directory, có ý nghĩa là thư mục hiện tại. Tuỳ vào ngữ cảnh mà cho ra kết quả khác nhau
(mặc định hàm này trỏ vào thư mục "My Documents")
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom