有没有什么方法使相册里的照片做成同一规格

更新时间： 2025-06-26 19:29:19

1、代码：ShapeRange

Set aaa = ActiveSelectionRange

Dim a As Integer

Dim b As Integer

a = InputBox(请输入宽度. & Chr(13) & 注：根所你的CDR单位制度会有所不同)

b = InputBox(请输入高度. & Chr(13) & 注：根所你的CDR单位制度会有所不同)

Dim i As Integer

For i = 1 To aaa.Count

aaa(i).SizeWidth = a

aaa(i).SizeHeight = b

Next i

End Sub

2、打VBA编辑器(快捷键ALT+F11)，随便打开一个“模块”这个分类前面的 + 号。双击下面显示出来的那个corelXXXXX (后面的XXXX是一个名字)。把上面的代码粘贴进去，切换到CDR。选中你要设置为同样大小的东西。(这里可以在打开VBA编辑器之前就选中，就可以省去这步)，然后切换到VBA编辑器，按F5。

标签： 如何使用付款

有没有什么方法使相册里的照片做成同一规格相关文章

上一篇：圆明园十二生肖是怎么喷水的下一篇：住宅首付最低多少

其他相关资讯

天气预报导航

有没有什么方法使相册里的照片做成同一规格

有没有什么方法使相册里的照片做成同一规格 相关文章

有没有什么方法使相册里的照片做成同一规格相关文章