活動表。數據透視表（“數據透視表1“）。數據透視字段（“項目”）。ClearAllFilters。
活動表。數據透視表（“數據透視表1“）。數據透視字段（“項目”）。數據透視篩選器。添加類型:= _
xlCaptionEquals，Value1:=Application。工作表功能。最大（表（“表4”）。範圍（“A1:A9“）
末端接頭
自己看著改吧。