再次提问:如何把我选中的文字的前面都统一添加“//”
主要的功能是:做一个winform窗体,使他一直运行在最前面,这个窗体上有两个按钮,一个是添加,另一个删除。当我打开一个word文档后,选中几行。然后点击这个winform窗体上的添加按钮,就会自动把我刚刚选择的几行的最前面自动加上“//”。
[解决办法]
在一个WORD文件中增加一个宏
然后选中几行文字运行这个宏试试
要注意:这个只是给选中的每段增加 ///
Sub DefAdd()
Dim p() As Paragraph
Dim i As Integer
For i = 1 To Application.Selection.Paragraphs.Count
ReDim Preserve p(i)
Set p(i) = Application.Selection.Paragraphs(i)
Next
For i = 1 To UBound(p)
p(i).Range.Text = "/// " & p(i).Range.Text
Next
End Sub
[解决办法]
顶。。。。
[解决办法]
//不要使用宏,我是想做一个winform窗体。
你引用word对象,然后参考sdfkfkd(特别)提供的代码
[解决办法]
学习中