Chọn (Select) dòng thứ n trong vùng AutoFilter

[ndu96081631]

Tôi có vùng dử liệu E7:J30 đang dùng AutoFilter...
Xin hỏi phải dùng code gì để chọn dòng thứ n của vùng này (Gần giống với đánh STT sau Filter)

 

[boyxin]

Tôi có vùng dử liệu E7:J30 đang dùng AutoFilter...
Xin hỏi phải dùng code gì để chọn dòng thứ n của vùng này (Gần giống với đánh STT sau Filter)

xem thế này được không?​

 

[hoangvuluan]

Cáh làm của BoyXin là khả thi, chỉ xin bổ sung việc sửa lại list trong validation:
=OFFSET($C$7,1,0,COUNTA($C$7:$C$65536),1)

để khi thay đổi filter thì list thay đổi theo.

Thân!

 

[ndu96081631]

Cáh làm của BoyXin là khả thi, chỉ xin bổ sung việc sửa lại list trong validation:
=OFFSET($C$7,1,0,COUNTA($C$7:$C$65536),1)

để khi thay đổi filter thì list thay đổi theo.

Thân!

Hỏng được! Cột C này là cột phụ, tôi tạo ra cho các bạn dể hình dung vấn đề thôi, nó không có thật trong file

 

[ndu96081631]

Tôi sửa code trên lại như sau:

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim Clls As Range
  If Target.Address = "$C$7" Then
    With ActiveSheet.AutoFilter.Range
      For Each Clls In .Cells.Resize(, 1).SpecialCells(12)
        i = i + 1
        If i = Target + 1 Then Clls.Resize(, .Columns.Count).Select
      Next
    End With
  End If
End Sub

Tổng quát cho mọi trường hợp, bất kể vùng chứa AutoFilter nằm ở vị trí nào