15545448 发表于 2024-11-27 16:39:09

我录制了一个轮廓线粗的宏 为什么ch有时候是毫米有时候.....

Sub Macro1()
    ' Recorded 2024/11/26
    '
    ' Description:
    '   3
    Dim OrigSelection As ShapeRange
    Set OrigSelection = ActiveSelectionRange
    OrigSelection.SetOutlineProperties 0.012, Color:=CreateRGBColor(0, 0, 0)
End Sub

上面的0.012有时候出来是像素单位 有时候是毫米的

夕雾 发表于 2024-11-27 17:02:48

   '设置单位为mm
    ActiveDocument.Unit = cdrMillimeter
你直接设置下单位

15545448 发表于 2024-11-27 17:04:39

夕雾 发表于 2024-11-27 17:02
'设置单位为mm
    ActiveDocument.Unit = cdrMillimeter
你直接设置下单位

我马上去改一下:handshake
页: [1]
查看完整版本: 我录制了一个轮廓线粗的宏 为什么ch有时候是毫米有时候.....