Reversing order of headings (offset?)

[TrimFunction]

[TABLE="width: 500"]
<tbody>[TR]
[TD]F18Q1[/TD]
[TD]F18Q2[/TD]
[TD]F18Q3[/TD]
[TD]F18Q4[/TD]
[TD]F19Q1[/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]

i created a report that has sales data displayed like this.

After a year, I realize it's not user friendly to scroll all the way to the right to see the most current data.

Is there a quick formula to transpose these in reverse, so that column A would have the most current data, while historical data is in Column B:Z?

Do i need to use an offset?

 

[mikerickson]

Try something like

Dim arrRawData as Variant, arrSwapData as Variant
Dim i as Long, J as long

arrRawData = Range("A1").CurrentRegion.Value
arrSwapData = arrRawData

For i = 1 to UBound(arrRawData, 1)
    For j = 1 to UBound(arrRawData, 2)
        arrSwapData(i, j) = arrRawData(i, Ubound(arrRawData, 2) + 1 -j)
    Next j
Next i

Range("A1").CurrentRegion.Value = arrSwapData

 

[JoeMo]

Assuming your FYYQ# headings are in row 1:
Select all the headers and data.
Data>Sort & Filter>Sort.
In the dialog box select Options Sort Left to Right.
Sort on Row 1 Z to A.

 

[TrimFunction]

Thanks @JoeMo, that worked!

 

[JoeMo]

Thanks @JoeMo, that worked!

You are welcome - thanks for the reply.