Sử dụng Immediate

Liên hệ QC

PhanTuHuong

VBA & VB.NET for Excel & AutoCad
Thành viên danh dự
Tham gia
13/6/06
Bài viết
7,120
Được thích
24,279
Trước khi bạn nghiên cứu về ngôn ngữ VBA, bạn hãy xây dựng vốn từ vựng trong VBA cho bạn. Làm thế nào để bạn thực hiện công việc đó nhanh hơn và không bị mệt mỏi? Làm thế nào để bạn học được những câu lệnh VBA? Cửa sổ Immediate sẽ giúp bạn thực hiện công việc này. Tại cửa sổ Immediate, khi bạn nhập vào câu lệnh VBA đơn giản, sau đó ấn Enter, Excel sẽ kiểm tra và thực hiện câu lệnh đó. Nếu bạn muốn tìm hiểu thêm thông tin thì bạn thêm dấu hỏi ? ở trước, kết quả sẽ thể hiện ngay ở dòng dưới.

Cách mở cửa sổ Immediate:

Trong cửa sổ MVB, bạn vào menu View/Immediate Window hoặc phím tắt Ctrl+G.

Immediate3.jpg


Với thủ tục và hàm, bạn phải xây dựng theo quy định thì mới thực hiện được. Quá trình thực hiện (chạy macro, tính toán hàm) liên tục, bạn không thể theo dõi, kiểm tra từng bước được. Cửa sổ Immediate cho phép thực hiện từng câu lệnh một, kết quả thể hiện luôn trên Excel hay cửa sổ Immediate.

Immediate1.jpg


Ví dụ tại hình trên, từng câu lệnh thực hiện công việc như sau:

Worksheets("Sheet2").Activate ‘ Đưa Sheet2 vào kích hoạt
Range("A2").Select ‘ Chọn ô A2 (bôi đen)
Range("B5").Value= "Ngành ĐCCT" ‘ Thể hiện nội dung Ngành ĐCCT tại ô B5
Range("B5").Font.ColorIndex = 3 ‘ Gán màu đỏ cho chữ tại ô B5
Range("B5").Font.bold = True ‘ Gán chữ đậm tại ô B5

Trong quá trình thực hiện mà gặp lỗi, cửa sổ MVB sẽ báo lỗi ngay. Ví dụ như hình 17, bảng tính Sheet4 không tồn tại trong Modau.xls, cửa sổ MVB sẽ báo là không tìm thấy đối tượng đó.

Immediate2.jpg
 
PhanTuHuong đã viết:
Với thủ tục và hàm, bạn phải xây dựng theo quy định thì mới thực hiện được. Quá trình thực hiện (chạy macro, tính toán hàm) liên tục, bạn không thể theo dõi, kiểm tra từng bước được. Cửa sổ Immediate cho phép thực hiện từng câu lệnh một, kết quả thể hiện luôn trên Excel hay cửa sổ Immediate.

Immediate1.jpg
Bạn có thể chỉ rõ hơn cách chạy được như hình không? Bạn cho hỏi có lệnh nào của VBA kiểm tra sự tồn tại của 1 sheet không?
 
sps đã viết:
Bạn có thể chỉ rõ hơn cách chạy được như hình không? Bạn cho hỏi có lệnh nào của VBA kiểm tra sự tồn tại của 1 sheet không?
handung107 đã viết:
Private Function SheetExists(sname) As Boolean
' Trả về TRUE nếu tên sheet tồn tại
Dim x As Object
On Error Resume Next
Set x = ActiveWorkbook.Sheets(sname)
If Err = 0 Then SheetExists = True _
Else SheetExists = False
End Function


Bạn xem qua nhé.
Thân!
 
Lúc nào đó PhanTuHuong hay bạn nào í sẽ giới thiệu luôn phần tiếp theo (là kiểm soát các biến đã khai báo);
Xin cảm ơn trước & chờ mong luôn!


(húc &ui nhân xuân &ề!
 
Cách mở cửa sổ Immediate đồng thời với excel

Trước khi bạn nghiên cứu về ngôn ngữ VBA, bạn hãy xây dựng vốn từ vựng trong VBA cho bạn. Làm thế nào để bạn thực hiện công việc đó nhanh hơn và không bị mệt mỏi? Làm thế nào để bạn học được những câu lệnh VBA? Cửa sổ Immediate sẽ giúp bạn thực hiện công việc này. Tại cửa sổ Immediate, khi bạn nhập vào câu lệnh VBA đơn giản, sau đó ấn Enter, Excel sẽ kiểm tra và thực hiện câu lệnh đó. Nếu bạn muốn tìm hiểu thêm thông tin thì bạn thêm dấu hỏi ? ở trước, kết quả sẽ thể hiện ngay ở dòng dưới.

Cách mở cửa sổ Immediate:

Trong cửa sổ MVB, bạn vào menu View/Immediate Window hoặc phím tắt Ctrl+G.

Immediate3.jpg


Với thủ tục và hàm, bạn phải xây dựng theo quy định thì mới thực hiện được. Quá trình thực hiện (chạy macro, tính toán hàm) liên tục, bạn không thể theo dõi, kiểm tra từng bước được. Cửa sổ Immediate cho phép thực hiện từng câu lệnh một, kết quả thể hiện luôn trên Excel hay cửa sổ Immediate.

Immediate1.jpg


Ví dụ tại hình trên, từng câu lệnh thực hiện công việc như sau:



Trong quá trình thực hiện mà gặp lỗi, cửa sổ MVB sẽ báo lỗi ngay. Ví dụ như hình 17, bảng tính Sheet4 không tồn tại trong Modau.xls, cửa sổ MVB sẽ báo là không tìm thấy đối tượng đó.

Mình chỉ mở được ở môi trường VBA thôi còn Alt + Q về Excel thì cửa sổ immediate lại mất.
Mình đọc sách của của cậu tại hình: 8-3 nhưng không mở immediate giống như hình được
 
Web KT
Back
Top Bottom