Hi everyone,
I'm trying to write a code for my spreadsheet in excel vba.

this code takes a snapshot of a range of cells in my spreadsheet (say "B2:F10") and pastes it into a blank word doc as a picture. (see below my code).

however I would like to be able to select the insert position and change the final size of the pic in the word doc using my code in excel.

can anyone pls help me.

regards

Dim objWord, objDoc As Object
ActiveWindow.View = xlNormalView
Range("B2:F10").Select
Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture
Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Add
objWord.Visible = True
objWord.Selection.Paste