DONE IT!!!

WAS EASIER THAN I EXPECTED!!

Sub dailymacro()
'
' dailymacro Macro
' This is the main macro. Does several tasks, copys days booking,
renames sheet to that days date, delete days booking ready for next day
and recolours tab to make it easier for navigation.
'

'
Sheets("TODAYS BOOKING").Select
Sheets("TODAYS BOOKING").copy Befo=Sheets(2)
Sheets("TODAYS BOOKING (2)").Select
Sheets("TODAYS BOOKING (2)").Move After:=Sheets(4)
Sheets("TODAYS BOOKING (2)").Select
ActiveWorkbook.Sheets("TODAYS BOOKING (2)").Tab.ColorIndex = 3
Range("J8").Select
Selection.copy
ActiveSheet.Name = Range("J8") 'activesheet.range("J8").value _
& " production worksheet"


thanks for all your help, sorry if i wasted ya time, I'm still trying
to learn how excel/VB works proper as only 16 lol


--
lild
------------------------------------------------------------------------
lild's Profile: http://www.excelforum.com/member.php...o&userid=29352
View this thread: http://www.excelforum.com/showthread...hreadid=490596