Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Excel 2003
I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#2
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Preformat the column as time and try this.
Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#3
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]() PERFECT!! Thank you so much, Don!! CaroleO "Don Guillett" wrote: Preformat the column as time and try this. Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#5
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Hi Don
I am trying to do this same thing in windows Vista and when I do what you directed it does not work. If I enter 1300 in the cell it displays as 0000 and the formula lines shows "7/23/1903 12:00:00 AM" any thoughts? "Don Guillett" wrote: Glad to help -- Don Guillett SalesAid Software "Carole O" wrote in message ... PERFECT!! Thank you so much, Don!! CaroleO "Don Guillett" wrote: Preformat the column as time and try this. Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#6
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Did you place Don's code in the sheet module as directed?
Right click sheet tabview codeinsert this Are you entering 1300 in a cell in column E? Any other column will not trigger the event. If Target.Column < 5 Then Exit Sub Gord Dibben MS Excel MVP On Mon, 28 Sep 2009 15:01:02 -0700, JB Bates wrote: Hi Don I am trying to do this same thing in windows Vista and when I do what you directed it does not work. If I enter 1300 in the cell it displays as 0000 and the formula lines shows "7/23/1903 12:00:00 AM" any thoughts? "Don Guillett" wrote: Glad to help -- Don Guillett SalesAid Software "Carole O" wrote in message ... PERFECT!! Thank you so much, Don!! CaroleO "Don Guillett" wrote: Preformat the column as time and try this. Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#7
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Yes I did. and i even tried opening a new sheet with nothing in it and going
through all these steps. still get the dame results "Gord Dibben" wrote: Did you place Don's code in the sheet module as directed? Right click sheet tabview codeinsert this Are you entering 1300 in a cell in column E? Any other column will not trigger the event. If Target.Column < 5 Then Exit Sub Gord Dibben MS Excel MVP On Mon, 28 Sep 2009 15:01:02 -0700, JB Bates wrote: Hi Don I am trying to do this same thing in windows Vista and when I do what you directed it does not work. If I enter 1300 in the cell it displays as 0000 and the formula lines shows "7/23/1903 12:00:00 AM" any thoughts? "Don Guillett" wrote: Glad to help -- Don Guillett SalesAid Software "Carole O" wrote in message ... PERFECT!! Thank you so much, Don!! CaroleO "Don Guillett" wrote: Preformat the column as time and try this. Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#8
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
You mention Windows Vista.
That is an operating system, which has nothing to do with Excel. What version of Excel or Office? I will assume 2007. Did you save the workbook as a macro-enabled workbook(*.xlsm)? Have you enabled macros when the workbook opens? Gord On Mon, 28 Sep 2009 16:43:01 -0700, JB Bates wrote: Yes I did. and i even tried opening a new sheet with nothing in it and going through all these steps. still get the dame results "Gord Dibben" wrote: Did you place Don's code in the sheet module as directed? Right click sheet tabview codeinsert this Are you entering 1300 in a cell in column E? Any other column will not trigger the event. If Target.Column < 5 Then Exit Sub Gord Dibben MS Excel MVP On Mon, 28 Sep 2009 15:01:02 -0700, JB Bates wrote: Hi Don I am trying to do this same thing in windows Vista and when I do what you directed it does not work. If I enter 1300 in the cell it displays as 0000 and the formula lines shows "7/23/1903 12:00:00 AM" any thoughts? "Don Guillett" wrote: Glad to help -- Don Guillett SalesAid Software "Carole O" wrote in message ... PERFECT!! Thank you so much, Don!! CaroleO "Don Guillett" wrote: Preformat the column as time and try this. Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#9
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
I thought being VISTA might be an important fact, sorry
Yes Excel 2007 Yes saved as XLSM Yes Macros enabled. Still does not work. Is there another way to have it read with other than the code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub "Gord Dibben" wrote: You mention Windows Vista. That is an operating system, which has nothing to do with Excel. What version of Excel or Office? I will assume 2007. Did you save the workbook as a macro-enabled workbook(*.xlsm)? Have you enabled macros when the workbook opens? Gord On Mon, 28 Sep 2009 16:43:01 -0700, JB Bates wrote: Yes I did. and i even tried opening a new sheet with nothing in it and going through all these steps. still get the dame results "Gord Dibben" wrote: Did you place Don's code in the sheet module as directed? Right click sheet tabview codeinsert this Are you entering 1300 in a cell in column E? Any other column will not trigger the event. If Target.Column < 5 Then Exit Sub Gord Dibben MS Excel MVP On Mon, 28 Sep 2009 15:01:02 -0700, JB Bates wrote: Hi Don I am trying to do this same thing in windows Vista and when I do what you directed it does not work. If I enter 1300 in the cell it displays as 0000 and the formula lines shows "7/23/1903 12:00:00 AM" any thoughts? "Don Guillett" wrote: Glad to help -- Don Guillett SalesAid Software "Carole O" wrote in message ... PERFECT!! Thank you so much, Don!! CaroleO "Don Guillett" wrote: Preformat the column as time and try this. Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
#10
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Works for me.
I see you started another thread elsewhere and received some satisfactory replies. Gord On Mon, 5 Oct 2009 11:39:01 -0700, JB Bates wrote: I thought being VISTA might be an important fact, sorry Yes Excel 2007 Yes saved as XLSM Yes Macros enabled. Still does not work. Is there another way to have it read with other than the code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub "Gord Dibben" wrote: You mention Windows Vista. That is an operating system, which has nothing to do with Excel. What version of Excel or Office? I will assume 2007. Did you save the workbook as a macro-enabled workbook(*.xlsm)? Have you enabled macros when the workbook opens? Gord On Mon, 28 Sep 2009 16:43:01 -0700, JB Bates wrote: Yes I did. and i even tried opening a new sheet with nothing in it and going through all these steps. still get the dame results "Gord Dibben" wrote: Did you place Don's code in the sheet module as directed? Right click sheet tabview codeinsert this Are you entering 1300 in a cell in column E? Any other column will not trigger the event. If Target.Column < 5 Then Exit Sub Gord Dibben MS Excel MVP On Mon, 28 Sep 2009 15:01:02 -0700, JB Bates wrote: Hi Don I am trying to do this same thing in windows Vista and when I do what you directed it does not work. If I enter 1300 in the cell it displays as 0000 and the formula lines shows "7/23/1903 12:00:00 AM" any thoughts? "Don Guillett" wrote: Glad to help -- Don Guillett SalesAid Software "Carole O" wrote in message ... PERFECT!! Thank you so much, Don!! CaroleO "Don Guillett" wrote: Preformat the column as time and try this. Right click sheet tabview codeinsert this Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column < 5 Then Exit Sub Application.EnableEvents = False Target = Left(Target, 2) & ":" & Right(Target, 2) Application.EnableEvents = True End Sub -- Don Guillett SalesAid Software "Carole O" wrote in message ... Excel 2003 I have a co-worker who enters time on a spreadsheet. She would like to have the time cells fomatted so when she enters 1456 it appears in the cell as 14:56. This doesn't work when I format, cell, time, 13:30. I've looked at format, cell, special (which would be a logical place to put something like this), to no avail. TIA CaroleO |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
entering dates | Excel Discussion (Misc queries) | |||
entering numbers | Excel Discussion (Misc queries) | |||
entering numbers | Excel Discussion (Misc queries) | |||
102. not entering the same as 102.00 | Excel Discussion (Misc queries) | |||
entering data using tab | Excel Discussion (Misc queries) |