Open "Post", url, False 018 .send 019 020 If .Status = 200 Then 021 Set json = ParseJson(.ResponseText) 022 023 For Each rd In json("line") 024 Sheets(1).
確定! 回上一頁