Ich suche vergeblich nach einer Lösung, um den Namen meines Zeichenblattes mit einem bestehenden persönlichen Eigentum zu verknüpfen.
Ich habe vergeblich versucht, es im Namen des Blattes mit dem $PRPSHEET " REFERENCE " aufzurufen, aber es scheint nicht zu funktionieren.
Ich weiß, dass es mir über ein Makro gelingen würde, aber wenn ich dies direkt in meiner MEP-Vorlage tun kann, würde dies zusätzliche Manipulationen in der MEP vermeiden.
Hat es jemand von Ihnen geschafft, das Problem zu lösen?
Hallo, ich glaube nicht, dass es direkt möglich ist... Während Sie auf eine andere Antwort warten, finden Sie hier ein Makro, mit dem Sie beginnen können: (Aus dem Solidworks Forum)
' Written by: Deepak Gupta (http://gupta9665.wordpress.com/)
' ------------------------------------------------------------------------------
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swDraw As SldWorks.ModelDoc2
Dim swSheet As SldWorks.Sheet
Dim swModelview2 As Configuration
Dim ConfigName As String
Dim vSheets As Variant
Dim swView As SldWorks.View
Dim ConfigProperty As String
Dim i As Integer
Sub main()
Set swApp = Application.SldWorks
Set swDraw = swApp.ActiveDoc
' Is a drawing document active?
If swDraw Is Nothing Then
swApp.SendMsgToUser2 "A drawing document must be open and the active document.", swMbWarning, swMbOk
Exit Sub
End If
' Is it a drawing document?
If swDraw.GetType <> SwConst.swDocDRAWING Then
swApp.SendMsgToUser2 "A drawing document must be open and the active document.", swMbWarning, swMbOk
Exit Sub
End If
vSheets = swDraw.GetSheetNames
For i = 1 To swDraw.GetSheetCount
swDraw.ActivateSheet vSheets(i - 1)
Set swSheet = swDraw.GetCurrentSheet
Set swView = swDraw.GetFirstView
Set swView = swView.GetNextView
Set swModel = swView.ReferencedDocument
ConfigName = swView.ReferencedConfiguration
' Replace Kod with the required configuration property.
ConfigProperty = swModel.CustomInfo2(ConfigName, "Kod")
swSheet.SetName ConfigProperty
Next i
Set swModel = Nothing
swDraw.EditRebuild3
swDraw.Save2 False
End Sub
dieser Verbesserungsidee klicken: