暗淡？f？作為什麽？字符串，？路徑？作為什麽？字符串，？Shs？作為什麽？目標
路徑？=?“C:\CSV”？CSV文件所在的文件夾，並自行修改。
f？=?目錄（路徑？& amp？"\*.csv“）
如果？f？& lt& gt？""?然後
做
設置？Shs？=?申請。工作簿。打開（路徑？& amp？"\"?& amp？f)
噓。薩維阿斯？文件名:=路徑？& amp？"\"?& amp？左（F，？len（F）？-?4)?& amp？".txt“，？文件格式:=42，？CreateBackup:=False
噓。關閉
f？=?目錄（）
循環？什麽時候？f？& lt& gt？""
MsgBox？“搞定！”,?VB信息？+?vbOKOnly，？“消息“
結束？如果
結束？潛水艇