Tạo một range từ range có sẵn

[dlphu85]

Chào các bạn,
Mình là thành viên mới và mới học VBA
Các bạn cho mình hỏi, mình có đoạn Code như sau:

Function thu (X as range)
dim Y as range

End Function

Mình muốn Y là 1 range là cột đầu tiên của range X

Cám ơn các bạn rất nhiều

 

[ndu96081631]

Thử dùng cái này:

Function thu (X as range)
   Dim Y as range
    Set Y =  X.Resize(X.Rows.Count, 1)
..................
End Function

 

[dlphu85]

Mình đã thử rồi.
Cám ơn bạn rất nhiều
nhưng không biết range X co bị thay đổi không

 

[ndu96081631]

Mình đã thử rồi.
Cám ơn bạn rất nhiều
nhưng không biết range X co bị thay đổi không

Yên chí, X vẩn nguyên con, không bị thay đổi gì cả!
Không tin cứ thử