Релиб / Программирование / Delphi / Создание таблиц в Word через OLE / Latest PostsInstantForum.NET v4.1.4Релибhttp://www.relib.com/forums/robot@relib.comSun, 23 Nov 2008 01:03:47 GMT20Создание таблиц в Word через OLEhttp://www.relib.com/forums/Topic895826-8-1.aspxПодскажите, как создать документ Word с таблицей В ветке ActiveDocument Есть dtnrf Table, но методы для неё угадать не могу.Dim xlApp As ObjectSet xlApp = CreateObject("word.Application")xlApp.Visible = TruexlApp.Documents.Open "D:\" & "Шаблон.rtf"xlApp.ActiveDocument.Paragraphs.Addnum = xlApp.ActiveDocument.Paragraphs.CountWith xlApp.ActiveDocument.Paragraphs(num).Range.Text = "Привет, мир!"'Здесь необходимо создать таблицуEnd WithxlApp.ActiveDocument.SaveAs "D:\" & "Результат.rtf"xlApp.QuitSet xlApp = Nothing Tue, 25 Apr 2006 10:20:00 GMTAvnAvn