Dim xlApp As Object 'Excel.Application
If Dir("C:\Archive\Sales.xls") <> "" Then
Set xlApp = CreateObject("Excel.Application")
With xlApp
.Visible = True ' ?
.Workbooks.Open FileName:="C:\Archive\Sales.xls"
MsgBox "Выделенный диапазон : " & .Selection.Address, , ""
.Quit
End With
Set xlApp = Nothing
Else
MsgBox "Указанная рабочая книга изволит отсутствовать", , ""
End If
Vb. Найти ячейку на листе
Не могу найти:
как из VB (не VBA) определить выделенный диапазон ячеек в Excel? .
В VBA определял через ActiveCell.Row
как из VB (не VBA) определить выделенный диапазон ячеек в Excel? .
В VBA определял через ActiveCell.Row
Всё равно Вы получаете доступ к об'ектной модели MS Excel, а значит xlApp.Selection (+ нужное свойство)
Цитата:
Originally posted by pashulka
Всё равно Вы получаете доступ к об'ектной модели MS Excel, а значит xlApp.Selection (+ нужное свойство)
Всё равно Вы получаете доступ к об'ектной модели MS Excel, а значит xlApp.Selection (+ нужное свойство)
хм...хм...
я вот третий день начинаю на VB :)
а как это будет выглядеть?