有没有什么方法使相册里的照片做成同一规格
更新时间：2024-04-27 06:27:36
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。
与 有没有什么方法使相册里的照片做成同一规格 相关文章
025771查询网专稿内容，转载请注明出处
不够精彩？
上一篇 : 7级大风能吹动多重的东西
下一篇 : 职业健康监护包括哪几项内容
热门生活百科推荐
联系方式：