所以我有一個宏來搜索文檔上的所有文本並將它們全部轉換爲曲線。該宏還會查看超出CQL範圍的powerclip。 下面是我的代碼： Public Sub convertText()
Dim pg As Page
Dim shRange As ShapeRange
Dim sh As Shape
For Each pg In ActiveDocument.Pag
我想知道這是否可能，基本上我想生成一組變量（sh0，sh1，sh2等）。我正在考慮使用一個數組，但我無法讓它工作。 這裏是我的代碼： Dim intI As Integer
Dim shArray(0 To 10) As String
For intI = 0 To 10
shArray(intI) = "sh" & intI
Dim shArray(intI) As Sh
我正在VBA中編寫一個腳本，在CorelDraw中創建一個圖形。我無法集中文本。下面是CorelDraw中的宏編輯器正常工作代碼： Dim s2 As Object
Dim Txt As Object
Dim test As String
Dim returntest As String
returntest = "Test~Test1234~Test56~
我正試圖在我當前的工作系統中構建一個小型嵌套函數。我遇到的問題是，當我將第三個形狀添加到集合中並嘗試根據添加到集合中的上一個形狀來定位它時，它仍然根據第一個形狀定位它。我最終得到的是原件在原來的位置和副本堆疊在一起。 Function ArrangeImages(ByRef scol1 As Collection, ByRef sA, sB As Shape)
Dim i, ii As Long