|
SolidWorks : Solidworks Material mit VBA eintragen
HenryV am 30.03.2017 um 11:38 Uhr (1)
Hallo ChristophHier meine Variante:- Eine temporäre Material-DB erstellen- Material-DB-Pfad in Solidworks hinzufügen- Material dem Teil zuweisen- Material-DB-Pfad in Solidworks wieder entfernen- temporäre Material-DB löschenCode:Public swApp As SldWorks.SldWorksPublic swModel As SldWorks.ModelDoc2Public swPart As SldWorks.PartDocSub main() Dim dbname As String Dim MatName As String Dim MatDbPaths As String Dim bRet As Boolean dbname = Environ("temp") & " empMatDb.sldmat" MatName = "Mein Material" ...
|
|
SolidWorks : Erscheinungsbilder: Baugruppe Teile
HenryV am 15.02.2023 um 18:13 Uhr (1)
Falls du nur das Erscheinungsbild gelöscht hast, das Material aber noch zugewiesen ist, kann man mit einem Makro das Material nochmals neu zuweisen.Get and Set Material Visual Properties Example (VBA)Hier das Beispiel für ein TeilCode:Option ExplicitSub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim swPart As SldWorks.PartDoc Dim dbs As Variant Dim sMatName As String Dim sMatDB As String Dim vConfName As Variant Dim i As Long Dim j As Long Set swApp = Application.SldW ...
|
 |
SolidWorks : Dateiliste auf Basis der Dateieigenschaften
HenryV am 08.12.2016 um 17:16 Uhr (15)
HalloCode:Sub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim fs As Object Dim a As Object Dim FileName As String Dim PropValue As String Dim Path As String Path = "C: emp" Set swApp = Application.SldWorks Set fs = CreateObject("Scripting.FileSystemObject") Set a = fs.CreateTextFile(Path & "File.txt", True) FileName = Dir(Path & "*.SLDPRT") swApp.DocumentVisible False, swDocPART ...
|
|
SolidWorks : API: Material löschen
HenryV am 12.02.2008 um 14:11 Uhr (0)
Hallo HaPeBei mir funktioniert dein Makro für die aktuelle Konfiguration ohne Problem (SWX2007 SP5).Wieso es bei dir nicht tut... Anbei der umgeschriebene Code, der bei mir für alle Konfigurationen geht.Code:Sub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim sMatName As String Dim sMatDB As String Dim vConfNameArr As Variant Dim bRet As Boolean Set swApp = Application.SldWorks Set swModel = swApp.ActiveDoc sMatDB = "" sMatName = ...
|
|
SolidWorks : Makro Befehl Alle Teilerscheinungsbilder löschen
HenryV am 10.08.2015 um 11:23 Uhr (1)
Hallo SonnyZum Löschen aller Erscheinungsbilder im Teil gibt es ein Beispiel in der API-Hilfe.Clear Display States Example (VBA)Code:Dim swApp As SldWorks.SldWorksDim modelDoc As SldWorks.ModelDoc2Dim partDoc As SldWorks.partDocDim boolstatus As BooleanOption ExplicitSub main() Set swApp = Application.SldWorks Set modelDoc = swApp.ActiveDoc Set partDoc = modelDoc boolstatus = partDoc.RemoveAllDisplayStatesEnd SubDas Zuweisen des Materials macht man mit der "SetMaterialPropertyName 2"-Methode.Get and Se ...
|
|
SolidWorks : rotz kombinieren nicht das gleiche Material
HenryV am 25.09.2007 um 08:22 Uhr (0)
Hallo ArneSchau mal im Featuremanager nach, ob da eine Farbe einem Feature oder einem Volumenkörper zugewiesen wurde.Was auch hilfreich ist ist die Anzeige von Erscheinungsbildbeschreibungen:Ansicht - Erscheinungsbildbeschreibungen und dann eine Fläche im Modell auswählen.Oder vileicht hilft Stefans Makro http://solidworks.cad.de/mm_31.htm. Gruss Andreas------------------21 ist nur die halbe Antwort.
|
|
SolidWorks : API: Material löschen
HenryV am 12.02.2008 um 11:26 Uhr (0)
Hallo HaPe http://ww3.cad.de/foren/ubb/Forum2/HTML/014092.shtml#000001 Gruss Andreas------------------21 ist nur die halbe Antwort.
|
|
SolidWorks : User ID für Luxology?
HenryV am 16.12.2013 um 12:13 Uhr (1)
HalloUm bei Luxology downloaden zu können, kannst du über das Kundenportal von SolidWorks einloggen.- Im Kundenportal einloggen. - Klick- Auf den "PhotoView 360 Appearances"-Link im Download-Bereich klicken.- Auf den "Luxology SolidWorks Asset SharingPortal"-Link klicken.- Im Menü-Banner auf "Share" klicken.- Material herrunterladen- In einen Ordner entpacken- Sicherstellen, dass der Ordner in der Liste der Erscheinungsbilder vorhanden ist (,wenn nicht, klicken Sie auf Dateiposition hinzufügen)- Drag&Drop, ...
|
|
SolidWorks : Makro: Werkstoff von eingetragenen Wert zu Solidworks Werkstoff ändern
HenryV am 17.06.2021 um 10:09 Uhr (1)
Hallo PeteDas Material kannst du mit SetMaterialPropertyName2 Method (IPartDoc) zuweisen.Code:bRet = swModel.SetMaterialPropertyName2(vConfNameArr(i), "c:SWX-MaterialMaterialDB.sldmat", "Stahl")Gegebenenfalls musst du die Benutzerdefinierten/Konfigurationsspezifischen Eigenschafen auf "SW-Material@Teilename.sldprt" ändern.Code:swCustProp.Add3 "Material", swCustomInfoText, Chr(34) + "SW-Material" & "@" & swModel.GetTitle & ".SLDPRT" & Chr(34), 1Gruss Andreas------------------21 ist nur die halbe Antwort.
|
|
SolidWorks : Makro: Werkstoff von eingetragenen Wert zu Solidworks Werkstoff ändern
HenryV am 13.09.2022 um 09:56 Uhr (1)
Hallo Petedas macht man mit GetMaterialPropertyName2 Method (IPartDoc) Code:Option ExplicitSub main() Dim swApp As SldWorks.SldWorks Dim swModel As SldWorks.ModelDoc2 Dim swPart As SldWorks.PartDoc Dim dbs As Variant Dim sMatName As String Dim sMatDB As String Dim swConfigMgr As SldWorks.ConfigurationManager Dim vConfName As Variant Dim vConfParam As Variant Dim vConfValue As Variant Dim i As Long Dim j As Long Dim bRet As Boolean Set swApp = Application.Sl ...
|
|
SolidWorks : Makro zum gleiche Erscheinungsbilder zusammenführen
HenryV am 22.02.2023 um 17:42 Uhr (1)
Per Hand:Gleiche Erscheinungsbilder markieren und neues doppelklickenPer Makro:Ein Anfang wäre -Get Material Properties Example (VBA)Get and Set Material Visual Properties Example (VBA)Remove Material Properties from Bodies Example (VBA)Add and Delete Appearances from Specific Display States Example (VBA)Beispiel ProgrammablaufWerte auslesen, Werte vergleichen und die neuen Farben neu zuweisen.------------------21 ist nur die halbe Antwort.
|
