2016-09-22 24 views
0

私は単純なエクセルアプリケーションを開発して、特定のトウと推進力のモーメントバランスを使ってボートの回転角度を計算しています。下の図のように結果をグラフィカルに表示したいと思います。VBAを使用してExcelチャート内の画像の位置と回転を設定します

Tug boat

私はシンプルな線画を描くことができますし、黄色の左の画像のようにチャートにそれらを置くが、私が代わりにボートの素敵な絵を持っていると思います。

同じ原理が右画像に適用され、回転のみが表示されます。

このため、画像のハンドルにアクセスし、VBAマクロを使用して画像の位置と回転を設定する方法を学習したいと思います。

ありがとうございました。

答えて

1

ここで私は画像を回転させることができました。

(0度まで回転)画像:

enter image description here

テストコード:

Option Explicit 

Sub RotateBoat() 
    Dim ws As Worksheet 
    Dim boatPic As Shape 

    Set ws = ActiveSheet 
    Set boatPic = ws.Shapes.Item(1) 

    '--- rotate the boat 
    boatPic.Rotation = 45# 

End Sub 

と、(45度まで回転)得られた画像:

enter image description here

+0

ありがとう@PeterT、それは働いた。とにかく、ワークシートに複数のイメージがあるので、どのイメージがどのイメージを表しているのかわかります。とにかく私はそれらに名前を割り当てて、その名前を代わりに使うことができますか?また、現在図形が中心を中心に回転しているため、回転点を選択する方法があります。 – Amitava

+1

[Shape.Rotationプロパティのドキュメント](https://msdn.microsoft.com/en-us/library/office/ff744648.aspx)には、Z軸回りの回転が記述されています。したがって、回転点は画像の中心点に固定されます。確かにイメージに名前を付けることができますし、VBAコード内の記述的な変数名をイメージごとに使用することもできます。 – PeterT

関連する問題