当前位置:首页教育技巧excel技巧excel数据库

excel表格表成分隔值怎么办

2025-12-15 16:55:40


1.如何解决excel文件保存的列表分隔符问题???

如果你保存为 csv 文件格式,系统默认就是以逗号为分隔符,貌似与你设置无关。

解决的办法:

1. 先存为csv,再对逗号进行替换。

2. 自己编写代码保存文件,因为是纯文本格式,编码不是太复杂,以下代码供参考:

Sub WriteText() '写入文本文件

Dim FileName$, FileNum%, intRow&, i&, intCol%, j%, cTxt$ '变量

FileName = ThisWorkbook.Path & "\" & Sheet1.Name & ".txt" '文件名

FileNum = FreeFile '提供一个尚未使用的文件号

intRow = Range("a65536").End(xlUp).Row '判断最后一行

intCol = Range("iv1").End(xlToLeft).Column '判断最后一列

Open FileName For Output As #FileNum '打开目标文件以提供输出

For i = 1 To intRow '循环每一行

cTxt = "" 'cTxt置空

For j = 1 To intCol '循环每一列

cTxt = cTxt & Cells(i, j).text & "|"

Next j '开始列循环的下一个迭代

Print #FileNum, Left(cTxt, Len(cTxt) - 1) '逐行写入目标文件

Next i '开始行循环的下一个迭代

Close #FileNum '关闭目标文件

End Sub

相关信息


电脑版

【免责声明】本站信息来自网友投稿及网络整理,内容仅供参考,如果有错误请反馈给我们及时更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任。
版权所有:学窍知识网 Copyright © 2011-2026 www.at317.com All Rights Reserved .