This is killing me! Error 1004 - Application-defined or object-defined error.
I have looked up several references, none seem to work. I would like to not use Range.
Thanks!
I have looked up several references, none seem to work. I would like to not use Range.
Code:
Dim wb As Workbook
Set wb = ActiveWorkbook
Dim i As Integer
i = 1
Do While Not rs.EOF
Sheet1.Cells(i, 0).Value = (rs.Fields("JobNo"))
Sheet1.Cells(i, 1).Value = (rs.Fields("ShipTo"))
Sheet1.Cells(i, 2).Value = (rs.Fields("Product"))
Sheet1.Cells(i, 3).Value = (rs.Fields("Detail"))
Sheet1.Cells(i, 4).Value = (rs.Fields("Feet"))
rs.MoveNext
i = i + 1
Loop