VBAで（オートシェイプ（図形）を含めた）シート上の全ての文言を取得する - Sumihirablog.

VBAでワークシート上にある全ての文言を取得する方法について書きます。 １．オートシェイプ（図形）の文言を取得する セル内の文言はRange("A1").Valueなどで簡単に取得できますが、 以下の様なオートシェイプ（図形）に含まれる文言は ShapesオブジェクトのTextFrameプロパティから取得する必要があります。 Shepes.TextFrameプロパティ [サンプル] 以下のサンプルでは、アクティブシート上にある1番目の図形から、レイアウト枠内のテキスト表示します。 MsgBox ActiveSheet.Shapes(1).TextFrame.Characters.text （実行例） Shapes()の引数は図形の名称でも構いません。 直線など、図形にレイアウト枠がない場合、エラーとなります。２．シート上にある全てのオートシェイプ（図形）から文言を取得する 以上の内容をもと