Вообще команда есть "ID_PRJBROWSER_COLLAPSE_ALL_NODES", но запустить её Revit не даст в текущих версиях. Можешь попробовать WinAPI, эмулировать пользовательский ввод, т.е. найти дочернее окно Revit-а, в его дочернем элементе "тыкнуть" ПКМ, в меню найти соответствующий пункт, проблема разве что в том (если вообще получится), что решение будет только для тех языков, которые ты реализуешь