社区 › VB › 更新最后一个维度

ska67can 发表于 2006-12-8 15:23:25

更新最后一个维度

DimUpdate不&#039；t存在于vba中，我可以#039；t get SendCommand to release，那么如何更新维度？

Atook 发表于 2006-12-8 15:42:56

让我们看看你的代码。

Cathy 发表于 2006-12-8 15:45:58

我猜想，如果没有看到您的代码，则需要存储样式名称并选择DIM，然后重新为其分配样式名称以强制更新

Cathy 发表于 2006-12-8 15:46:17

此图纸。SendCommand“；dim“&amp；vbCr&amp&引用；“向上”&amp；vbCr&amp&引用；l“'&amp；vbCr#039；

ska67can 发表于 2006-12-8 15:56:43

[代码0）。更新不起作用？

Atook 发表于 2006-12-8 16:19:41

编号

Atook 发表于 2006-12-8 16:55:37

您是否需要更新，因为您&#039；我改变了dimstyle
.....
   ThisDrawing.SetVariable "LUNITS", 2
   ThisDrawing.SetVariable "LUPREC", 2
   ThisDrawing.SetVariable "DIMLUNIT", 2
   ThisDrawing.SetVariable "DIMDEC", 2
    objDimStyle.CopyFrom ThisDrawing
    ThisDrawing.ActiveDimStyle = objDimStyle

Cathy 发表于 2006-12-8 17:26:05

对我更改了Dimstyle中的参数

Cathy 发表于 2006-12-9 12:03:27

您是否像上面那样将更改复制到activedimstyle？

ska67can 发表于 2006-12-9 22:54:27

我是说你所有的代码

查看完整版本: 更新最后一个维度