Jak czytać Excel w makrze SolidWorks

Autor: Sara Rhodes
Data Utworzenia: 15 Luty 2021
Data Aktualizacji: 26 Listopad 2024
Anonim
Linking Data from Microsoft Excel to a SolidWorks Model
Wideo: Linking Data from Microsoft Excel to a SolidWorks Model

Zawartość

Pracuj wydajniej w SolidWorks, wykorzystując zdolność Excela do przechowywania wielu wartości i definiowania relacji funkcjonalnych między nimi. Steruj parametrami SolidWorks, takimi jak wartości wymiarów, za pomocą narzędzi Excel VBA. Na przykład można utworzyć zespół za pomocą osadzonego arkusza kalkulacyjnego Excel, który pozwala kontrolować wymiary części. Możesz zmienić wartości komórek w osadzonym arkuszu, a następnie kliknąć przycisk polecenia, aby uruchomić makro aktualizujące zespół. Poznaj wiele opcji używania formuł i funkcji Excela z makrami SolidWorks.


Instrukcje

SolidWorks jest rodzajem sterowanego komputerowo programu do rysowania 3D (Stockbyte / Stockbyte / Getty Images)

  1. Otwórz uchwyt w SolidWorks. Kliknij prawym przyciskiem myszy folder „Adnotacje” w drzewie projektu „FeatureManager” i wybierz „Pokaż nazwy wymiarów”, aby zapewnić łatwy dostęp do określonych wymiarów.

  2. Nagraj makro. Przejdź do menu „Widok” i wybierz „Paski narzędzi” i „Makro”, aby wyświetlić pasek narzędzi Makro. Kliknij przycisk „Nagraj pauzę makro” na pasku narzędzi.

  3. Wykonuj tylko akcje, które chcesz nagrać. Kliknij dwukrotnie każdy wymiar, aby zwiększyć jego wymiar, na przykład 1,2 cm. Kliknij przycisk „Przebuduj” lub naciśnij „Ctrl + B”, aby odbudować zespół. Kliknij przycisk „Zatrzymaj makro” na pasku narzędzi, aby go zatrzymać.

  4. Wprowadź nazwę makra, na przykład „wymiary”, w polu „Nazwa pliku” w oknie dialogowym „Nowe makro”. Wybierz „Makra SW VBA (* .swp)„ w ”Zapisz jako typ ”i kliknij„ Zapisz ”.


  5. Kliknij przycisk „Edytuj makro” na pasku narzędzi i wybierz nowy. Kod powinien zawierać coś podobnego do następującego:

    Sub main ()

    Ustaw swApp = CreateObject ("SldWorks.Application") Ustaw część = swApp.ActiveDoc Part.SelectByID "Shaft1 @ Sketch1 @ mygear-1 @ MyGearbox". Part.Parameter ("Shaft1 @ Sketch1 @ mygear.Part"). SystemValue = 0.0254 Part.SelectByID "Shaft2 @ Sketch1 @ mygear2-1 @ MyGearbox",. Part.Parameter („Shaft2 @ Sketch1 @ mygear2.Part”). SystemValue = 0.0254 Part.SelectByID „MyDia1 @ Sketch1 @ mygear-1 @ MyGearbox”. Part.Parameter („MyDia1 @ Sketch1 @ mygear.Part”). SystemValue = 0.1016 Part.SelectByID „MyDia2 @ Sketch1 @ mygear2-1 @ MyGearbox” ,. Part.Parameter ("MyDia2 @ Sketch1 @ mygear2.Part"). SystemValue = 0.0762 Part.EditRebuild Part.ClearSelection End Sub

  6. Usuń każdy wiersz kodu zawierający metodę „SelectByID”, aby poprawić makro. Makro zarejestrowane przez wybranie wymiaru i zmianę wartości. Ale w tym przykładzie nie potrzebujesz tego kodu, ponieważ tylko sprawia, że ​​przetwarzanie jest zbędne. Edytowany kod powinien wyglądać następująco:


    Sub main ()

    Ustaw swApp = CreateObject ("SldWorks.Application") Set Part = swApp.ActiveDoc Part.Parameter ("Shaft1 @ Sketch1 @ mygear.Part"). SystemValue = 0.0254 Part.Parameter ("Shaft2 @ Sketch1 @ mygear2.Part"). SystemValue = 0.0254 Part.Parameter ("MyDia1 @ Sketch1 @ mygear.Part"). SystemValue = 0.1016 Part.Parameter ("MyDia2 @ Sketch1 @ mygear2.Part") SystemValue = 0.0762 Part.EditRebuild Part.ClearSelection End Sub

  7. Otwórz arkusz programu Excel i wypełnij komórki wartościami, które chcesz kontrolować. Dodaj przycisk w arkuszu, aby aktywować makro w programie Excel. Przejdź do menu „Widok”, wybierz „Paski narzędzi” i kliknij „Przybornik sterowania”. Wybierz opcję „Przycisk polecenia”, a następnie kliknij okno arkusza, w którym chcesz wstawić przycisk polecenia.

  8. Przejdź do SolidWorks i skopiuj kod makra między liniami „Sub Main ()” i „End Sub” nagranego makra.

  9. Wróć do arkusza kalkulacyjnego Excel i kliknij dwukrotnie nowy przycisk polecenia lub kliknij prawym przyciskiem myszy i wybierz „Wyświetl kod”. Wklej skopiowany kod SolidWorks do linii „End Sub”.

  10. Zmodyfikuj następujący kod, aby uzyskać dostęp do wartości w programie Excel.

    Private Sub CommandButton1_Click () Set swApp = CreateObject ("SldWorks.Application") Set Part = swApp.ActiveDoc Part.Parameter ("Shaft1 @ Sketch1 @ mygear.Part") SystemValue = Excel.Range ("B1") * 0.0254 Part SystemValue = Excel.Range ("B2") * 0.0254 Part.Parameter ("Shaft2 @ Sketch1 @ mygear2.Part"). SystemValue = Excel.Range ("B3" ) * 0.0254 Part.Parameter ("MyDia2 @ Sketch1 @ mygear2.Part"). SystemValue = Excel.Range ("B4") * 0.0254 Part.EditRebuild Part.ClearSelection End Sub

  11. Skopiuj i wklej arkusz programu Excel do złożenia, aby plik zewnętrzny nie kontrolował szablonu. Zaznacz wszystkie wymagane komórki i naciśnij „Ctrl + C”, aby skopiować je wszystkie. Wróć do złożenia SolidWorks i naciśnij „Ctrl + V”, aby wkleić skopiowane komórki. Teraz zamknij lub usuń plik Excel. Arkusz kalkulacyjny jest wbudowany w zespół, więc plik nie jest potrzebny.

  12. Kliknij dwukrotnie osadzony arkusz kalkulacyjny, aby go aktywować. Zmień wartości komórek i kliknij przycisk polecenia w arkuszu, aby zaktualizować zespół. Kliknij poza oknem osadzonego arkusza, aby dezaktywować i powrócić do złożenia.