Inserting a Column in Excel Via Access Module

[13mescj]

I have made an access module to export queries to excel. I cannot figure out the correct sql to simply insert a column. This is what I have tried, if anyone could help I would appreciate it.



Columns("D:D").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

 

[Joe4]

Why not just insert a calculated field in your Access query that just returns a blank value?
Then when you export that query, the blank column will already be there.

 

[Micron]

I presume you have already referenced the workbook and sheet in code, so
Range("D1").EntireColumn.Insert ?