使用VBA将记录添加到表中

Question

我每个月都会发送一份通讯，并希望将联系人ID和发送的日期记录在单独的表格中。该表将记录所有已发送新闻通讯的历史记录。做到这一点的最佳方法是什么...追加到表中还是仅创建一个do循环并添加新记录？

Answer 1

这应该很容易。现在，您没有说要在Access，SQL Server或其他内容中添加记录。下面的示例假定您正在使用Access，但是您可以轻松地修改代码，只需将其插入任何类型的结构化数据库中即可。

Dim dbs As DAO.Database
Set dbs = OpenDatabase("Full path to your db")

'You can then "execute" a SQL statement:

dbs.Execute "INSERT INTO Employees(Name, Number) VALUES('" & Worksheets("Sheet1").Range("A2").Value & "','" & Worksheets("Sheet1").Range("A3") & "')"