2010年02月25日
エクセルマクロ:VBAプログラミング楽ちん講座5日目
おはようございます。
今日も爽やかな天気です。
草花たちも、太陽を浴びて気持ちよさそうです。

それでは、昨日の続きです。
*--- エクセルマクロ:VBAプログラミング楽ちん講座5日目 ---*
21.マクロの記録の中身をのぞいてみましょう。
「ツール」→「マクロ」→「Visual Basic Editor」と選択します。

22.何やら少しややこしい画面がでてきました。

これが、「マクロの記録」で記述された作業の内容です。
Sub りんご()
' りんご Macro
' マクロ記録日 :
Range("A1").Select
Selection.AutoFilter
Range("A1:C1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="りんご"
Range("A1:C20").Select
Selection.Copy
Sheets("りんご").Select
ActiveSheet.Paste
Range("A1").Select
Sheets("商品データ").Select
Application.CutCopyMode = False
Selection.AutoFilter
Sheets("りんご").Select
End Sub
この英単語みたいな綴りが、これから勉強する
「VBA」
というプログラムになります。
決して難しい事はありません。
今までやった作業の流れとプログラムの内容を一つずつ比べながら説明しますので
理解できると思います。
続きはまた明日。それでは。
今日も爽やかな天気です。
草花たちも、太陽を浴びて気持ちよさそうです。

それでは、昨日の続きです。
*--- エクセルマクロ:VBAプログラミング楽ちん講座5日目 ---*
21.マクロの記録の中身をのぞいてみましょう。
「ツール」→「マクロ」→「Visual Basic Editor」と選択します。

22.何やら少しややこしい画面がでてきました。

これが、「マクロの記録」で記述された作業の内容です。
Sub りんご()
' りんご Macro
' マクロ記録日 :
Range("A1").Select
Selection.AutoFilter
Range("A1:C1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="りんご"
Range("A1:C20").Select
Selection.Copy
Sheets("りんご").Select
ActiveSheet.Paste
Range("A1").Select
Sheets("商品データ").Select
Application.CutCopyMode = False
Selection.AutoFilter
Sheets("りんご").Select
End Sub
この英単語みたいな綴りが、これから勉強する
「VBA」
というプログラムになります。
決して難しい事はありません。
今までやった作業の流れとプログラムの内容を一つずつ比べながら説明しますので
理解できると思います。
続きはまた明日。それでは。
Posted by ミール at 09:46│Comments(0)
│VBA