Member Avatar for Cogs

Hi
I'm hoping someone can steer me in the right direction please.
Attempting to export some access data from a subform into a excel file, however the first four lines of data is OK but the fifth line only sends the first row of data instead of all of the records from the subform datsheet.
eg.

Dim iTab As String
iTab = Chr(9)

Open "TestFile" For Output A #1
Print #1 "!TRNS"; iTab; "TRNSID" 'This works OK'
Print #1 "!SPL"; iTab; "SPLID" 'This works OK'
Print #1 "!ENDTRNS" 'This works OK'
Print #1 "TRNS"; iTab; "TRNS" 'This works OK'
Print #1 "SPL"; iTab; "SPLID" 'Data from subform only sends first record, but there are more records to output ??
Close #1

The fifth print line only ends the first line of data from the subfrom datasheet, but the file needs all of the records.

Any help woul be grateful

Thanks Cogs

  • 2 Contributors
  • 1 Reply
  • 89 Views
  • 22 Hours Discussion Span
  • Latest Post Latest Post by MidiMagic
Member Avatar for MidiMagic

You need a for or while loop to repeat all of the records.

But why don't you just use the export function under File.

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.