Macro to copy worksheet into word

Hi all,
I need a macro that will copy a worksheet into a new word document. I don't want the data to be linked, I just want it to paste the values, like when you do Paste Special> Values. There is a specify range of data I want to copy- Cells B2:H80.

I've created the following code from stuff I found on the internet and by adjusting it a bit. I'm not a programmer, so this is a shot in the dark.

Sub OpenSpecificDoc()
Dim wrdApp As Word.Application

Set wrdApp = CreateObject("word.Application")

wrdApp.Documents.Add



wrdApp.Visible = True


Range("b2:h88").Select
Selection.Copy

wrdApp.Selection.PasteSpecial Link:=False, DataType:=wdPasteMetafilePicture, _
Placement:=wdInLine, DisplayAsIcon:=False


End Sub

The problem with this is that it doesn't paste the entire selection, can anyone explain why it doesn't and how I can remedy this?
Thank you,
Pete