如何知道当前行属于哪一段？

jingzhg

在VBA中，我编的程序以段落为单位处理，即通过activedocument.paragraphs(n)来访问每一段。我想让程序从光标所在段落开始运行，那么，如何知道光标所在行是哪一段呢？我指的是在全文中的第几段，不是本页中的第几段。是不是通过selection 的什么属性就行了？

请赐教。

守柔

象这个情况，无需判断第几个段落。

请参：

'* ＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋＋ '* Created By I Love You_Word!@ExcelHome 2005-6-2 16:16:32 '仅测试于System: Windows NT Word: 10.0 Language: 2052 '^The Code CopyIn [ThisDocument-ThisDocument]^' '* －－－－－－－－－－－－－－－－－－－－－－－－－－－－－

Option Explicit Sub Example() Dim MyRange As Range, i As Paragraph With ThisDocument Set MyRange = .Range(Selection.Paragraphs(1).Range.Start, .Content.End) '.Paragraphs.Last.Range.End亦可 End With For Each i In MyRange.Paragraphs MsgBox i.Range.Text Next End Sub '----------------------需要知道当前行的段落数，可以搜索一下本论坛。