- ベストアンサー
VBAによるセル内の画像の位置調整
Excel2007のVBAからShell関数で外部実行プログラムを起動します。 外部実行プログラムは画像データをクリップボードへデータを出力後、自動で終了します。 Shell関数とWin32APIを使用して外部プログラムを実行し、プログラムが終了するまで待つように処理して、 クリップボードから指定する複数の結合したセルへ画像を貼り付ける事は出来たのですが、 画像がセルの左上を基準に貼り付けられます。 この画像を、セルの中央に位置調整したいのですが可能なのでしょうか? また画像の回転(1度単位)は可能でしょうか? '指定セルへクリップボードの内容を貼り付け ActiveSheet.Paste Destination:=Worksheets("Sheet1").Range("H53") 画像ファイルなどを読み込む訳ではないため、画像データ自体に名前がありません。 手動で位置調整は可能ですが、自動化出来ないかと色々調べ試してみたのですが、思う様に実現できません。 セルの結合は5行、列は結合していません。 どなたか御存知でしたら回答下さい。
補足
>当方は動作確認してから投稿するようにしています。 決して意地悪をしている訳ではありませんので御容赦下さい。 時間を割いて回答頂いています事に感謝しています。 で、新しいブックで実行してみました。 確かにセルの中央に移動しました。 最初はエラーになるので、なぜなのか考えてみたら、 オブジェクトを選択状態にしないと駄目なんですね。 再度、質問になりますが、コード中の Range("H53").Top - .Height Range("H53").Left - .Width 「.Height」と「.Width」は挿入したオブジェクトの「高さ」、「幅」でしょうか? やはり、VBAは難しい(><