+ Reply to Thread
Results 1 to 3 of 3

Edit Holiday Tracking Template

Hybrid View

  1. #1
    Registered User
    Join Date
    04-26-2013
    Location
    London
    MS-Off Ver
    Excel 2010
    Posts
    18

    Post Edit Holiday Tracking Template

    Hi all,

    I have attached the template I am using for your consideration.

    The template works fine however it only currently shows the holiday taken for specific employee selection from a dropdown list. I require a view that will show all employees at the same time. So that we are aware of periods of time where cover will be required.

    Many Thanks in advance for all help provided,

    H
    Attached Files Attached Files

  2. #2
    Valued Forum Contributor natefarm's Avatar
    Join Date
    04-22-2010
    Location
    Wichita, Kansas
    MS-Off Ver
    2016
    Posts
    1,020

    Re: Edit Holiday Tracking Template

    This seems to work:

    On the Settings sheet, add another employee called All Employees.

    On Employee Leave Tracker, right-click Back to Calendar View, select Format Shape, select Properties, and change Object Positioning to "Don't move or size with cells".

    Select column H, and in the name box, give it the name SaveEmployees.

    Press F11 to open the VBA window, and in the Project Explorer, double-click Sheet3 (Calendar View) to open the code window for that sheet. Into there, copy and paste the following code:

    Private Sub Worksheet_Change(ByVal Target As Range)
    Const AllEmps = "All Employees", SaveEmps = "SaveEmployees"
    
        If Target.Name = "='Calendar View'!$AN$3" Then
            With Sheets("Employee Leave Tracker")
                If Target.Value = AllEmps Then
                    .Columns("B:B").Copy Destination:=.Range(SaveEmps)
                    .Range("B4", "B" & .Range("B" & .Rows.Count).End(xlUp).Row).Value = AllEmps
                Else
                    If .Range(SaveEmps).Range("A4").Value <> "" Then
                        .Range(SaveEmps).Copy Destination:=.Columns("B:B")
                        .Range(SaveEmps).ClearContents
                    End If
                End If
            End With
        End If
    End Sub
    Save your workbook. Then, on Calendar View, select All Employees to see the results.
    Acts 4:12
    Salvation is found in no one else, for there is no other name under heaven given to mankind by which we must be saved.

  3. #3
    Registered User
    Join Date
    04-26-2013
    Location
    London
    MS-Off Ver
    Excel 2010
    Posts
    18

    Re: Edit Holiday Tracking Template

    Thanks NateFarm,

    Worked like a charm, I appreciate all your help and time,

    Many Thanks,

    H

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Replies: 5
    Last Post: 04-23-2009, 02:08 PM
  2. Tracking Edit changes
    By Rusty_W in forum Excel Formulas & Functions
    Replies: 1
    Last Post: 05-15-2008, 12:11 PM
  3. Does anyone have a holiday chart template?
    By els in forum Excel Charting & Pivots
    Replies: 0
    Last Post: 07-24-2006, 11:00 AM
  4. template with data tracking
    By Dee Goodrich in forum Excel General
    Replies: 0
    Last Post: 01-11-2006, 03:35 PM
  5. [SOLVED] a template for a holiday card list?
    By impeck in forum Excel - New Users/Basics
    Replies: 2
    Last Post: 02-28-2005, 02:07 AM

Tags for this Thread

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1