Create a New Recordset in VBA

Here is the sample code on how to create a new recordset.

Sub Create_recordset()
Dim rst As New ADODB.Recordset

‘Add columns
rst.Fields.Append “Field1”, adVarchar, 50
rst.Fields.Append “Field2”, adVarchar, 50
…

‘Create recordset
rst.Open()

‘Add rows into recordset
rst.AddNew Array("field1", "field2"), Array("string1", “val1”)
rst.AddNew Array("field1", "field2"), Array("string2", “val2”)

End Sub

Happy programming!