I have 60 residents working in our department. They attend morning report everyday. So I have prepared excel sheet( Named Attendance Table) which has column A1:A60 with names of residents B1:B60 with percentage of attendance for one month.
My job is to prepare Attendance report for each resident.
I have prepared Template for attendance report.
Now I want to run a Macro which will do following things
1. Open a new worksheet from the template in the workbook which has "Attendance Table worksheet"
2. It should bring the data from "Attendance Table" worksheet
a. From First column A1 and put in Name field of template ( new worksheet opened in stage one) ( Always D6)
b. bring data from B1 and put in Percentage field of Template (F10)
c. It should rename the worksheet tab with Data from A1 (i.e. name of the resident)
3. It should repeat the step 2 till it reaches the empty cell
' Attendance Report Subroutine to
' Open New Worksheet called attendance tqable worksheet
' With data from Attendance Table
' Residents name to D6
' Percentage of attendnace for one month to F10
' Rename sheet to residents name and start again
' For all residents in table
Sub AttendanceReport()
Dim cCell As Object, I As Integer 'Two variables cCell (current Cell) object and I (standard counting integer)
Cells(1, "A").Select 'Ensure that we start each time at the top of the worksheet
Application.ScreenUpdating = False 'Turn of screen updates whilst macro is running
For Each cCell In Range(Cells(1, "A"), Cells(1, "A").End(xlDown)) 'Will run our code through each cell with text
Set NewSheet = Sheets.Add(Type:=xlWorksheet) 'Add new worksheet
NewSheet.Name = "Attendance Table Worksheet" 'rename worksheet
Sheets("Attendance Table Worksheet").Cells(6, "D").Value = cCell.Value 'put residents name is cell D6
Sheets("Attendance Table Worksheet").Cells(10, "F").Value = cCell.Offset(0, 1).Value 'put residence attednance into F10
Sheets("Attendance table worksheet").Name = cCell.Value
Next cCell
End Sub
Jimmy your response to the person from this post seem very close to helping me with my issue. We are creating a "list" using excel. I need to create a macro to do the following:
1. Add a new sheet from an original or master( ideally by pressing a button or key combination). The sheet will be named numerically in sequence.
2. Create cell references on a "Project" page refering to the new sheet created.
example. Create sheet "51" ( or the next number in the sequence),
Copy the information in cell '51'!$B$1 to the next available cell in Column B on the "project" sheet.
Copy hte information in cell '51'!$B$3 to the next available cell in column C on the "project" sheet.
Hi Jimmy
Mate I got your code to work and create the named worksheets populate the appropriate values into them however. I have a tempalte say called worksheet1. When I run the macro it creates all of the worksheets from the referenced list in worksheet1. So I have six new worksheets all with the employee name and staff numbers in them and the worksheet named after the corresponding employees. Hw ever it does not take the template across I only have the name where it should go and staff number but not the layout of the tempalte. Can you help
Hi Pedo do you still need a copy of the spreadsheet if you put your email address here I can send it to you, but I dont subscribe anymore therefore can not see your email address. Still willing to share and help out if I can
Hi
looks like 2009 is the year of timesheets. I have a similar issue in that I haveused some of the code above to recreate the new worksheets but wondered how one goes about getting the template worksheet to populate the newly named worksheets. If you could see your way clear to send a copy of your worksheet I will try and adjust it to my circumstances. Cheers and thanks
Just gone through the 2 excel sheets - of which one worked like a charm and it just puts me on "awe" with the design you mapped. However - I tried to add a new employee following the step 2 process which says "Click on the Create Wages Pay Sheet button. If you have new employees select update team list button", which I dont see its working...Could you help in this regard...
It sounds like something is wrong with the sheet. What should happen is that it will create worksheets for employees in the hidden rows. I have set them up as a family named Adams. Unhide the rows from 37 down and add the names of your employees in place of the addams.
This hidden area also has details of work areas you may need or not.
If the create new worksheet button is not creating a sheet for each employee automatically there may be a problem with both sheets I sent. I will need to check my virus check to make sure it is not stripping macros. Let me know if you have created new worksheet tabs once you put your employe names in the hidden fields.
I have not developed macro for adding, deleting employees from hidden field reference yet.
If not I will need to recreate for you and ensure my virus program is not stripping it. Kat is your working
hi sneha I am pavan from aberdeen I m doing project on automatic attendence sheet I have no idea what to do actually im mechanical engg graduate and doing masters in cs in uk if u have any spread sheets can u pls send me so dat I can get an idea abt dat
Hi aman I need an email address to send it too. I can not attach file through here. I have never been ble to work it out. Otherwise I would just leave a copy on the site.
Hi, how are you hope you ll b fine and great , I m doing job in UAE in accounts depptt.so I want to know how can I put formula or daily or monthly employee statuse of attendance sheet....leave,sunday.etc..
James I have sent you copy of timesheet. It would be nice if you and others who I have sent the sheet to could send me a copy of the sheet you all now use. This way I can draw together the numerous various and try and combine some of the features for redistribution of an improved timesheet.
I can not attach the sheet thru the site unfortunaley. If you have an email address I can send it to please advise address an I will organise. otherwise one of the people who has obtained from me may be able to send it too you.
I can not attach the sheet thru the site unfortunaley. If you have an email address I can send it to please advise address an I will organise. otherwise one of the people who has obtained from me may be able to send it too you.
1. Add a new sheet from an original or master( ideally by pressing a button or key combination). The sheet will be named numerically in sequence.
2. Create cell references on a "Project" page refering to the new sheet created.
example. Create sheet "51" ( or the next number in the sequence),
Copy the information in cell '51'!$B$1 to the next available cell in Column B on the "project" sheet.
Copy hte information in cell '51'!$B$3 to the next available cell in column C on the "project" sheet.
and so forth until you get to column G
Mate I got your code to work and create the named worksheets populate the appropriate values into them however. I have a tempalte say called worksheet1. When I run the macro it creates all of the worksheets from the referenced list in worksheet1. So I have six new worksheets all with the employee name and staff numbers in them and the worksheet named after the corresponding employees. Hw ever it does not take the template across I only have the name where it should go and staff number but not the layout of the tempalte. Can you help