すぐに役立つエクセルVBAマクロ集 すぐマク
すぐに役立つ Excel VBA マクロ集 Excel VBA Macro
FAQ
Google
 
Home |  What's New! |  Gallery |  Introduction |  Service |  Profile 500連発・組み方講座フォロー Big Color Pallet
[広告]
Excel VBA Macro
Excel DownLoad
© 1997 - 2007
永井善王.
All RightsReserved.
HappyTech & Co., Ltd.
www.happy500z.com
Excel VBA Macro ・ 引数・定数など ・ FAQ
Functionプロシージャの省略可能な引数の設定方法を教えて?
Question 80.7 Excel VBA Borad (掲示板)より Previous
引数を使うFunctionプロシージャで、省略可能な因数を設定することは可能なんでしょうか?
例えば、mid関数の mid(String,Start As Long,[Length]) の [Length] のようなヤツの設定方法です。
分かる方、ご教授のほどお願いします。
Answer   2006.3.22 かみちゃん
Function ステートメントのヘルプに 「引数 arglist は、次の形式で指定します。」 と説明が書かれています。
たとえば、以下のような感じで Optional をつけます。
Sub test()
    funcTest 1, 2
End Sub

Function funcTest(xx1 As Integer, xx2 As Integer, Optional xx3 As Integer)
    MsgBox xx1 + xx2 + xx3
End Function
ありがとうございました
かみちゃん さん、レスありがとうございました 解決です、文句なしです、感謝感激です。 因数→× 引数→○でしたね、日本語も勉強します(汗)
ちなみにこんな感じにしました
Function sumple(MyA As Range, Optional MyB As Range)
    If MyB Is Nothing Then
        sumple = MyA.Value
    Else
        sumple = MyA.Value + MyB.Value
    End If
End Function
Click here to visit our sponsor