开通VIP,畅享免费电子书等14项超值服
首页
好书
留言交流
下载APP
联系客服
2019.05.19
今天和大家分享,获取特定字符串所在的段落索引,也就是特定字符在第几段。
VBA代码如下:
Sub pp()With ActiveDocumentFor i = 1 To .Paragraphs.CountIf InStr(.Paragraphs(i), '疑是地上霜') ThenMsgBox iEnd IfNextEnd WithEnd Sub
Sub pp()
With ActiveDocument
For i = 1 To .Paragraphs.Count
If InStr(.Paragraphs(i), '疑是地上霜') Then
MsgBox i
End If
Next
End With
End Sub
结果如下:
微信登录中...请勿关闭此页面