반응형
아래 사이트를 참고 하십시요
Dim requestBody As String
Dim responseText As String
Dim status As Integer
'// JOSN 파일 읽기
Dim FSO As New FileSystemObject
Dim JsonTS As TextStream
Set JsonTS = FSO.OpenTextFile("C:\PTC\WORK90\example.JSON ", ForReading)
requestBody = JsonTS.ReadAll
'VBA Code' 카테고리의 다른 글
학습 04) Open API, 엑셀 VBA (0) | 2024.06.24 |
---|---|
학습 03) Open API, 엑셀 VBA (0) | 2024.06.24 |
엑셀 VBA 교육 사이트 (0) | 2024.01.28 |
VBA 사용을 위한 깃 허브 구성 하기 (0) | 2023.03.05 |
엑셀 VBA 메시지박스 (MsgBox) 에 문자열 줄 바꿈을 적용하는 방법 (0) | 2023.02.23 |