我有一張用 Excel 制作的圖表。手動將其復制到 PowerPoint。然后我把它解組了兩次。然后我選擇了左側的軸形狀(數字,單獨的軸)并創建了一個組。然后我取了表示資料的圖表的矩形,并將它們分組為 1)一組用于正值,2)一組用于負值。所以我現在有 3 組形狀。我以為我可以回圈這三個組,但是在 GroupItems 中,所有組都與其他形狀混合在一起。我的想法是,我可以簡單地檢測 Sh.ParentGroup.Id 來找出有多少父母存在,并通過 ParentGroup.Id 將他們分成三組......所以我做的第一件事是一個簡單的回圈試圖訪問 Sh.ParentGroup.Id。但是,如果我添加手表,它會在第 4 次迭代以及 Visual Basic 和 PowerPoint 中崩潰,
For Each Sh In ActiveWindow.Selection.ShapeRange.GroupItems
' GroupParentsIDs(Sh.ParentGroup.Id) = Sh.ParentGroup.Id
MsgBox ""
Next Sh
- 你知道它為什么會崩潰嗎?我應該檢測 ParentGroup 成員是否存在嗎?如果需要檢查它,那么如何?
- 任何其他提示如何區分三組形狀?
uj5u.com熱心網友回復:
關鍵是測驗形狀的型別。如果它不是一個組,ParentGroup 將失敗。像這樣的東西:
Dim sh As Shape
Dim SubSh As Shape
For Each sh In ActivePresentation.Slides(1).Shapes
Debug.Print sh.Id
If sh.Type = msoGroup Then
For Each SubSh In sh.GroupItems
Debug.Print " " & SubSh.Id
Next SubSh
End If
Next sh
轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/314258.html
上一篇:動態SUM函式和過濾
