兰雅CorelDRAW VBA 工具箱 工具栏导入 for X6-2022

兰雅CorelDRAW VBA 工具箱 工具栏导入 for X6

https://bbs.lyvba.com/assets/files/2024-10-10/1728553558-838814-x6.zip

HotKeys.bas 需要更新原来的 GMS 里 HotKeys 模块

Attribute VB_Name = "HotKeys"
Sub Start_SelectSame()
  '// 选择相同工具增强版
  frmSelectSame.Show 0
End Sub

Sub Start_CQL_FIND()
  '// 简单查找
  CQL_FIND_UI.Show 0
End Sub

Sub Start_Batch_Replace()
  '// 批量替换
  Replace_UI.Show 0
End Sub

Sub Start_Arrange()
  '// 开始拼版
   ArrangeForm.Show 0
End Sub

Sub Start_CutLines()
  CutLines.Draw_Lines  '// 调用角线
End Sub

Sub Start_UniteOne()
  '// 开始拼版
   UniteOne.Show 0
End Sub

经过测试 CorelDRAW 2020 也这时使用这个工具栏配置导入