Hope i doing right.
Here is my code

Sub Macro1()
'
' Macro1 Macro
'

'
Cells.Select
Selection.EntireColumn.Hidden = False
ActiveSheet.ShowAllData
Range("C1:E1").Select
End Sub