כיצד לקרוא את Excel ב מאקרו SolidWorks

תוֹכֶן

• הוראות

עבוד ביעילות רבה יותר ב- SolidWorks באמצעות היכולת של Excel לאחסן ערכים מרובים ולהגדיר קשרים תפקודיים ביניהם. שליטה בפרמטרים של SolidWorks, כגון ערכי מאפיינים, עם כלי עזר של Excel VBA. לדוגמה, באפשרותך ליצור הרכבה עם גיליון אלקטרוני מוטבע של Excel המאפשר לך לשלוט במידות של חלק. באפשרותך לשנות את ערכי התאים בגליון העבודה המשובץ ולאחר מכן ללחוץ על לחצן פקודה כדי להפעיל מאקרו המעדכן את ההרכבה. חקור אפשרויות רבות לשימוש בתבניות Excel ובפונקציות עם פקודות מאקרו של SolidWorks.

הוראות

SolidWorks היא סוג של תוכנת ציור תלת-ממדית באמצעות מחשב (Stockbyte / Stockbyte / Getty תמונות)

1. פתח הר ב- SolidWorks. לחץ לחיצה ימנית על התיקייה "הערות" בעץ הפרויקט "FeatureManager" ובחר "הצג שמות מאפיינים" כדי לספק גישה נוחה לממדים ספציפיים.

2. הקלט מאקרו. עבור לתפריט "View" ובחר "Toolbars" ו- "Macro" כדי להציג את סרגל הכלים Macro. לחץ על הלחצן 'הקלט / השהה מאקרו' בסרגל הכלים.

3. בצע רק את הפעולות שברצונך להקליט. לחץ פעמיים על כל מאפיין כדי להגדיל את המאפיין שלו, לדוגמה, 1,2 ס"מ. לחץ על "Rebuild" כפתור או הקש "Ctrl + B" כדי לבנות מחדש את הרכבה. לחץ על הלחצן "עצור מאקרו" בסרגל הכלים כדי לעצור אותו.

4. הזן שם למאקרו, כגון "מאפיינים" בשדה "שם קובץ" בתיבת הדו-שיח "מאקרו חדש". בחר באפשרות "פקודות מאקרו של SW VBA (* .swp)" in "שמור" הקלד "ולחץ על" שמור ".

   
   

5. לחץ על הלחצן 'ערוך מאקרו' בסרגל הכלים ובחר אחד חדש. הקוד צריך לכלול משהו דומה לזה:

   Sub main ()

   בחר את swap = CreateObject ("SldWorks.Application") הגדר חלק = swApp.ActiveDoc Part.SelectByID "Shaft1 @ Sketch1 @ mygear-1 @ MyGearbox". = "Shift1 @ Sketch1 @. = "=" = "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. מחק כל שורה של קוד הכולל את שיטת "SelectByID" כדי לשפר את המאקרו. המאקרו שנרשם על ידי בחירת המאפיין ושינוי הערך. אבל עבור דוגמה זו, אתה לא צריך את הקוד הזה, כפי שהוא פשוט עושה עיבוד מיותר. הקוד הערוך צריך להיות דומה ל:

   Sub main ()

   בחר SWAP = CreateObject ("SldWorks.Application") קבע חלק = swAP.ActiveDoc Part.Parameter ("Shaft1 @ Sketch1 @ mygear.Part"). SystemValue = 0.0254 Part.Parameter ("Shaft2 @ Sketch1 @ mygear2.Part"). SystemValue = 0.0254 Part.Parameter ("MyDia2Part") SystemValue = 0.0762 Part.EditRebuild Part.ClearSelection End Sub (ייתכן שקישור זה מפנה לתוכן שחלק ממנו או כולו מופיע באנגלית) = SystemValue = 0.1016 Part.Parameter ("MyDia2 @ Sketch1 @ mygear2.Part") SystemValue = 0.0762

   
   

7. פתח גיליון עבודה של Excel ומלא את התאים עבור הערכים שברצונך לשלוט בהם. הוספת לחצן בגליון העבודה להפעלת מאקרו בתוך Excel. עבור לתפריט "View", בחר "Toolbars" ולחץ על "Control Toolbox". בחר באפשרות "לחצן פקודה" ולאחר מכן לחץ על חלון גליון העבודה שבו ברצונך להוסיף את לחצן הפקודה.

8. עבור אל SolidWorks והעתק את כל קוד המאקרו בין השורות "Sub Main ()" ו- "End Sub" של המאקרו המוקלט.

9. חזור לגיליון האלקטרוני של Excel ולחץ פעמיים על לחצן הפקודה החדש או לחץ באמצעות לחצן העכבר הימני ובחר "הצג קוד". הדבק את קוד SolidWorks שהועתק אל שורת "End Sub".

10. שנה את הקוד הבא כדי לגשת לערכים ב- Excel.

    (SubtB1 @ Mygear.Part) SystemValue = Excel.Range ("B1") * 0.0254 חלק 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. העתק והדבק את גליון העבודה של Excel לתוך הרכבה, כך שקובץ חיצוני אינו שולט בתבנית. בחר את כל התאים הנדרשים ולחץ על "Ctrl + C" כדי להעתיק את כולם. חזור אל מכלול SolidWorks ולחץ על "Ctrl + V" כדי להדביק את התאים שהועתקו. כעת, סגור או מחק את קובץ ה- Excel. הגיליון האלקטרוני מובנה בתוך הרכבה, כך שאתה לא צריך את הקובץ.

12. לחץ פעמיים על הגיליון האלקטרוני המשובץ כדי להפעיל אותו. שנה את ערכי התאים ולחץ על לחצן הפקודה בגליון העבודה כדי לעדכן את הרכבה. לחץ מחוץ לחלון גליון העבודה המשובץ כדי לבטל ולחזור לאסיפה.