https://www.cadforum.cz/forum/ Fri, 15 May 2026 08:59:44 +0000 Wed, 14 Nov 2012 13:07:11 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=16115 https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ https://www.cadforum.cz/forum/forum_posts.asp?TID=16115&PID=74024&title=serazeni-kusovniku#74024 Autor: Adamito
Předmět: 16115
Zasláno: 14.lis.2012 v 13:07

Dobrý den,
snažím se seřadit kusovník v hlavní sestavě "pouze součásti", mám napsané toto pravidlo

    Dim RootPart As Inventor.Document
    RootPart = ThisApplication.ActiveDocument
    oBOM = RootPart.ComponentDefinition.BOM
    oBOM.StructuredViewEnabled = True
    oBOM.StructuredViewFirstLevelOnly = False
    oBOM.PartsOnlyViewEnabled = True
    oBOMView3 = oBOM.BOMViews.Item(3)  '3 = POUZE SOUČÁSTI ROZPISKA
    oBOMRows3 = oBOMView3.BOMRows
'    Třídit a přečíslovat rozpisku "pouze součásti".
    Call oBOMView3.Sort("He_SkZb", True, "He_Nazev1", True, "Description", True)
    Call oBOMView3.Renumber(1, 1)

problém je v tom, že se to neseřadí podle druhého kritéria.
Poradí někdo, kde je zakopaný pes?
]]> Wed, 14 Nov 2012 13:07:11 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=16115&PID=74024&title=serazeni-kusovniku#74024