VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2006/03/24(Fri) 09:50 |
| 投稿者 | ： YO-YO |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Excelの画像サイズの変更 |
VB6.0 Excel2000 Win2000
初めて投稿いたします。
今、VBで画像を貼り付けているのですがその画像のサイズが大きい為に印刷した時に
２枚、３枚で印刷されてしまします。
これを回避するために画像のサイズを変更しようと思い、ここへたどりつきました。
サンプルを見たいのですが自分のPGで実行すると
オブジェクトは、このプロパティまたはメソッドをサポートしていません。
とエラーになるので質問させていただきます。
’シート名の変更
objNewWkSheet.Name = TMPFILE1
’現在のシートを選択
objNewWkSheet.Select
’現在のシートをsheet4の後ろへ挿入
objNewWkSheet.Move After:=objWkBk.Worksheets("sheet4")
上記まではエラーもなくできています。
しかし下記を実行するとエラーになります。
きちんとオブジェクトを指定しているとおもうのですが何処らへんでエラーになるのでしょうか？
（下記はマクロを参考にして作成しました。）
objNewWkSheet.Selection.ShapeRange.ScaleWidth 0.79, 0, 0
objNewWkSheet.Selection.ShapeRange.ScaleHeight 0.79, 0, 0
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）