VBA 循环修改 Illustrator 模板文字层内容 - 自动批量生成 AI 文件

使用 VBA 循环修改 Illustrator 模板文字层内容并自动批量生成 AI 文件

本文将介绍如何使用 VBA 代码，循环修改 Illustrator 模板中的文字层内容，并自动生成多个包含不同文本内容的 AI 文件。

准备工作:

1. 添加 Illustrator 对象库：
   • 打开 VBA 编辑器，依次点击'工具'-'引用'。
   • 在弹出的对话框中找到'Adobe Illustrator XX.X Type Library'（其中 XX.X 为 Illustrator 的版本号），勾选并确认。

VBA 代码示例：

Sub UpdateIllustratorTemplate()
    ' 打开 Illustrator 模板
    Dim aiApp As Illustrator.Application
    Set aiApp = CreateObject("Illustrator.Application")
    
    Dim aiDoc As Illustrator.Document
    Set aiDoc = aiApp.Open("C:\Templates\template.ai")
    
    ' 循环修改文字层内容
    Dim i As Integer
    For i = 1 To 10 ' 假设 Excel 中有 10 个单元格需要修改
        aiDoc.Layers("Text Layer").TextFrames(1).Contents = Range("A" & i).Value
        aiDoc.SaveAs "C:\Output\output" & i & ".ai"
    Next i
    
    ' 关闭 Illustrator
    aiDoc.Close
    aiApp.Quit
End Sub

代码说明：

• 该代码假设 Illustrator 模板中有一个名为'Text Layer'的文本层，其中第一个文本框的内容需要循环修改。
• 代码中的循环次数可以根据实际情况修改。
• 修改完成后，每次保存为一个新的 Illustrator 文件，保存路径为'C:\Output'，文件名为'output1.ai'、'output2.ai'、'output3.ai'……依次类推。

注意事项:

• 代码中的 Excel 单元格值的引用方式为'Range'，需要确保代码所在的工作簿已经打开，并且该单元格的所属工作表处于活动状态。
• 如果需要引用其他工作簿中的单元格，可以使用'Workbooks'、'Sheets'等对象来获取。

总结：

通过以上步骤，您可以使用 VBA 代码快速批量修改 Illustrator 模板中的文字层内容，并生成多个包含不同文本内容的 AI 文件，提高工作效率。