CAD tip # 7045:

VBA makro ListInspection vytvoří seznam všech kontrolních (inspekčních) kót v aktuálním výkresu Inventoru (IDW/DWG). Ten obsahuje všechny parametry kót. Kótovaná délka je zaokrouhlena stejně jako ve výkresu. Seznam pak exportuje do tabulátory odděleného souboru (TAB delimited). Název souboru je odvozen od názvu vašeho výkresu - pouze je přidána přípona ".txt".

V prostředí výkresu stiskněte Alt+F11 pro spuštění VBA editoru. Pomocí "File > Load project" (Soubor > Načíst projekt) načtěte soubor ListInspection.ivb. Přepněte zpět na váš výkres v Inventoru a stiskněte Alt+F8 pro zobrazení maker. Vyberte ListInspection.Report a klepněte tlačítko Run (Spustit). Makro lze též použít jako iLogic pravidlo.

Výsledný TXT soubor můžete přetáhnout do Excelu.

Kódy orámování (tvarů) jsou "No", "Ang" nebo "Rnd".

Příklad výstupu:

  
DimValue  Toler-L Toler-H InspLabel Shape Rate Hole
3.235     -0.2    0.3     mojeKóta1 Rnd   A    
2.854     0       0       mojeKóta2 Rnd        H7 
0.635     0       0       můjPopis  m

Download