office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

VBA穫取當前活動單元格所在的數據透視錶

2020-12-26 08:00:00
zstmtony
原創
4013
VBA穫取當前活動單元格所在的數據透視錶

Dim strPvName As String
on error Resume next
strPvName = Selection.PivotCell.Parent
If err.number=0 then
  msgbox "數據透視錶名:" & strPvName 
Else
  msgbox "沒有數據透視錶"

End If


這樣就可以解決問題瞭。

分享