excel 썸네일형 리스트형 엑셀에서 VBA 활용하여 UTF8 CSV로 저장하기 매크로의 ADODB Stream 을 이용. --------------------------------------------------------- Sub test1() Set fs = CreateObject("ADODB.Stream") fs.Type = 2 fs.Charset = "utf-8" fs.Open For i = 1 To 10 For j = 1 To 10 fs.writetext Cells(i, j) & "," Next fs.writetext vbCrLf Next fs.SaveToFile "d:\temp\excel_utf8_1.csv", 2 End Sub ------------------------------------------------------ 위의 예제중 행과 열의 맥스치는 적당히 조절... 더보기 이전 1 다음