Macro in Excel to print a word file/page#

I got this Macro to print the file I wanted but it has 55 pages. I only want to print a specific page. How do I get this to work? Please Email at
[email protected].
Thanks,

 
Sub PrintWordDoc()
    Dim oWord As Object
    Dim sPath As String
    Dim iCnt  As Integer
     
     'Path to Master Cook Recipes 8-05.doc in same folder as workbook
    sPath = ThisWorkbook.Path & Application.PathSeparator & "H://Bradley Word/Master Cook Recipes 8-05.doc"
     
     'Ask copy count
    iCnt = Val(InputBox("How many copies", "Print Word doc", 1))
     
     'If any
    If iCnt >= 1 Then
         
         'Create word application
        Set oWord = CreateObject(Class:="Word.Application")
         
         'Open document sPath en printout wanted copies
        With oWord.Documents.Open("H://Bradley Word\Master Cook Recipes 8-05.doc")
            .PrintOut Background:=False, Copies:=iCnt
            .Close False
        End With
         
         'Quit word application
        oWord.Quit False
    End If
     
     'Clean up
    Set oWord = Nothing
End Sub

Please Wrap your code !!!

Hi,

Your question is not an Excel question ... it is Word ...
see link
http://word.mvps.org/FAQs/MacrosVBA/SelectCurPage.htm