How to insert and resize an image in Word?

问题

I have written a VBScript to automate the creation of a Word document.

I'm using the following code to insert an image, but I can't seem to find a way to then resize it.

objSelection.InlineShapes.AddPicture("C:\test.jpg")

回答1:

The AddPicture method returns a handle to the inserted object, so you could do something like this:

Set pic = objSelection.InlineShapes.AddPicture("C:\test.jpg")
pic.Height = 100
pic.Width  = 200

来源：https://stackoverflow.com/questions/28194878/how-to-insert-and-resize-an-image-in-word