tft每日頭條

 > 生活

 > 有沒有什麼方法使相冊裡的照片做成同一規格

有沒有什麼方法使相冊裡的照片做成同一規格

生活 更新时间:2024-11-27 18:24:04

  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。

更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!

查看全部

相关生活资讯推荐

热门生活资讯推荐

网友关注

Copyright 2023-2024 - www.tftnews.com All Rights Reserved