Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6. Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты. Читайте требования к создаваемым темам.
Dim iWord As Word.Application Set iWord = New Word.Application
With iWord .Documents.Open (FILE_PATH) .Visible = True End With
Я чето нахимичил Просто из проекта своего выдрал
Последний раз редактировалось FaKk2 27.03.2004 (Сб) 17:40, всего редактировалось 1 раз.
Для получения ответа надо продемонстрировать качества, позволяющие стать компетентным — внимательность, вдумчивость, наблюдательность, желание активно участвовать в выработке решения.
Dim xlApp As Excel.Application
Dim xlWB As Excel.Workbook
Dim xls As Excel.Worksheet
Set xlApp = New Excel.Application
Set xlWB = xlApp.Workbooks.Open("C:\Надо уметь пользоваться поиском.TXT")
Set xls = xlWB.Sheets("Лист1")
xlApp.Visible = True
End If
В References, Microsoft Word 10.0 Object Library подключил?
Для получения ответа надо продемонстрировать качества, позволяющие стать компетентным — внимательность, вдумчивость, наблюдательность, желание активно участвовать в выработке решения.