Paul,
You could hide/unhide columns:

Sub HideselectedCol(byval Day as string)
For i = 1 To 256
If Cells(1, i) < Day Then Columns(i).Hidden = True
Next i
End Sub

Sub mytest
HideSelectedCol "MO"
end

Sub UnHideselectedCol()
For i = 1 To 256
If Columns(i).Hidden = True Then Columns(i).Hidden = False
Next i
End Sub

"Paul" wrote:

Hi,

Newbie question: I have a row with mutliple sequences of weekdays (MO TU
WE TH FR SA SU MO TU WE TH FR SA SU MO TU WE TH FR SA SU...) all containing
different values.

What is the easiest way to show only a specified day...for example Wednesdays?

Many thanks.

Paul