マクロは、スープカレー

マクロでバンザイ！

マクロで自由自在

マクロ藤田です。

マクロを　あやつり

マクロで、あれも、これも、　気がつけば、早や　１０数年・・・・

さて、今日のテーマは・・

『　マクロ　の自動記録の使い道　』

※前回の続きになっていますので

　 前回の記事を読んでいない人はコチラから↓

http://ameblo.jp/excel2000/entry-10336168840.html

前回は、

自動記録したマクロをみて、

内容をパクってみました。

IF あるセル　=　１　　 then

絵を出しなさい

の　絵を出しなさい　の　部分は、

'
ActiveSheet.Shapes("Picture 11").Select
Selection.ShapeRange.ZOrder msoSendToBack
Range("H13").Select

このおまじないを、そっくり使います。

IF あるセル　=　１　　 then

ActiveSheet.Shapes("Picture 11").Select
Selection.ShapeRange.ZOrder msoSendToBack
Range("H13").Select

こうなりました。

でも

これで、完成では、ありません。

めざす、最終形は、

IF あるセル　=　１　　 then

絵を出しなさい

そして、あるセルの　１を　消しなさい

または、

あるセルが　１でなければ

絵を　引っ込めなさい

そして、あるセルを　１　にしなさい

これが、最終形です。

IF あるセル　=　１　　 then

絵を出しなさい

そして、あるセルの　１を　消しなさい

の　絵を出しなさい、の部分は、　パクリで　出来上がりました。

そして、　あるセルの　１　を消しなさい。

これを、どうするか？

それは

次回に続く・・。

━─━─━─━─━─━─━─━─━─━─

本日のマクロ藤田の言葉。

スープカレーは、普通のカレーライスとちょっと違う。

マクロが使えるようになると、いつものEXCELとは、

ひと味違ってくる。

━─━─━─━─━─━─━─━─━─━─