-
05-1009
-
1、Ctr+H,查找替换"^$"即可,缺点:多按几次按钮
2、写程序,烦!优点:一键搞定
'用下面这个宏Sub Del1()
'
Dim doc1 As Word.Document
Set doc1 = Documents(1)For i = 1 To doc1.Paragraphs.Count
j = doc1.Paragraphs(i).Range.Characters.Count – 1
For n = j To 1 Step -1
asc1 = Asc(doc1.Paragraphs(i).Range.Characters(n))
If (asc1 > 64 And asc1 < 91) Or (asc1 > 96 And asc1 < 123) Then
doc1.Paragraphs(i).Range.Characters(n).Delete
End If
NextNext
End Sub相关日志
发表评论






1楼wudd
文章: 2005-10-09 23:03
装vs.net前要先装iis和其中的所有组件
投影仪的视频端就必须接视频,显示器端只能接显示器,也不知道为什么,如将本该接到视频端的线接到电脑端,就会偏色,不懂怎么表达,不要理我.