- ベストアンサー
マクロで図の透過性を増す記述は？
Ｅｘｃｅｌ画面に図を作成して、徐々に透過性を増すようにしたいのですが、マクロでどう記述すればいいのでしょうか。また 写真を貼り付けて同じことができますか？
- perogou
- お礼率78% (516/655)
- Windows Vista
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
透過性は０～１の値で指定します。 Beepで雑音を出しながら いくぶん時間をかけていますが APIのSleepなんかを使うのが適切でしょう。 Dim i As Single For i = 0 To 1 Step 0.01 Sheets("Sheet1").Shapes("円/楕円 1").Fill.Transparency = i Beep DoEvents Next
お礼
ありがとうございました。「Ｓｔｅｐ0.01」の部分を変えることで おもっていたとおりにできました。感激です。これからもどうかよろしくお願いいたします。ほんとうにありがとうございました。