ник: ddi
Интро: чтобы всё работало надо потклучить библиатеку Microsoft Office 12.0 Object Library
Сушестоет несколко методов созданиее ленты можно создать тоблицу какою хотите и програмно добовить его как ленту но это потом
1.1 создаём таблицу UsysRibbons в режиме конструктора (акссес програмно видит это таблицу )но слово Usys означает что ваша таблица системная после создание она исчеснит чтобы увидить его надо в навигацонном панеле в свойствах см картинка 1 добавит птички в "показать скритые обекты" и "показать системные обекты"
1.2 в свойствах UsysRibbons создаём три поля
имя поля тип поля тип даных
ID Шочик Long Integer
RibbonName Текст 255
RibbonXml Memo
Где ID это понятно
RibbonName имя рибона это тоже понятно
RibbonXml Xml код где всё непонатно