2019年5月21日
VBA 刷新数据透视表
摘要： Sub pjCount() Dim r As Long r = Sheets("Inquery").[A65536].End(xlUp).Row ActiveSheet.PivotTables("A3").PivotCache.SourceData = _ "Inquery!R2C2:R" & r & "C4" ActiveSheet.Pivot... 阅读全文
posted @ 2019-05-21 16:17 tec2019 阅读(1166) 评论(0) 推荐(0)