VBAでコードを書いているのですが 「オブジェクトが必要です」エラーが出ており、対処方法がわかりません。
VBAでコードを書いているのですが 「オブジェクトが必要です」エラーが出ており、対処方法がわかりません。 原因を調べたのですが、変数のSetも行っており 解決方法が見つかりませんでした。 どなたか原因を特定いただけないでしょうか。 よろしくお願い致します。 ----以下、コードです--------------------------- Sub test() Dim JsonObject As Object Dim JsonItem As Object Set JsonObject = New Dictionary JsonObject.Add "product", New Dictionary JsonObject("product").Add "stocks", 200 Set JsonItem = New Collection JsonItem.Add 300 JsonItem.Add 400 JsonItem.Add 500 JsonObject("product").Add "group_ids", JsonItem ' イミディエイトウィンドウで確認(デバック用) Debug.Print JsonConverter.ConvertToJson(JsonObject, Whitespace:=2) End Sub
エラーになっている行は以下です。 Debug.Print JsonConverter.ConvertToJson(JsonObject, Whitespace:=2)