オートシェイプを作成する(AddShapeメソッド)：Excel VBA｜即効テクニック｜Excel VBAを学ぶならmoug
次のサンプル1は、アクティブシートの指定したセル範囲の位置に新しいオートシェイプを作成します。 ●サンプル1● Sub AddShapeSamp1() With ActiveSheet.Range("B3:D10") ActiveSheet.Shapes.AddShape(Type:=msoShapeHeart, _ Left:=.Left, Top:=.Top, Width:=.Width, Height:=.Height).Select '---B3:D10の範囲に、ハート形のオートシェイプを作成する End With Selection.Text = "モグタンだいすき！" & vbCrLf & "マコより" End Sub 引数Typeで作成するオートシェイプの種類を指定します。このコードでは、ハート型の図形を作成します。作成する位置と大きさはLeft/Top/Width/Heig
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
http://www.vbalab.net/vbaqa/data/excel/log/tree_720.htm
