Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako čítať Excel v makre SolidWorks

Pracujte efektívnejšie v SolidWorks s využitím schopnosti programu Excel držať viac hodnôt a definovanie funkčných vzťahov medzi hodnotami . Parametre Kontrolné SolidWorks , ako sú hodnoty kót , s VBA nástroje Excelu . Napríklad , môžete vytvoriť zostavu s vloženým Excel , ktorý vám umožní ovládať rozmery článok. Môžete zmeniť hodnoty buniek v vloženej tabuľky a kliknite na príkazové tlačidlo spustiť makro , ktoré aktualizuje zostavu . Preskúmajte veľa možností pre používanie vzorcov a funkcií programu Excel s makrá SolidWorks . Pokyny dovolená 1

Otvorte zostavu v SolidWorks . Kliknite pravým tlačidlom myši na priečinok " Anotácia " v " stromu FeatureManager " a vyberte " Zobraziť názvy kót " pre ľahký prístup k špecifickým rozmerom .
2

Záznam makra . Prejdite do ponuky " Zobraziť " a vyberte " Panely nástrojov " a potom " makro " pre zobrazenie makrá Toolbar . Kliknite na tlačidlo " Record \\ Pauza makro " na paneli nástrojov.
3

Vykonávajte iba akcie , ktoré chcete zaznamenať . Dvakrát kliknite na každý rozmer zvýšenie hodnoty rozmerov , napríklad o 0,5 cm . Kliknite na tlačidlo " Rebuild " alebo stlačte " Ctrl + B " znovu zostavu . Kliknite na tlačidlo " Stop " makro na paneli nástrojov Makro zastaviť makro .
4

Zadajte názov makra , napríklad v oblasti " Názov súboru " v Novom Makro " rozmery " , dialógové okno . Vyberte " SW VBA makrá ( * . SWP ) " v " Uložiť ako typ " a kliknite na " Uložiť " .
5

Kliknite na tlačidlo " Upraviť makro " na paneli nástrojov Makro a vyberte nové makro . Kód by mal obsahovať niečo podobné nasledujúcemu :

Sub main ( )

Set Swapp = CreateObject ( " SldWorks.Application " ) Set Časť = swApp.ActiveDocPart.SelectByID = 0.0254Part.SelectByID = 0.0254Part.SelectByID = 0.1016Part.SelectByID " MyDia2 @ Skica1 @ mygear2 - 1 @ MyGearbox " . Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0762Part.EditRebuildPart.ClearSelectionEnd Sub
6

Zmazať každý riadok kódu , ktorý obsahuje metódu " SelectByID " optimalizovať vaše makro . Makro zaznamenané výberom rozmer a mení svoju hodnotu . Ale na tomto príklade , nepotrebujete ten kód , tak to jednoducho spôsobuje zbytočné spracovanie . Upravený kód by mal byť podobný nasledujúcemu :

Sub main ( )

Set Swapp = CreateObject ( " SldWorks.Application " ) Set Časť = swApp.ActiveDocPart.Parameter ( " Shaft1 @ Sketch1@mygear.Part " ) . SystemValue = 0.0254Part.Parameter ( " Shaft2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0254Part.Parameter ( " MyDia1 @ Sketch1@mygear.Part " ) . SystemValue = 0,1016 Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0762Part.EditRebuildPart.ClearSelectionEnd Sub
7

Otvorte tabuľku programu Excel a vyplňte bunky pre hodnoty , ktoré chcete ovládať . Pridanie tlačidla do tabuľky pre aktiváciu makra vnútri Excel . Prejdite do ponuky " Zobraziť " vyberte " Panely nástrojov " a potom kliknite na " Ovládacie prvky " . Vyberte možnosť " Command Button " a potom kliknite na tlačidlo v okne tabuľkovom procesore , kam chcete vložiť na príkazové tlačidlo .
8

Prejsť na SolidWorks a skopírujte celý kód makra medzi " Sub Main ( ) " a " End Sub " riadky zaznamenané makro .
9

Návrat do tabuľky programu Excel a dvakrát kliknite na nové príkazové tlačidlo , alebo kliknite pravým tlačidlom myši na tlačidlo a vyberte možnosť " Zobraziť kód " . Vložte kód skopírovaný z programu SolidWorks nad " End Sub " riadku .
10

Upravte kód takto prístup hodnoty Excel .

Private Sub CommandButton1_Click ( ) Set Swapp = CreateObject ( " SldWorks.Application " ) Set Časť = swApp.ActiveDocPart.Parameter ( " Shaft1 @ Sketch1@mygear.Part " ) . SystemValue = Excel.Range ( " B1 " ) * 0.0254Part.Parameter ( " MyDia1 @ Sketch1@mygear.Part " ) . SystemValue = Excel.Range ( " B2 " ) * 0.0254Part.Parameter ( " Shaft2 @ @ Skica1 mygear2.Part " ) . SystemValue = Excel.Range ( " B3 " ) * 0.0254Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = Excel.Range ( " B4 " ) * 0.0254Part . EditRebuildPart.ClearSelectionEnd Sub
11

skopírujte a vložte tabuľku programu Excel do zostavy , takže externý súbor nie je ovládanie modelu . Vyberte všetky požadované bunky a stlačte " Ctrl + C " skopírovať bunky . Vráťte sa do zostavy SolidWorks a stlačte " Ctrl + V " vložiť skopírované bunky . Teraz , buď v blízkosti alebo odstrániť súbor programu Excel . Tabuľka je uložená v zostave , takže nemusíte súbor .
12

Dvakrát kliknite na vložený tabuľku pre aktiváciu tabuľky . Zmeňte hodnoty buniek a kliknite na príkazové tlačidlo tabuľky aktualizovať zostavu . Kliknite mimo vloženého okna tabuľkového deaktivovať a vrátiť do zostavy .

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené