删除影响表格格式，不能打印的不明字符或空格，等等。。。。

mxg825

<p>有些朋友经常在其他文件（如网页）</p><p>复制数据粘贴到EXCEL 中</p><p>但有时会出现影响表格格式，不能打印的不明字符或空格，等等。。。。</p><p>教大家一种办法解决这个问题！</p><p><img src="data/attachment/forum/dvbbs/2008-1/200812314131518032.gif" border="0" onclick="zoom(this)" onload="if(this.width>document.body.clientWidth*0.5) {this.resized=true;this.width=document.body.clientWidth*0.5;this.style.cursor='pointer';} else {this.onclick=null}" alt="" /><br/></p><p>补贴一个VBA代码</p><p>Sub 清除不明字符()<br/>Dim Q As Integer<br/>For Q = 1 To [b65536].End(xlUp).Row<br/>&nbsp;&nbsp;&nbsp; Cells(Q, 2) = Application.Clean(Cells(Q, 2))<br/>&nbsp;&nbsp;&nbsp; Cells(Q, 3) = Application.Clean(Cells(Q, 3))<br/>Next Q<br/>End Sub<br/></p><p>&nbsp;</p>

[此贴子已经被作者于2008-1-23 14:45:21编辑过]

wayy

好，学习一下。

hai

学习了,繁体版电脑真是烦!