Cze wszystkim
Mam makro, które uruchamiam za pomocą nomenklatury Excela. Pozwala mi to na modyfikowanie właściwości części i zespołów oraz zapisywanie planów w formatach PDF i DXF, a także części w STEP w celu przygotowania plików produkcyjnych. Chciałbym zwrócić uwagę, że podczas uruchamiania makra nie widać otwarcia SolidWorks ani otwarcia i zamknięcia części/płaszczyzn.
Ale chodzi o to, że mój problem polega na tym, że pracujemy z wersją 2022, a jeden z naszych klientów pracuje z wersją 2021 i instaluje środowisko pracy dla swojej wersji SolidWorks na naszych stacjach roboczych.
Więc moje pytanie jest następujące: czy możemy wybrać z Excela, którą wersję SolidWorks otworzyć (myślę, że zrobiłbym to za pomocą UserForm)? Moja wiedza na temat VBA jest ograniczona, wszystko, co zrobiłem do tej pory, robiłem, wybierając w prawo i w lewo w Internecie. Dla części kodu specyficznej dla poleceń SolidWorks (część modyfikująca właściwości nie jest jeszcze całkiem skończona, nie umieszczam jej poniżej):
Otwieranie SolidWorks:
Ustaw SWAPP = CreateObject("SldWorks.Application")
Otwarcie i nagranie utworu w STEP:
Ustaw SWMODEL = SWAPP. OpenDoc6(CHEMIN_PIECE, 1, 1, "", mójBłąd, mójOstrzeżenie)
SWMODEL. SaveAs2 FLD_LANCEMENT_TEMPO & CHEMIN_STEP, 0, Prawda, Fałsz
Otwieranie i zapisywanie planu w formacie PDF i DXF:
Ustaw SWMODEL = SWAPP. OpenDoc6(CHEMIN_PLAN, 3, swOpenDocOptions_Silent, "", myError, myWarning)
SWMODEL. SaveAs2 FLD_LANCEMENT_TEMPO & CHEMIN_PDF, 0, Prawda, Fałsz
SWMODEL. SaveAs2 FLD_LANCEMENT_TEMPO & CHEMIN_DXF, 0, Prawda, Fałsz
Zamykanie otwartych dokumentów:
SWAPP. ZamknijWszystkieDokumenty Prawda
Ustaw SWAPP = Nic: Ustaw SWMODEL = Nic
Czy zamiast "Set SWAPP = CreateObject("SldWorks.Application")" możemy mieć linię kodu, która pozwala otworzyć żądaną wersję?
Dziękuję za pomoc =)
!