What are you trying to do? Are you trying to populate at table that you
create on the fly or are you trying to create multiple tables on the fly? It
is hard to tell from what you have here.

"JJ" wrote:

Does anyone know how to turn this into a Loop? I don't want to hardcode my
table field names. Thank you in advance!

Field1 = ActiveWorkbook.Worksheets("mysheet1").Range("C1"). Value
Field2 = ActiveWorkbook.Worksheets("mysheet2").Range("D1"). Value
Field3 = ActiveWorkbook.Worksheets("mysheet3").Range("E1"). Value

cnn.Execute _
"CREATE TABLE tblOutput(" & _
Field1 & " VARCHAR(1) NOT NULL," & _
Field2 & " VARCHAR(20) NOT NULL," & _
Field3 & " VARCHAR(20) NOT NULL)"