[VBA ] 使用with的疑問

[jacky1989 ()]

as title
我有4個sheet
分別是sheet1,sheet2,sheet3,sheet4
每個sheet的前6個欄位都相同，今天我想要使用VBA來做一個autofilter
原本code如下

sub filter_top()
    call filter("Alice")
end sub

sub filter(optional byref user as string = "Tommy")
    Dim sht as WorkSheet
    for each sht in ThisWorkBook.sheets
        With sht
            With Row(2)
                .AutoFilter Field:=6 Criteria1:=user VisiableDropDown:=True
            End With
        End With
    next
end sub

然後我就發現有些sheet是正常的，有些是失敗的
我很確定每個sheet的資料都一樣
如果我把內部改為
.Row(2).AutoFilter Field:=6 Criteria1:=user VisiableDropDown:=True
這樣就可以，所以我不能with內部再包with嗎？
再麻煩高手教學一下了，感謝
如果還有需要什麼補充，再請跟我說

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 150.116.208.71 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1691940961.A.084.html
→ MOONRAKER: 才一行何必用with 還兩層哩
就假鬼假怪+想練功......呵呵
是說這樣會有問題是嗎？
※ 編輯: jacky1989 (150.116.208.71 臺灣), 08/14/2023 23:58:42
→ waiter337: With .Row(2)