Delete unwanted columns

hi,

in row 7 from column E i can have various number of dates of which
one of the dates will be todays date. the date the macro was run

i need to leave only 6 more columns after the todays date . as that is all i have to report on. therefore the others after the 6th column can be deleted then sum the 6 columns in the 7th column

there could be lots of rows

the dates before the todays date will stay

thanks

steve