如何使用VBA将Excel 2016数据导出到另一个电子表格中？

Question

I am attempting to send multiple users an Excel spreadsheet containing a form that collects data. I would like to append their input data to the bottom row of common file. Is there a way for each of these users to be able to "submit" their input data, which I've collected in the form of a table, and export to a separate spreadsheet?

Answer 1

You can use the following objects to send your collection spreadsheet to multiple users.

' Outlook variables
Dim oOlAp As Object, oOlns As Outlook.Namespace, oOlInb As Object, oOlInb1 As Object
Dim oOlItm As Object, oOlAtch As Object

' Get Outlook instance
Set oOlAp = GetObject(, "Outlook.application")
Set oOlns = oOlAp.GetNamespace("MAPI")

In that spreadsheet, use the same objects to send the answer table back to you.

Then in a "upload" spreadsheet that runs on your computer, use those same objects to extract all said tables from the answer emails.

After that you can use the normal excel interface to populate your access database.