Witam Nie mogę zapisać moich dokumentów SolidWorks w STEP. Kiedy próbuję, pojawia się komunikat o błędzie. " Wybrany dodatek nie jest prawidłowym dodatkiem w SOLIDWORKS "
Wydaje mi się, że mój SolidWorks jest niepoprawnie skonfigurowany.
Witam i zapraszam na forum, Charles-Eugene_FRIEDRICH, Mam nadzieję, że możemy Ci pomóc. Czy możesz podać nam używaną wersję i/lub zrzut ekranu swoich ustawień?. Dziękuję. @+. AR.
Rzeczywiście, kilka zrzutów ekranu pomogłoby w diagnozie.
Która wersja Solidworks?
Która wersja systemu Windows (lub przeglądarka dla wersji online).
Solidworks nie używa dodatku do zapisywania pliku w Step (może z wyjątkiem sytuacji, gdy używasz wersji online?, ale nawet wtedy nie sądzę, aby potrzebował dodatku)... Po prostu naciśnij " Zapisz jako ", a następnie wybierz format *. STP
Dostępnych jest bardzo niewiele ustawień do konwersji do STEP (Solidworks 2022):
Witaj Charles-Eugene_FRIEDRICH, Dzięki za zrzuty ekranu, wygląda to jak montaż, radzę zapisać go jako część, a następnie zrobić z tej części krok. @+. AR.
Witaj A.R Próbowałem zapisać same części, a także zespoły w STEP, ale za każdym razem otrzymuję ten sam komunikat o błędzie. PS: Z prostymi lub złożonymi częściami.
Czy to działa, jeśli utworzysz, a następnie wyeksportujesz prostą kostkę, czy nie? Jeśli to działa z powodu tego możliwego zestawu, jeśli nawet twoja kostka nie eksportuje, być może zewnętrzny dodatek generuje błąd.
Czy możesz podać listę dodatków zainstalowanych w oprogramowaniu? (w Narzędzia, Dodatki)
Na razie możesz je również przetestować, całkowicie je odznaczając, zrestartować oprogramowanie i ponowić krok eksportu, jeśli to działa, to dlatego, że jeden z dodatków generuje błąd. W przeciwnym razie to coś innego. Aby kopać również, jeśli obiekty powierzchniowe w twoim zespole oyu zaimportowały ciało, którego nie byłby w stanie wyeksportować.
Solidworks Composer to specjalna aplikacja. Nie pamiętam, żebym miał tego rodzaju problem w 2021 roku (nic też w SPR), więc może chwiejna instalacja. Na wszelki wypadek, które państwo członkowskie z 2021 roku?
Podjąć próbę zresetowania stacji roboczej za pomocą Solidworks RX. To nic nie kosztuje, ponieważ tymczasowo resetuje ustawienia i powie nam, czy to złe ustawienia, czy coś innego. Aby to zrobić, zamknij oprogramowanie, a następnie uruchom solidworks RX i kliknij na link zakreślony:
Następnie otwórz kwadrat, zapisz go jako element na dysku, a następnie wykonaj krok eksportu i przekaż nam opinię. Jeśli nadal nie działa, skłaniałbym się ku uszkodzonemu plikowi w oprogramowaniu i dlatego naprawa lub ponowna instalacja to oprogramowanie SW.
Nie, absolutnie nie, nawet go nie używam! Moim zdaniem nie pozostaje nic innego, jak podjąć próbę naprawy Solidworks. Wykluczyliśmy część, parametry, działa z innym formatem. Skłaniam się ku plikowi Solidworks (moduł do etapu eksportu), który jest uszkodzony.
I reaktywuje je jeden po drugim, jeśli nagrywanie działa...
Inne hipotezy:
Czy nie miałbyś innego oprogramowania CAD/CAD... Wynik, który " pasożytowałby " na eksporcie oczyszczalni ścieków? Myślę o Autodesk, Navisworks...? A z BatchConverter Mycadtools powoduje ten sam błąd?
Jeśli nic z tego, jestem również za próbą naprawy Solidworks ( naprawą ! nie ponowną instalacją (przynajmniej na razie))
Nasze części są również przechowywane w wielu różnych miejscach i nie ma problemów z ponad 20 różnymi stacjami i różnymi wersjami testowanymi w ciągu ostatnich kilku lat. Z drugiej strony przetestuj różne typy kroku 203 lub 214, dlaczego nie.
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Sub main()
'1-) on vérifie qu'un document est ouvert
Debug.Print "1-)On vérifie qu'un document est ouvert"
Set swApp = CreateObject("SldWorks.Application")
Set swModel = swApp.ActiveDoc ' On récupère le document d'ouvert
If swModel Is Nothing Then ' On vérifie si un document est ouvert
MsgBox "Pas de document d'ouvert." + Chr$(13) + _
"Une pièce ou assemblage SolidWorks doit être ouverte, " + Chr$(13) + _
"avant de relancer cette macro."
Else
FileTyp = swModel.GetType
If ((FileTyp = swDocPART) Or (FileTyp = swDocASSEMBLY)) Then 'Si le document est une pièce ou un assemblage
'2-)On vérifie si une config sym existe
'On vérifie si la configuration active est une configuration dérivée (Si Symétrique retour config defaut)
Set swCompModelConfig = swModel.GetActiveConfiguration
Dim vConfigName As Variant
Dim swParentConfig As SldWorks.Configuration
Dim swConfMgr As SldWorks.ConfigurationManager
Dim partTitle As String
partTitle = swModel.GetTitle
Debug.Print "partTitle:" & partTitle
If swCompModelConfig.IsDerived Then
Debug.Print "Configuration dérivée:" & swCompModelConfig.IsDerived
Debug.Print "Pause"
Dim swConfig As SldWorks.Configuration
Set swConfig = swModel.GetConfigurationByName(vConfigName)
' Process parent
Set swParentConfig = swCompModelConfig.GetParent
If Not swParentConfig Is Nothing Then
Debug.Print " Parent = " & swParentConfig.Name
swModel.ShowConfiguration2 (swParentConfig.Name)
End If
End If
'2-)On enregistre en step
Debug.Print "2-)On enregistre en step"
swModel.Extension.SaveAs Left(swModel.GetPathName, InStrRev(swModel.GetPathName, ".")) & "STEP", 0, 0, Nothing, 0, 0
MsgBox (Left(swModel.GetPathName, InStrRev(swModel.GetPathName, ".")) & "step sauvegardé")
'4-)On enregistre en step la config sym si existante
'Pour toutes les configurations du modèle 3D
configNames = swModel.GetConfigurationNames
For Each ConfigName In configNames
Debug.Print "4-Nom de config:" & ConfigName
Set swConfig = swModel.GetConfigurationByName(ConfigName)
Set swCustPropMgr = swConfig.CustomPropertyManager
If ConfigName Like "*Sym*" Then
If ConfigName Like "*Sym*Sym*" Then
MsgBox "Attention Symétrie de Symétrie merci de corriger votre assemblage et supprimer cette configuration: " & ConfigName
End If
'Mis en commentaire jusqu'au passage en pièce SYM sur 2 MEP
'If swModel.GetCustomInfoValue(ConfigName, "Symetrie") <> "" Then
'On active la config Sym
swModel.ShowConfiguration2 (ConfigName)
Debug.Print "4)On enregistre en step le Sym"
Debug.Print Left(swModel.GetPathName, Len(swModel.GetPathName) - 7) & "-SYM.STEP"
swModel.Extension.SaveAs Left(swModel.GetPathName, Len(swModel.GetPathName) - 7) & "-SYM.STEP", 0, 0, Nothing, 0, 0
MsgBox (Left(swModel.GetPathName, Len(swModel.GetPathName) - 7) & "-SYM" & ".step sauvegardé")
'End If
End If
Next
Else
MsgBox "Pas de pièce ou assemblage d'ouvert." + Chr$(13) + _
"Une pièce ou assemblage SolidWorks doit être ouvert, " + Chr$(13) + _
"avant de relancer cette macro."
End If ' Fin vérification si un plan est ouvert
End
End If ' Fin vérification si un document est ouvert
End Sub
Byłbym bardzo zaskoczony, gdyby to zadziałało, ale nigdy nie wiadomo! Skopiuj i wklej do nowego makra, a następnie uruchom je za pomocą F5