A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
≫回答番号:No.1 この回答への補足
>最初に説明不足で申し訳なかったのですが、
良くあることです。
気にしないでください。
>選んだオブジェクトだけ100%にするにはどこを・・・
選択したオブジェクトという事ですか?
Selection.Reset
などと出来れば簡単なのですがエラーになります。
インデックスを指定する方法(インデックスが解らなければ使えません。)
ActiveDocument.InlineShapes(1).Reset
名前があるなら
InlineShapeをConvertToShapeすれば名前で判定出来そうです。
処理後にConvertToInlineShapeで元の種類に戻す。
挿入は手作業ですか?
もしコードがあるなら提示できませんか?
手掛かりが見つかるかもしれません。
この回答への補足
返事が遅くなり、申し訳ありませんでした。
オブジェクトに名前はありません。
単純にselectionとかavtive~みたくできるのかな。。。。と思ったら、そうでもなく。。
コードはオフィスのPCなので、ここでは提示することができません。
スミマセン。。。
何か方法がありましたら、引き続き宜しくお願いします。
No.1
- 回答日時:
試しにコードを書いてみました。
Dim ilshp As InlineShape
Dim scalw As Single
Dim scalh As Single
For Each ilshp In Application.ActiveDocument.InlineShapes
If ilshp.Type = wdInlineShapePicture Then
scalw = ilshp.ScaleWidth
scalh = ilshp.ScaleHeight
If scalw <> 100 Or scalh <> 100 Then
ilshp.ScaleWidth = 100
ilshp.ScaleHeight = 100
'あるいは下記で
'ilshp.Reset
End If
End If
Next
この回答への補足
ありがとうございます。確かに100%になったのですが、ドキュメントすべてのオブジェクトが100%になってしまいました。
最初に説明不足で申し訳なかったのですが、選んだオブジェクトだけ100%にするにはどこを変えたらいいでしょうか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) エクセルのマクロについて教えてください。 5 2023/01/21 09:39
- Word(ワード) ワードの背面や前面 5 2023/01/28 11:50
- その他(Microsoft Office) ワードのマクロについて教えてください。 1 2023/01/22 11:43
- Visual Basic(VBA) PowerPoint VBA で画像の鮮明度を変更する方法がわかりません 2 2023/03/24 13:34
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
- Excel(エクセル) エクセルで保存時に全部のシートの最終行をコピーして数値で貼り付けたい 3 2023/08/14 15:49
- Visual Basic(VBA) VBAコードを張り付け後のエクセルの進め方 2 2023/02/07 18:24
- Excel(エクセル) 記録マクロのみでできますか? 7 2022/08/07 20:38
- Visual Basic(VBA) vbaエクセルマクロについて あるデータを作成し、デスクトップに.xlsx形式で保存するマクロを作成 2 2023/03/02 18:54
- その他(Microsoft Office) マイクロソフトオフィス 5 2023/07/29 14:31
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パワーポイントの画面がずれる
-
Excelで隠れてしまった図...
-
3DソフトBlenderにてオブジェク...
-
Excelにメールを添付する
-
パワーポイントにエクセルの表...
-
Adobe IllustratorとCorel DRAW...
-
ルートの中に数字を入れたい
-
3Dオブジェクトとはなんですか?
-
エクセルの塗りつぶしで斜線を...
-
pdf xchange viewer オブジェク...
-
ExcelでB5をA4にしたい。
-
エクセルの[コントロールの書式...
-
エクセルで枠飾り
-
WORDの表をコピーして張り...
-
PowerDirector 11で空白時間の挿入
-
大学のレポートを書くためにWor...
-
図形描画(フリーフォーム)で...
-
写真9枚をA4紙に配置したい。
-
ヘッダーとフッダーの縦書き方法
-
よくあるトーナメント表を、一...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パワーポイントの画面がずれる
-
Excelで隠れてしまった図...
-
Excelにメールを添付する
-
パワーポイントにエクセルの表...
-
excelでチェックボックスが表示...
-
pdf xchange viewer オブジェク...
-
ExcelでB5をA4にしたい。
-
イラストレーターの面積を求める
-
テキストボックスがないのに、...
-
エクセルに入力しようとすると...
-
花子10の図形をワードやエク...
-
エクセルに任意のページのワー...
-
EMBED関数について
-
Wordのツールバーに常に数...
-
エクセルからワードへの表挿入...
-
Wordのオブジェットと図の違い...
-
【エクセル】列を挿入しようと...
-
文字の特定箇所に背景色をつけ...
-
オートシェイプが消えたり出た...
-
エクセルの[コントロールの書式...
おすすめ情報