'loop through apiResponse string to find all instances of "character" and pull name
  While InStr(nameStart, apiResponse, """character"":") > 0
    nameStart = InStr(nameStart, apiResponse, """character"":") + 21
    nameLength = InStr(nameStart, apiResponse, """realm"":") - nameStart - 2
    memberList.Add Mid(apiResponse, nameStart, nameLength), memberList.Count + 1
  Wend 'InStr(apiResponse, """Character"":") > 0