[解決済み] VBA関数 - 引数は任意ではない
2022-02-27 16:59:37
質問
Public Function RETURN_Equipment(Optional category As String) As Collection
Dim config As classConfiguration
Set config = New classConfiguration
Dim item As classItem
Set item = New classItem
Dim myCollection As Collection
Set myCollection = New Collection
For Each config In Configurations
For Each item In config.colItems
If IsMissing(category) Then
myCollection.add item
ElseIf InStr(category, "mainframe") <> 0 And item.category = "mainframe" Then
myCollection.add item
MsgBox "Fired!"
ElseIf category = "accessory" And item.category = "accessory" Then
Else
End If
Next
Next
RETURN_Equipment = myCollection
End Function
が出続けています。
コンパイルエラーです。
引数がオプションでない
最後の行でエラーが発生します
RETURN_Equipment = myCollection
エラーメッセージは理解できます。パラメータが記入されていないことを知らせているのです。しかし、私はパラメータを1つだけ持っていて、それをオプションと宣言しています。関数から関数を呼び出そうとしているように見えるのですが?
どうする?
解決方法は?
オブジェクトを割り当てるときは、常に
set
キーワードを使用します。
set RETURN_Equipment = myCollection
関連
-
[解決済み] VBAでRangeクラスのSelectメソッドに失敗する
-
[解決済み] MS Excel で部分文字列を使用して文字列のセルインデックスを検索する
-
[解決済み] ExcelでDateTimeを表現する方法
-
[解決済み] Microsoft Excelで行数制限が残っているのはなぜですか?[クローズド]
-
[解決済み] EXCELの複数範囲-範囲ごとに異なる回答が必要
-
[解決済み] Application.CalculateとApplication.CalculateFullの違いは何ですか?
-
[解決済み] Excel VBA Projectのパスワードを解読する方法はありますか?
-
[解決済み] Excelの数式で二重引用符を含む文字列を作成する方法は?
-
[解決済み】VBAの関数から結果を返す方法
-
[解決済み】Excel VBAでSelectを使用しないようにする方法
最新
-
nginxです。[emerg] 0.0.0.0:80 への bind() に失敗しました (98: アドレスは既に使用中です)
-
htmlページでギリシャ文字を使うには
-
ピュアhtml+cssでの要素読み込み効果
-
純粋なhtml + cssで五輪を実現するサンプルコード
-
ナビゲーションバー・ドロップダウンメニューのHTML+CSSサンプルコード
-
タイピング効果を実現するピュアhtml+css
-
htmlの選択ボックスのプレースホルダー作成に関する質問
-
html css3 伸縮しない 画像表示効果
-
トップナビゲーションバーメニュー作成用HTML+CSS
-
html+css 実装 サイバーパンク風ボタン
おすすめ
-
[解決済み】「ワークシートクラスの貼り付けメソッドに失敗しました」が時々発生するのはなぜですか?
-
[解決済み] VBAのエラーです。"コンパイルエラーです。期待される End Sub"
-
[解決済み] エクセルシートにおけるCSVデータの最大行数について
-
[解決済み] ExcelでDateTimeを表現する方法
-
[解決済み] Excelのセルで変数を宣言する
-
[解決済み] Application.CalculateとApplication.CalculateFullの違いは何ですか?
-
[解決済み] エクセル文書のMIMEタイプ設定
-
[解決済み】Excel 2013で.csvファイルを正しく表示する方法は?
-
[解決済み] エクセルで、ある変数を一定に保ち、他の変数を行によって変化させる方法
-
[解決済み] VBAでSetというキーワードは実際に何をするのですか?[重複しています]