Gộp Range

[thanh tong]

Các bạn trên diễn đàn giúp mình cách viết gộp 2 lênh này lam một
"Range("B1:e9").ClearContents
Range("A5:A9").ClearContents"
Mình viết tách như thế này cũng được nhưng mình muốn các bạn hương dẫn cho mình cách viết khác ( Xoá cả 2 vùng một lúc)

 

[thanhlanh]

Các bạn trên diễn đàn giúp mình cách viết gộp 2 lênh này lam một
"Range("B1:e9").ClearContents
Range("A5:A9").ClearContents"
Mình viết tách như thế này cũng được nhưng mình muốn các bạn hương dẫn cho mình cách viết khác ( Xoá cả 2 vùng một lúc)

Thì vậy: "Range("B1:E9,A5:A9").ClearContents
Bạn có thể tự biết bằng cách ghi macro tự động, muốn chọn nhiều vùng thì bấm giữ phím Ctrl trong khi chọn

 

[nghiaphuc]

Thì vậy: "Range("B1:E9,A5:A9").ClearContents
Bạn có thể tự biết bằng cách ghi macro tự động, muốn chọn nhiều vùng thì bấm giữ phím Ctrl trong khi chọn

Mình lại thích viết như vầy hơn vì nó gọn: [B1:E9,A5:A9].ClearContents

 

[ndu96081631]

Mình Cảm ơn các bạn đã giúp mình

Ngoài các cách mà các bạn đã nêu ở trên, tôi thường hay dùng Union
Ví dụ ta có Rng1 và Rng2 là 2 vùng dữ liệu trên 1 sheet. Để gộp 2 vùng này, ta dùng Union(Rng1, Rng2)

Sub Test()
  Dim Rng1 as Range, Rng2 as Range, Rng as Range
  Set Rng1 = Range("A1:C5")
  Set Rng2 = Range("H7:K10")
End Sub

Với code đã có như trên, nếu dùng cách mà các bạn đã nêu, chả lẽ lại viết vầy:

Set Rng = Range(Rng1.Address & "," & Rng2.Address)

Có phải dùng Union sẽ gọn hơn không

Set Rng = Union(Rng1, Rng2)

Tòm lại: Tùy trường hợp mà chọn cách phù hợp để xài!

 

[thanhlanh]

Ngoài các cách mà các bạn đã nêu ở trên, tôi thường hay dùng Union
Ví dụ ta có Rng1 và Rng2 là 2 vùng dữ liệu trên 1 sheet. Để gộp 2 vùng này, ta dùng Union(Rng1, Rng2)

Sub Test()
Dim Rng1 as Range, Rng2 as Range, Rng as Range
Set Rng1 = Range("A1:C5")
Set Rng2 = Range("H7:K10")
End Sub

Với code đã có như trên, nếu dùng cách mà các bạn đã nêu, chả lẽ lại viết vầy:

Set Rng = Range(Rng1.Address & "," & Rng2.Address)

Có phải dùng Union sẽ gọn hơn không

Set Rng = Union(Rng1, Rng2)

Tòm lại: Tùy trường hợp mà chọn cách phù hợp để xài!

Vậy có thể áp dụng vào trường hợp này không?
http://www.giaiphapexcel.com/forum/...Phạm-vi-tác-dụng-của-Code&p=279397#post279397

 

[ndu96081631]

Vậy có thể áp dụng vào trường hợp này không?
http://www.giaiphapexcel.com/forum/showthread.php?42588-Phạm-vi-tác-dụng-của-Code&p=279397#post279397

Đương nhiên là được (rất thường áp dụng cho sự kiện Change)
Thử xem!

 

[ChanhTQ@]

Vậy có thể áp dụng vào trường hợp này không?
http://www.giaiphapexcel.com/forum/showthread.php?42588-Phạm-vi-tác-dụng-của-Code&p=279397#post279397

Ngay bài 2 trong nới đã có ví dụ rồi thay; Bạn thử chưa zậy?

 

[thanh tong]

mình có thử rồi nhưng trình độ về cái này mình vẫn còn abc nên mình chỉ mới viết được vậy thôi hơn nữa câu lệnh trong mỗi trường hợp lại khác nhau, mình mới tìm hiểu về VBA được khoảng 1 tháng thôi.
Cảm ơn các bạn đã rất nhiệt tình giúp mình
Cảm ơn, rất rất cảm ơn