vba オートシェイプの塗りつぶし（図）について。

VBAでオートシェイプ内に図を挿入したいと思っております。
PC内にある画像参照は以下の方法で可能だと確認したのですが
同じExcelブック内にある図を参照することはできるのでしょうか？

'既にある図1を画像で塗りつぶす
With ActiveSheet.Shapes(1).Fill
.UserPicture "C:\Users\ユーザー名\Desktop\コメント 2021-11-11.png"
End With

'したい事
With ActiveSheet.Shapes(1).Fill
.UserPicture "同じエクセルブック内の図"
End With

グラフやリンクされた図を
オートシェイプの中にいられるのか気になり質問させていただくものです。
よろしくお願いします。