Show / Hide columns

I have recorded 2 macros on my worksheet one to show my values in dollars and one to show it in pounds. I have these values in separate columns and thought I could just hide the pound column when I click on the dollar button (with macro attached) and vice versa. The problem is that it seems to hide all columns and not just the ones I selected while recording.

	


















	
Sub Pound_Expenditure()
'
' Pound_Expenditure Macro
'

'
    Columns("A:H").Select
    Selection.EntireColumn.Hidden = False
    Columns("D:D").Select
    Selection.EntireColumn.Hidden = True
    Columns("H:H").Select
    Selection.EntireColumn.Hidden = True
    Range("J9").Select
End Sub


 

This is the macro code, any help would be great.

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)