| |
▼JuJu さん：
jujuさん回答ありがとうございました（＾−＾）
>でも、VBでは他の原因で動きません。
>VBとExcelのPictureオブジェクトの仕様の差異から生じる問題なのですが、VBからはExcelのPictureオブジェクトを参照設定することができません。
そうなんですね・・・
>
>確実なのは、Excel上でイメージを読み込む関数を作って、VB側からそれを呼び出すと言う方法です。
なるほど、わかりました、今から早速やってみます！
結局、なぜPICTUREｵﾌﾞｼﾞｪｸﾄを使おうかと思ったかというと
画像の大きさはまちまちなので、表示都度で拡大縮小をしてやらなくては
ならないのです
それで今は、
.Pictures.Insert("ファイルフルパス").Select
として、原寸大で画像をはりつけた後、
Selection.ShapeRange.Height
Selection.ShapeRange.Width
で縦横サイズを取得し、縮小率計算後
Selection.ShapeRange.ScaleHeight 縮小率, True ', msoScaleFromTopLeft
Selection.ShapeRange.ScaleWidth 縮小率, True ',msoScaleFromTopLeft
としているのですが、
Selectionを使用すると、画像の縮小はうまくいったんですが
なぜかVBからのEXCELプロセスの開放がうまくいかなくて
困っていたんです、、、
なぜなんでしょうか？
まずは、JuJuさんに教えていただいた方法で試してみよーっと
本当にありがとうございまいた
|
|
ふじ
- 03/6/23(月) 15:12 -
