Help me!!!!!!!!!!

[Predator]

помогите
как в net теперь писать следушие строки

Sheets("Лист1").Select
Cells(1, 6).Select

и иже с ними похожие

то есть как теперь писать строки сылок на excel ячейки

зарание благодарен

[Грандж]

если мне память не изменяет, то точно так же.
надо присоединить офисовскую библиотеку типа сначала %)

[Predator]

я все присоединил но выбор листа по старому варианту кода не работает вот по ентому и спрашиваю

[corgi]

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

        Dim xl As New Excel.Application()
        Dim book As Excel.Workbook
        book = xl.Workbooks.Open("C:\a.xls")
        MsgBox(book.Sheets(1).cells(1, 1).value)
        book.Sheets(1).select()
        book.Sheets(1).cells(1, 1).select()


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

[Юджин]

а если выдает : File I/O with type '__ComObject' is not valid.
что делать?
строка следующая:
PrintLine(1, str11, xlBook.Sheets(1).Cells(i, 15), str13, Chr(9))

[Viper]

одинокая строка информации практически не добавила. Больше кода давай. Глядеть бум!

[Юджин]

дальше - больше. пробую запустить файл таким образом

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

        Dim ac As Access.Application
        ac = CreateObject("C:\Program Files\Maney 1.3\CB_Valuta.mdb", "")
        ac.DoCmd.RunMacro("Макрос1")
        ac.Quit()

но выдает ошибку, мол не может ActivX сделать базу. как быть?