LinkBack URL
About LinkBacks
try this
Sheets("sheet1").Range("E" & i) = startdate if weekday(startdate,2)<6 then Sheets("sheet1").Range("F" & i) = startdate-weekday(startdate,2)+6 else Sheets("sheet1").Range("F" & i) = startdate end if
try this
Sheets("sheet1").Range("E" & i) = startdate if weekday(startdate,2)<6 then Sheets("sheet1").Range("F" & i) = startdate-weekday(startdate,2)+6 else Sheets("sheet1").Range("F" & i) = startdate end if
Regards
Sean
Please add to my reputation if you think i helped (click on the star below the post)
Mark threads as "Solved" if you have your answer (Thread Tools->Mark thread as Solved)
Use code tags when posting your VBA code: [code] Your code here [code]
Please supply a workbook containing example Data: It makes its easier to answer your problem & saves time!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
Register To Reply
Bookmarks