Je recherche en vain une solution pour lier le nom de ma feuille de mise en plan à une propriété perso existante.
J’ai essayé en vain de l’appeler dans le nom de la feuille avec le $PRPSHEET:« REPERE » mais cela n’a pas l’air de fonctionner.
Je sais que je reussirais à le faire via une macro mais si je peux faire cela directement dans mon gabarti de MEP cela eviterais des manip supplémentaires dans la MEP.
Quelqu’un d’entre vous à t il reussi à solutionner cela.
Bonjour je ne pense pas que cela soit possible directement…
en attendant une autre réponse voici une macro pour commencer :
(Glanée sur le forum de Solidworks)
' 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
de cette idée d’amélioration :