vba的错误试图parsing一个空的变体，而不是一个string

在Excel里面，我正在循环一系列看起来像这样的jsonstring。 但有些时候，其中一个值会带有null而不是string。 所以我尝试做一些错误识别，但我没有得到正确的东西。
我想获得一个列表，其中第一个项目将是“工具培训”，并由于空失败types不匹配在第二，我想尝试除了这样的错误或错误。

Dim return_value As String On Error GoTo 22 return_value = jstring("fields")("customfield_18711")("value") 22: return_value = "empty" Resume Next 

应该只使用简历？ 与下一个？ 或者我甚至不使用简历？

这是jsonstring的样子

 { "expand": "operations,editmeta,changelog,transitions,renderedFields", "id": "452637", "self": "example.com/rest/api/2/issue/452637", "key": "MP-16098", "fields": { "summary": "my summary", "customfield_18711": { "self": "example.com/rest/api/2/customFieldOption/48120", "value": "Tool Training", "id": "48120" } } } { "expand": "operations,editmeta,changelog,transitions,renderedFields", "id": "452637", "self": "example.com/rest/api/2/issue/452637", "key": "MP-16098", "fields": { "summary": "my summary", "customfield_18711": { "self": "example.com/rest/api/2/customFieldOption/48120", "value": null, "id": "48120" } } }