Excel Cells to List
Excel Cells to List
(OP)
I want to take 100-200 part numbers from a range of cells and put them in a MS Access query. I need to get them in the form: IN ('PN(1)','PN(2)','PN(3)'...)
How do I write out this long array in a single cell or MS Word txt file? Better yet, how do I use VB to run the query?
Roger
How do I write out this long array in a single cell or MS Word txt file? Better yet, how do I use VB to run the query?
Roger





RE: Excel Cells to List
Sub test2()
fname = "c:\data\test.txt"
Open fname For Output As #1
For i = 1 To 10
Print #1, "'"; Cells(i, 1).Value; "',";
Next i
Close #1
End Sub
Cheers,
Joerd
Please see FAQ731-376 for tips on how to make the best use of Eng-Tips.