如何在Word中插入图像并调整其大小？

Question

我编写了一个VBScript来自动创建Word文档.

我正在使用以下代码插入图像,但我似乎无法找到一种方法来调整它.

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

Answer 1

该AddPicture方法返回插入对象的句柄,因此您可以执行以下操作:

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