VBA閻魔帳

●ＷｏｒｋｓｈｅｅｔｓＦｕｎｃｔｉｏｎ　
　VBAで使用できるエクセルの関数は以下の表のとおりです。
　
　ついでに、ＶＢＡのヘルプでの使用例を記載しておきます。　

Set myRange = Worksheets("Sheet1").Range("A1:C10")
answer = Application.WorksheetFunction.Min(myRange)
MsgBox answer

　Set ステートメントを使ってオブジェクトを代入すると、実際のオブジェクト
を参照できるようになります。WorksheetsFunctionで参照する範囲は、上のステ
ートメントのように　myRangeという変数で、参照範囲を設定して使用していますね

○○ = Application.WorksheetFunction.関数・・(・・・・)
○○は答えをもとめる変数　上では　answer　ですね
関数を使うには　Application.WorksheetFunction.　と記述後、
上では　Minという最小値を求める関数を使用しています。

　CountIfなら、
　answer = Application.WorksheetFunction.CountIf(myRange,"=1")
　というような使い方をします　＾＾