Вопрос по VB+excel

[d3drm]

собственно несколько вопросов...

Заранее извиняюсь, что не залез в поиск, в данный момент не работает интернет на настольном ПК, просматриваю форум через сотовый телефон, очень неудобно. Поэтому постараюсь быть кратким и задавать точные вопросы.

1. какой компонент следует подключить к проекту, чтобы иметь доступ к данным листа?
2. какой свойство или событие компонента предоставит мне данные о ячейке листа?

Еще раз извиняюсь за нубские вопросы, спасибо.

[Amed]

В References подключи Microsoft Office 11 Object Library

Код: Выделить всё

Dim objExcel As New Excel.Application
Dim objWorkbook As Excel.Workbook
Dim objWorksheet As Excel.Worksheet

Set objWorkbook = objExcel.Workbooks.Open("C:\123.xls")
Set objWorksheet = objWorkbook.Sheets(1)

'A1
MsgBox objWorksheet.Cells(1, 1)
'A2
MsgBox objWorksheet.Cells(1, 2)
'B1
MsgBox objWorksheet.Cells(2, 1)
'B2
MsgBox objWorksheet.Cells(2, 2)

[d3drm]

Сашко, спасибо.

не смог разобраться, как узнать колво столбцов и строк, подскажи плз

[Amed]

Столбцы с A по IV.
Строк 65536.

[GSerg]

"d3drm смишной" (c) d3drm

sheet.rows.count
sheet.columns.count

[d3drm]

O_o

да, я тОкой =)

всем спОсибо!

[Amed]

И еще, чтобы никто не "забыл". Надо сделать

Код: Выделить всё

objExcel.Quit
Set objWorksheet = Nothing
Set objWorkbook = Nothing
Set objExcel = Nothing

После того, как Excel стал ненужен. Иначе все останется висеть в памяти (проверьте Task Manager'ом, сколько это все занимает).