Maren的文档中有一个很大的表,横跨许多页。她希望能够跳到表中的特定行,因此她想知道是否可以使用“转到”功能跳到特定的行号,例如第80行。

转到对话框(按F5显示)可让您跳到文档中许多不同的位置。 (_WordTips_的其他问题已经介绍了如何使用对话框。)实际上,可以将其与表行一起使用,但有一个很大的警告。

如果您的文档仅包含一个表,则可以按照以下步骤跳转到行:

。按F5。 Word将显示“查找和替换”对话框的“转到”选项卡。

。在对话框的左侧,选择“线”。 (请参见图1。)

。输入您要移动到的行号。

。单击下一步,或按Enter。

之所以可行,是因为Word显然将表中的每一行都视为“行”。 (它也不受影响,但是包含换行或多个段落的行。)这使我想到了一个警告:如果您的文档包含多个表格(尤其是表格之前的文本),则跳行将关闭,因为Word在其行数计算中计算非表文本。

在这种情况下,您将需要使用宏来跳转到所需的行。

以下是可以使用的示例。

Sub GoToTableRow()

Dim RowNum As Integer     Dim LastRow As Integer     Dim Question As String

If Selection.Information(wdWithInTable) Then         LastRow = Selection.Tables(1).Rows.Count         Question = "Enter a number from 1 to " & LastRow         RowNum = InputBox(Question, 1)

If (RowNum < 1) Or (RowNum > LastRow) Then             MsgBox "That's an invalid row number"

Exit Sub         End If         Selection.Tables(1).Rows(RowNum).Cells(1).Select     Else         MsgBox "Not in table"

End If End Sub

宏首先检查以确保插入点在表中。如果是这样,它将询问用户他或她想要跳转到的行号。假设行号在可用行号的范围内,则该行将跳转到。

注意:

如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)上描述的宏,我准备了一个包含有用信息的特殊页面。

链接:/ wordribbon-WordTipsMacros [点击此处在新的浏览器标签中打开该特殊页面]。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(10906)适用于Microsoft Word 2007、2010和2013。