Need help with auto filling a rota system

pgordonuk · Jul 13th 2004

Could anyone explain how I can populate the master sheet with the correct data from one of the sheets labelled Monday through Sunday.

In other words if the current day is Monday - I would require Mondays data to appear in the master sheet.

Pulling my hair out a the mo. To find a simple but working solution.

Jong · Jul 13th 2004

Here's how you could do it:

Code

Sub UpdateMasterSheet()


Dim CurrentDay as String


CurrentDay = WeekdayName(Weekday(Date))


Worksheets(CurrentDay).Activate
Cells.Select
Selection.Copy


Worksheets("Master").Activate
Cells.Select
Selection.Paste


End Sub

Display More

Need help with auto filling a rota system

Participate now!

Share

Users Viewing This Thread