＋设为首页 ＋添加到收藏夹
当我把做好的excel表保存为csv格式的文件时，csv格式的文件总是按照所有行中所需单元格最多的那一行作为所有行长度，如果其他少于这些单元格的行的地方将会以空格填补，也就是行尾多了很多逗号，例如，我先做了一个sheet，然后将其内容重新生成了这样一个csv格式文件：
field1,field2,field3,field4,field5,field6,field7,field8,field9
xxx1,xxx2,,xxx4,xxx5,,,,
aaa1,aaa2,,,,,,,
但是这样的格式不符合我的要求，因为我要求产生的csv格式要符合我们公司后台的处理格式标准
我希望的格式是这样：
field1,field2,field3,field4,field5,field6,field7,field8,field9
xxx1,xxx2,,xxx4,xxx5
aaa1,aaa2
也就是行尾不要有那些多余的逗号，但是并不是要去掉行中那些必要的逗号，
有什么好方法，最好是可以添加到我程序的最后也就是做好了的sheet之后来做一下去除多余逗号的处理，然后再生产csv格式文件因为中间的程序我都写好了，不希望也没有时间去修改了
似乎无法用SaveAs方法，只能自己写代码保存了。
先在WORD中打开你的文件,然后用这个宏
Sub Macro1()
Macro1 Macro
宏在 2005-09-09 由 John1CSDN(AK-48)编写
Dim doc1 As Word.Document
Set doc1 = Documents(1)
For i = 1 To doc1.Paragraphs.Count
j = doc1.Paragraphs(i).Range.Characters.Count - 1
If doc1.Paragraphs(i).Range.Characters(j) = "," Then
For n = j To 1 Step -1
doc1.Paragraphs(i).Range.Characters(n).Delete
If doc1.Paragraphs(i).Range.Characters(n - 1) <> "," Then
Exit For
End If
Next
End If
Next
End Sub
这个我知道，QQ156692019
UltraEdit 中，菜单“查找(S)”=>“替换(R)”或者“批量文件替换(P)”
查找内容输入(3个字符) ,+$
替换为(留空)
然后 钩上“正规表达式”
然后替换，就可以了 :)
ok, 搞定了就请给分
