検索してもなかなか引っかからなかったのですが、以下のサイトで「DrawingObjects」というものを知りました。VBA研究室 Part 3 このサイトを参考に、C1 セルの値を A1 セルにあるオートシェイプに表示させてみました。 Public Sub Macro1() Dim sheet As Wor…

作ってみた。 テストは全然してないけど、現在作成中のドキュメントでは、 うまく動いたので自分的にはこれでオーケーです。 'mdlShapes.bas Option Explicit Public SearchWord As String Public ReplaceWord As String Public Sub ReplaceShapeText() Dim …