ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

Excel ¶×¥X¦¨csvÀÉ + csvÀÉÀɮפj¤p®t²§

[¸ê®Æ]¤u§@ªí³Q[®æ¦¡]¦ûº¡¤F1000¦æ,
Âà¥Xªºcsv¥]§t¤F¤@°ïªÅ®æ,
¥i¥Î[°O¨Æ¥»]¬Ý¤@¤U text_02, ¥kÃä¤Î¤U¤è¤@¤j°ï³r¸¹,
·íµMÀÉ®×´N¤j¦h¤F!

¥i¿ï¨ú¾ã±i¤u§@ªí, ²M°£¥þ³¡ªº®æ¦¡³]©w, ¦A°õ¦æÂàcsv

TOP

Sub Macro1()
NA01 = "test"
Sheets("¸ê®Æ").Cells.ClearFormats
Sheets("¸ê®Æ").Copy
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & NA01, FileFormat:=xlCSV
End Sub

TOP

        ÀR«ä¦Û¦b : ¤@¥y·Å·xªº¸Ü¡A´N¹³©¹§O¤H¨­¤WÅx­»¤ô¡A¦Û¤v·|ªg¨ì¨â¤Tºw¡C
ªð¦^¦Cªí ¤W¤@¥DÃD