Excel &Access

Olya A

Дата: 05.09.2005 10:14:15

Добрый день!
У меня такой вопрос:
можно при нажатии на определённую ячейку в excele передавать её данные в поле формы в аксессе? Если да, то как?

Дата: 05.09.2005 10:22:20

Насчет клика в ячейке не знаю, в 97-м Экселе это событие на листе не обрабатывается, зато обрабатывается событие смены выделенной ячейки, можно его использовать, а в более новых версиях может и клик есть...
Сама передача данных - через лист Экселя как внешнюю таблицу Аксесса, через ДАО (ODBC), через АДО - на выбор :)

Пользователь2

Дата: 05.09.2005 10:40:18

Private WithEvents xlApp As Excel.Application
Private WithEvents xlWb As Excel.Workbook
Private WithEvents xlWs As Excel.Worksheet

Private Sub cmd1_Click()
    Set xlApp = New Excel.Application
        
    Set xlWb = xlApp.Workbooks.Open("d:\temp\Book1.xls")
    Set xlWs = xlWb.Worksheets("Лист1")
    
    xlApp.Visible = True
End Sub

Private Sub xlWs_Change(ByVal Target As Excel.Range)

' Или воспользуйся событием.
'Private Sub xlWs_SelectionChange(ByVal Target As Excel.Range)

    Me.TextBox1.Value = Target.Value
End Sub