Ý nghĩa CurrentRegion

[NH_DK]

A/C cho em hỏi nhé:

Sub Oval1_Click()
Dim i As Long
Application.ScreenUpdating = False
Range("A3:F65535").Clear
S1.[a4].CurrentRegion.Copy S2.[a3]
For i = S2.[a65535].End(xlUp).Row To 3 Step -1
    If Cells(i, 1) & Cells(i, 2) = Cells(i - 1, 1) & _
    Cells(i, 2) Then Cells(i, 1).Resize(, 2) = Empty
Next
Application.ScreenUpdating = True
End Sub

Trong ví dụ copy này thì CurrentRegion đóng vai trò là cả vùng hiện tại (S1)? Và nó vùng này là liên tục?

 

[SA_DQ]

Bạn có thể tiếp cận với fương thức này từ các hướng sau:

(*) Nhờ menu Edit=> Goto . . .=> Speacial. . .=> bấm chọn vô nút Current region
(Trước đó bạn dùng chuột kích hoạt ô [A4])
& xem thử vùng nào của dữ liệu của bạn đang được kích hoạt;

(*) Tìm chữ Curent region của chữ ký của mình & nghiền ngẫm; Chỗ nào cần đào sâu thì đưa câu hỏi tiếp lên diễn đàn.

(*) Tìm trong GPE.COM với từ khóa này, để thấy cái mông lung của fương thức này
. . . .

Chúc thành công!

 

[hoangminhtien]

A/C cho em hỏi nhé:

Sub Oval1_Click()
Dim i As Long
Application.ScreenUpdating = False
Range("A3:F65535").Clear
S1.[a4].CurrentRegion.Copy S2.[a3]
For i = S2.[a65535].End(xlUp).Row To 3 Step -1
    If Cells(i, 1) & Cells(i, 2) = Cells(i - 1, 1) & _
    Cells(i, 2) Then Cells(i, 1).Resize(, 2) = Empty
Next
Application.ScreenUpdating = True
End Sub

Trong ví dụ copy này thì CurrentRegion đóng vai trò là cả vùng hiện tại (S1)? Và nó vùng này là liên tục?

anh chọn ô A4, rồi nhấn tổ hợp phím Ctr+Shift+8 sẻ hiểu CurrentRegion là gì