Всем, добрый день!
Ищу ответ на вопрос: как закрыть проект семейства, который я программно открыл...
Может я что-то не так делаю, но ...
-     Private myCD As ExternalCommandData 
-   
-     Public Sub Transfer_Single_Project(ByVal Project_Path As String) 
-         ' Открываем требуемый документ 
-         myCD.Application.OpenAndActivateDocument(Project_Path) 
-         ' Объявляем переменные 
-         Dim App As Autodesk.Revit.UI.UIApplication = myCD.Application() 
-         Dim UIDoc As UIDocument = App.ActiveUIDocument 
-         Dim Doc As Document = App.ActiveUIDocument.Document 
-   
-         ' Здесь собственно код работы модуля 
-         ' ••••••••••••••••••••••••••••••••••• 
-   
-         'Doc.Close(True) ' Не работает 
-         'Doc.Close() ' Не работает 
-   
-         UIDoc.SaveAndClose() ' Не работает 
-   
-     End Sub 
не работает.
Сохранение работает нормально, а вот закрытие проекта семейства никак!!! Что я еще не знаю про этот простой, на первый взгляд, процесс???