Hello Guys,
I have been using the following code for some time and is working perfect.
Sub Rotation()
'
' Macro1 Macro
' Macro recorded 9/10/2009 by Ali
'
'
Columns("AM:AU").Select
Selection.EntireColumn.Hidden = False
Range("AS8:AS39").Select
Selection.ClearContents...