thanhlanh
Thành viên tích cực


- Tham gia
- 21/2/08
- Bài viết
- 858
- Được thích
- 1,211
Không riêng gì nut Cancel mà có thể là:À bác ơi, bác xử lý giúp em chỗ này với: Khi bấm vào nút, hiện lên bảng để chọn vùng dữ liệu, bấm cancel thì nó bị lỗi.
- Dấu X
- Bấm OK nhưng không có gì
- Chiều dài thanh cần cắt lớn hơn chiều dài một cây
...
Bạn phải thêm điều kiện vào
Ví dụ câu:
Set rVung = Application.InputBox(Prompt:="Chon vung", Title:="GPE", Type:=8)
Bạn thay bằng đoạn:
On Error Resume Next
Application.DisplayAlerts = False
Set rVung = Application.InputBox(Prompt:="Chon vung", Title:="GPE", Type:=8)
On Error GoTo 0
Application.DisplayAlerts = True
If rVung Is Nothing Then Exit Sub
If rVung.Columns.Count <> 2 Then Exit Sub