Having Trouble Lining Up Columns

[lccrews]

Please have a look at my screenshots. This is really hard for me to articulate which is probably why I'm having a hard time with the solution. I have code in access to export two crosstab queries to two sections of an excel sheet. The problem is, the information in yellow doesn't line up with the columns. So I'm looking for a way to line them up.
One piece of information that might be helpful: Range("C1","S1") contain values that correspond to Range("C35","I35").
Thank you for any advice!

[June7]

Need to format columns with right alignment. By default, text aligns left and numbers align right

[lccrews]

I'm not sure we're on the same page June. There are columns inserted into the sheet between the each of the values in Range("C1:S1"). Long after that, the second crosstab query is exported. I need to match up the second query with the first query. To do that, I think that I need to somehow search through Range("C35:I35") for the values that reside in the first row. Then, when a value is found, move that range over to the right column. I'm not sure how to do that.

[June7]

Okay, think I get it. Those are two images. The first shows incorrect alignment for the yellow highlighted data and the second is correct.

The first export shows two columns under each whatever-that-code-represents and the second export has only 1 and does not have all same headers.

Yes, I expect will involve a bunch of code. Afraid you are on your own. Can use Excel macro recorder to help get some of the code structure and syntax but adapting to run in the Access procedure won't be quick nor easy.

[lccrews]

Oy. That scares me. Would it be easier to set up 10 functions...
For example:
Set rng = wks.Range("C35:L45")
Set v = wks.Cells("C1")
With rng
If Cel.value = v then
*copy that cell and 5 cells beneath it, paste them to wks.Range("C46:C51")* - This part idk how to do.
End If
End With

Then do this again for D1, then again for E1, etc.

[June7]

You can certainly try.