| ©«¤l29 ¥DÃD3 ºëµØ0 ¿n¤À39 ÂI¦W0  §@·~¨t²ÎWINDOWS XP ³nÅ骩¥»office 2003 ¾\ŪÅv10 ©Ê§O¨k ¨Ó¦Û¥xÆW µù¥U®É¶¡2012-10-12 ³Ì«áµn¿ý2020-10-15 
 | 
                
| ¥»©«³Ì«á¥Ñ leoman0002 ©ó 2013-5-1 02:05 ½s¿è 
 ¦]¬°¬O¤p¾Ç¥Í..µLªk¤U¸üªþ¥ó..¤]¬Ý¤£¨ì¼g¨Ç¤°»ò¡A¤£¹L§Úª¾¹D2003
 Set csvworksheet = ThisWorkbook.Worksheets.Add(after:=Worksheets(Worksheets.Count))
 csvworksheet.Name = Left(filename, Len(filename) - 4)
 
 °t¦X
 csvworksheet.Delete
 | 
 |