用VBA将“C：\Users\wuxil\OneDrive\桌面\大衣柜进料图纸\大衣柜进料图纸”的JPG格式图片，逐页插入到word中,图纸顺时针转90° 图片高度200宽度187

您可以使用以下VBA代码将JPG格式的图片插入到Word中，并对其进行顺时针旋转和调整大小：

Sub InsertImageToWord()
    Dim imagePath As String
    Dim wordApp As Object
    Dim wordDoc As Object
    Dim wordShape As Object
    
    ' 设置图片路径
    imagePath = "C:\Users\wuxil\OneDrive\桌面\大衣柜进料图纸\大衣柜进料图纸.jpg"
    
    ' 创建Word应用程序对象和文档对象
    Set wordApp = CreateObject("Word.Application")
    Set wordDoc = wordApp.Documents.Add
    
    ' 插入图片到Word文档
    Set wordShape = wordDoc.Shapes.AddPicture(imagePath, False, True)
    
    ' 调整图片大小和旋转角度
    With wordShape
        .LockAspectRatio = msoFalse  ' 不锁定纵横比
        .Height = 200  ' 设置高度为200
        .Width = 187  ' 设置宽度为187
        .IncrementRotation 90  ' 顺时针旋转90度
    End With
    
    ' 显示Word应用程序窗口
    wordApp.Visible = True
    
    ' 清空对象变量
    Set wordShape = Nothing
    Set wordDoc = Nothing
    Set wordApp = Nothing

End Sub

请注意，您需要将`imagePath`变量中的路径更改为您实际的图片路径。