Excel VBA ParamArray 可変個引数の渡し方 - OKWAVE

テクノロジーカテゴリーの変更を依頼記事元:

okwave.jp

1 userがブックマークコメント

コメント

1

記事へのコメント1件

注目コメント
新着コメント

kiyo_hiko 可変長引数使えるのねsumとかmax作る。maxは0じゃなくてns(LBound(ns))から積む「Public Function sum(ParamArray ns() As Variant)\nDim i As Long\nDim acc As Long\nacc = 0\nFor i = LBound(ns) To UBound(ns)\nDebug.Print acc\nacc = acc + ns(i)\nNext\nsum = acc\nEnd Function」

2013/09/09 リンク

注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています

規約違反を報告

アプリのスクリーンショット

いまの話題をアプリでチェック！

バナー広告なし
ミュート機能あり
ダークモード搭載

アプリをダウンロード

関連記事

{{ total_bookmarks_with_user_postfix }}{{ root_title }}

Excel VBA ParamArray 可変個引数の渡し方 - OKWAVE

今回の条件で直接Concatenate2を呼び出した場合 MyArray()は３個の配列で渡されますが Fanc1経由で呼び... 今回の条件で直接Concatenate2を呼び出した場合 MyArray()は３個の配列で渡されますが Fanc1経由で呼び出された場合のConcatenate2での MyArray()は１個の配列ですこの１個の配列の中身が配列で渡されます。なので１個の配列引数を持つ共通的な関数で展開する形にするのが妥当かとただ、ParamArrayは特殊な配列のようでそのまま他の関数に渡そうとするとエラーになるため別な配列に複写して渡さないと動作しませんでしたただ、共通関数の受取をParamArrayにするとエラーにならないので下記の２通りの方法を考えました。 Function ComFunc(MyArray As Variant) As String Dim S As String Dim v As Variant Dim c As Variant For Each v In MyArray

tips

ブックマークしたユーザー

kiyo_hiko2013/09/09

同じサイトの新着

同じサイトの新着をもっと読む

いま人気の記事

いま人気の記事をもっと読む

いま人気の記事 - テクノロジー

いま人気の記事 - テクノロジーをもっと読む

新着記事 - テクノロジー

新着記事 - テクノロジーをもっと読む

設定を変更しましたx