Тема: Экспорт в Эксель Справочники - Таблицы - Торговое нормирование
Как выгрузить в эксель всю базу с привязками???
если открываю просто таблицу значений и делаю такое :
Sub FormMacro_ExcelReport(TCSActiveModule) 'Excel report Set xlApp = CreateObject("Excel.Application") xlApp.Visible = True Set xlBook = xlApp.Workbooks.Add Set xlSheet = xlBook.Worksheets(1) Dim Row Row = 1 While Not TCSActiveModule.Eof xlSheet.Cells(Row, 1).Value = TCSActiveModule.Properties(2).DisplayText xlSheet.Cells(Row, 2).Value = TCSActiveModule.Properties(3).DisplayText xlSheet.Cells(Row, 3).Value = TCSActiveModule.Properties(7).DisplayText xlSheet.Cells(Row, 4).Value = TCSActiveModule.Properties(10).DisplayText Row = Row + 1 TCSActiveModule.Next Wend :End Sub
почемуто ругаеться на отсутствие Properties у текущего активного модуля о_О