Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


6517 / 76734 ←次へ | 前へ→

【75817】Re:図ツール→シャープネスの値の指定
発言  kanabun  - 14/7/10(木) 15:42 -

引用なし
パスワード
   ▼Guppy さん:

>開発環境:Excel2010+Win7Pro
>ピクチャを貼り付けた後、図ツール→図の修整→シャープネスという項目が
>あると思いますがこの値をVBAにて編集するときはどのようにすればよいでしょうか?

Selection.ShapeRange.Fill.PictureEffects オブジェクト

のInsertメソッドで 対象とする EffectType を挿入するようなことが
Help の
PictureEffects.Insert メソッド
に書いてあります。

> ' Insert Brightness/Contrast effect and set values to -50% Brightness and +25% Contrast.
>  Dim brightnessContrast As PictureEffect
>  Set brightnessContrast = .Insert(msoEffectBrightnessContrast)
>  brightnessContrast.EffectParameters(1).Value = -0.5
>  brightnessContrast.EffectParameters(2).Value = 0.25

上の例は
.Insert(msoEffectBrightnessContrast)
でしたが、
MsoPictureEffectType 列挙
をみると、
msoEffectSharpenSoften
というのがあるので、シャープネスなら これを使うのかな?

自分は使ったことないので 正解は分りません。

9 hits

【75804】図ツール→シャープネスの値の指定 Guppy 14/7/8(火) 23:32 質問
【75817】Re:図ツール→シャープネスの値の指定 kanabun 14/7/10(木) 15:42 発言
【75818】Re:図ツール→シャープネスの値の指定 kanabun 14/7/10(木) 15:56 発言
【75820】Re:図ツール→シャープネスの値の指定 Guppy 14/7/10(木) 23:56 お礼

6517 / 76734 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free