If objHTTP.Status = 200 Then
MsgBox “CSVデータのインポートが成功しました。”
のあたりに、objHTTP.responseTextとか入力するとどうなりますか？
VBAから cli-kintone.exeを呼び出した方が楽ではありませんか？batファイルでも何でもいいかもしれません。
どうしてもVBAからということであれば、JSONの部分を
GitHub - VBA-tools/VBA-JSON: JSON conversion and parsing for VBA
https://github.com/VBA-tools/VBA-JSON
をつかいませんか？