Time entry
Time entry
Thanks Thanks:  0
Likes Likes:  0
Results 1 to 2 of 2

Thread: Time entry

  1. #1
    Board Regular
    Join Date
    Mar 2002
    Location
    Houston, TX
    Posts
    154
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

     
    I am currently coordinating a time study to measure productivity. Employees must enter different times into a simple spreadsheet each day and then email their spreadsheet to me.

    The complaint has been that they don't like entering the ":" in the time.

    How do I format the cell to act like an input mask... all they would have to do is enter the numbers. The field would automatically format.

    Example:

    They enter: 1104
    The cell shows: 11:04 AM

    Thanks for any help you can offer!
    Scott Burk

  2. #2
    Rest in Peace
    Join Date
    Feb 2002
    Posts
    1,582
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

      
    Hi Scott

    Right click on the sheet name tab. select "view Code" and paste in this


    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:A1000")) Is Nothing Then
    If IsNumeric(Target) Then
    Application.EnableEvents = False
    Target = Left(Target, 2) & ":" & Right(Target, 2)
    Application.EnableEvents = True
    End If
    End If
    End Sub


    This restricts the automatic time conversion to A1:A1000

User Tag List

Like this thread? Share it with others

Like this thread? Share it with others

Posting Permissions

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

 

 
DMCA.com