我需要您正确使用CATIA的帮助 .
我目前的任务是为模具创建一个“支撑”部件,其中必须插入有头螺钉(无论其长度)最大为15mm . 插入的帽螺钉的长度取决于位于支撑部件上方的板 . 在Excel中我创建了几个公式来确定必须使用哪个有头螺钉,但我不知道如何在VBA中使用excel公式 . 有没有办法在VBA中使用excel公式甚至电子表格?
'declaration of X as "Height of Plate 9"
Dim X As Integer
X = length1.Value
'declaration of Y as the result for the optimal length of the CapScrew to be used
Dim Y As Integer
Y = 0
'Formula for the length of the CapScrew to be used
If (designTable1.Configuration <= 15) = True Then
Y = X - 10 - 1 + 15
designTable2.Configuration = Y
Else
Y = X - 12 - 1 + 15
designTable2.Configuration = Y
End If
3 回答
尝试:
但是,与使用VBA中的工作表函数相比,通常有更好的解决方案 .
您可以使用CATIA中的公式根据输入确定用于设计表的配置(板厚和所需的多余) .
为此,CATIA提供CloserConfig,CloserSupConfig和CloserInfConfig函数 .
作为一个例子,假设首先考虑这个设计表:
并且有三个参数:GRIP_LENGTH是螺钉固定在一起的厚度NUT_GRIP是螺母所需的多余长度(或螺钉拧入板的距离) . SCREW_LENGTH是所选螺钉的长度
公式计算设计表的配置参数,选择最接近的可用配置,其中螺钉长度大于GRIP_LENGTH和NUT_GRIP的总和:
Configuration = Sheet-> CloserSupConfig("SCREW_LENGTH",
GRIP_LENGTH
NUT_GRIP
)从该公式中,自动选择配置,并从设计表中填写SCREW_LENGTH的正确值 .
感谢@ Olly的建议,我能够为我的问题找到合适的公式 .
为了使公式起作用,我在Capscrew设计表中创建了一个名为SuporteCheck的列 . 柱的值(与所需螺钉M10和M12的行匹配)是公式的结果:板9的高度 - 板9中的凹槽长度 - 支撑中的帽螺钉头部凹陷长度的高度 . 然后我在Capscrew配置中使用了上面的公式:CloserInfConfig("DesignTable.1","Altura_da_cabeça",
External Parameters\Diametro_Parafuso
,"SuporteCheck",External Parameters\Espessura_Chapa_9
- 1mm -External Parameters\Diametro_Parafuso
External Parameters\entrada_seguranca
感谢大家 .