Jsonpath Count Array Vba