WORD 巨集求助 (已解決) 感謝協助

各位先進好

小弟依照網路教學做了Word巨集
讓指令執行偵測第三頁第一句是否空白
如空白自動刪除，不是空白掠過
目前只會選擇到第三頁第一句
就是不判定空白
求解麻煩各位先進協助指點方向
感謝您

Sub 以段落單位判斷是不是空行()
Dim n As Range
Pages = ActiveDocument.ActiveWindow.Panes(1).Pages.count '頁面
ActiveDocument.GoTo(wdGoToPage, wdGoToAbsolute, 3).Select '選擇到第三頁
p = Selection.Information(wdActiveEndPageNumber) '當前頁碼
ActiveDocument.Bookmarks("\page").Range.Paragraphs.Item(1).Range.Select '選取所在頁第一段
If Len(n) =Chr(13) Then n.delete

End Sub