Results 1 to 2 of 2

Thread: AMEP - Фильтрация в спецификации

  1. #1
    Woo! Hoo! my 1st post
    Join Date
    2010-03
    Posts
    1
    Login to Give a bone
    0

    Default AMEP - Фильтрация в спецификации

    Уважаемые коллеги!

    Подскажите пожалуйста каким образом можно создать фильтр в спецификации количества труб по системе (слою, наличию изоляции или другому признаку). Т.е. чтобы нижеуказанная форумала "видела" только определенную систему.
    (Использовать классификатор по разным причинам неудобно)

    Формула от Vitaly:

    Set acadApp = GetObject(, "AutoCAD.Application")
    On Error Resume Next
    totLength = 0
    n="[_ХОЛОД-ТРУБЫ:Номинальныйдиаметрпокаталогу]"
    h="[_ХОЛОД-ТРУБЫ:Обработка]"
    s=[_ХОЛОД-ТРУБЫ:Длина]

    For Each object In acadApp.ActiveDocument.ModelSpace
    If object.ObjectName = "AecbDbPipe" Then
    If object.Handle <> h Then
    set dict=object.GetExtensionDictionary
    Set subdict = Dict.Item("AEC_PROPERTY_SETS")
    For Each sch_propset In subdict
    If sch_propset.Name = "_ХОЛОД-ТРУБЫ" Then
    For Each sch_prop In sch_propset.Properties
    If sch_prop.Name = "Номинальныйдиаметрпокаталогу" Then
    If sch_prop.Value= n then
    totLength = totLength + object.Length
    End If
    End If
    Next
    End If
    Next

    End If
    End If
    Next

    RESULT = Round(totLength + s, 2)/1000

    ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО!

  2. #2
    Active Member
    Join Date
    2005-11
    Posts
    77
    Login to Give a bone
    0

    Default Re: AMEP - Фильтрация в спецификации

    Здравствуйте!
    Посмотрите пример
    http://www.vitalyf.by.ru/Sample/MemLenByStyleMat.rar
    http://www.vitalyf.by.ru/Sample/MemLenByStyleMat_2.rar

    попробуйте адаптировать формулу для труб...

Similar Threads

  1. Спецификации в iAssemblies
    By Enfiel3D in forum Inventor - General
    Replies: 0
    Last Post: 2011-07-30, 06:34 PM
  2. Формула в спецификации
    By andreys in forum Revit - Platform
    Replies: 1
    Last Post: 2010-09-03, 04:12 PM
  3. Фильтры в спецификации
    By goolera in forum Revit - Platform
    Replies: 5
    Last Post: 2010-08-10, 09:45 AM
  4. Спецификации по ГОСТу
    By losenko in forum Revit - Platform
    Replies: 12
    Last Post: 2009-10-20, 09:45 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •