Home » エクセルマクロ・Excel VBAの使い方 » Shapesコレクション・Shapeオブジェクト » VBAでセルに合わせて移動するがサイズ変更はしないに設定するには

VBAでセルに合わせて移動するがサイズ変更はしないに設定するには

動作検証バージョン：Windows 11 Home + 64bit Excel バージョン 2503（ビルド18623.20178クイック実行）

「マクロ 図形の大きさを固定化するがセルに合わせて移動する」
といった検索キーワードでアクセスがありました。

セルに合わせて移動するがサイズ変更はしないに設定するサンプルマクロ

Shapeが1個存在する状態で、以下のExcelマクロを実行してください。

Sub セルに合わせて移動するがサイズ変更はしないに設定する()
　Dim shp As Shape
　Set shp = ActiveSheet.Shapes(1)
　shp.Select
　shp.Placement = xlMove
End Sub

「セルに合わせて移動するがサイズ変更はしない」に設定されます。

「セルに合わせて移動するがサイズ変更はしない」に設定するためには不要ですが、Shape.Selectメソッドを途中に入れてありますから、［図形の書式設定］作業ウィンドウ－［図形のオプション］－［プロパティ］を表示させておいてからステップ実行を行うと、

　shp.Placement = xlMove

を実行することで「セルに合わせて移動するがサイズ変更はしない」に設定される様子を観察できます。

Shape.Placementプロパティに定数xlMoveを指定

Shapeオブジェクトに用意されているPlacementプロパティに、

XlPlacement列挙型に定義されている定数xlMoveを指定することで、

「セルに合わせて移動するがサイズ変更はしない」に設定されるということです。

理解するExcel VBA／図形操作の基本
伊藤潔人 2021-11-28
Amazon


［スポンサードリンク］

Home » エクセルマクロ・Excel VBAの使い方 » Shapesコレクション・Shapeオブジェクト » VBAでセルに合わせて移動するがサイズ変更はしないに設定するには

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
グラフを操作するExcel VBAの基本を解説したキンドル本も出しました↓↓ 図形を操作するExcel VBAの基本を解説したキンドル本を書きました↓↓ Excel VBA経験者向けに、Word VBAの基本をキンドル本にしました↓↓ Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓ 数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓ 日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓ 日経BP社から出版されたExcel VBAユーザー向けのPython超入門書の、元になったキンドル本です↓↓ Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓ 小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓ 『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓ PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓ Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓


「Shapesコレクション・Shapeオブジェクト」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.