<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/> Cells(Q, 2) = Application.Clean(Cells(Q, 2))<br/> Cells(Q, 3) = Application.Clean(Cells(Q, 3))<br/>Next Q<br/>End Sub<br/></p><p> </p>
[此贴子已经被作者于2008-1-23 14:45:21编辑过] |