2015-06-17 4 views
0

Существует стандартная форма компании, которая в настоящее время используется в формате Word (может использовать другую технологию) с полями.Извлечение данных из Excel в базу данных Access

Как извлечь данные из моей базы данных доступа из этих полей ?.

Я также открыт для советов, какая технология будет соответствовать моим требованиям, лучше с требованиями бытия:

  1. Потребность документ для отправки клиентам и добавить заполненную информацию в базу данных
  2. Уметь извлекать информацию из базы данных и представить ее в форме
+0

Какой прогресс вы достигли в своих усилиях/исследованиях до этого момента? – Newd

ответ

0

Перевести эту форму в Excel. Используйте «Сбор данных» на вкладке «Внешние данные» на ленте для сбора данных от клиентов. Чтобы извлечь данные из вашей таблицы из Access, сделайте что-то вроде этого. Используйте электронную таблицу Excel для формы. Затем нажмите кнопку со следующим событием:

'"cmdbtn1" is the name you assign your command button. 
Private Sub cmdbtn1_Click() 
Dim appExcel As Excel.Application 
Dim wbook As Excel.Workbook 
Dim wsheet As Excel.Worksheet 

Set appExcel = New Excel.Application 
appExcel.Visible = True 
Set wbook = appExcel.Workbooks.Open("C:\PathToYourDocument\YourSpreadsheet.xlsx") 

'"YourSpreadsheet" is the name of the actual sheet in your workbook. 

Set wsheet = wbook.Worksheets("YourSpreadsheet") 

With wsheet 

'The numbers next to ".Cells(" correspond to locations on your spreadsheet. A1=(1, 1), B1=(1,2), A2=(2, 1) 

    .Cells(10, 1).Value = txtThing1 
    .Cells(10, 2).Value = txtThing2 

'This is how you combine multiple cell in excel into one Access field. 

    .Cells(10, 3).Value = txtThing3 + " " + txtThing4 + " " + txtThing5 + " " + Thing5 

End With 
End Sub 
+0

Большое вам спасибо, я попробую это и посмотрю. –

Смежные вопросы