Felixは、ワークシートにグラフィックを追加するためのマクロを作成しています。彼は、特定のセルの左上隅を基準にしてグラフィックを配置する必要があります。彼は、マクロコード内にグラフィックを配置する方法を考えているので、特定のセルの右上隅のすぐ下にあります。

ワークシートの各セルに、セルの上端と左端の両方の位置を定義するTopプロパティとLeftプロパティの両方があることに気付いた場合、このタスクは比較的簡単に実行できます。次の方法で、これらの値をわずかに調整して、必要なオフセットを取得できます。

Dim rCell As Range Set rCell = Range("A2")

With ActiveSheet.Shapes("Picture 1")

.Top = rCell.Top + 5     .Left = rCell.Left + 3 End With

このコードが実行された後、グラフィック(画像1という名前で定義)がセルA2の上端のすぐ下、左端のすぐ右側に配置されることに注意してください。

注:

このページ(または_ExcelTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

link:/ excelribbon-ExcelTipsMacros [ここをクリックして、新しいブラウザタブでその特別なページを開きます]

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント(9726)は、Microsoft Excel 2007、2010、2013、2016、2019、およびOffice 365のExcelに適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。

link:/ excel-Positioning_a_Graphic_in_a_Macro [マクロでのグラフィックの配置]