Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell Format Function "NumberFormatLocal" in VBA
Hi,
I have a written a simple macro to convert local time to UTC. The conversion has no problem but the CellNumberFormat to does not get change to "m/d/yyyy h:mm". It remains "General". Here is the code of the function. Can someone please help me in sorting out this issue. This macro would be used both in Office 2003 and 2007. Application.Volatile ActiveCell.NumberFormatLocal = "m/d/yyyy h:mm" od = dt Set oShell = CreateObject("WScript.Shell") atb = "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Contr ol\TimeZoneInformation\ActiveTimeBias" offsetMin = oShell.RegRead(atb) nd = DateAdd("n", offsetMin, od) LU = nd |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Cell Format Function "NumberFormatLocal" in VBA
i changed the format to just the date and ran your code and it changed the
formatting. did you try ActiveCell.NumberFormat = "m/d/yyyy h:mm"? not sure why your's isn't changing. are you on the same sheet? -- Gary Keramidas Excel 2003 "ppt_puppet" wrote in message ... Hi, I have a written a simple macro to convert local time to UTC. The conversion has no problem but the CellNumberFormat to does not get change to "m/d/yyyy h:mm". It remains "General". Here is the code of the function. Can someone please help me in sorting out this issue. This macro would be used both in Office 2003 and 2007. Application.Volatile ActiveCell.NumberFormatLocal = "m/d/yyyy h:mm" od = dt Set oShell = CreateObject("WScript.Shell") atb = "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Contr ol\TimeZoneInformation\ActiveTimeBias" offsetMin = oShell.RegRead(atb) nd = DateAdd("n", offsetMin, od) LU = nd |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Format a cell such that "#NAME?" reads/appears "N/A"? | Excel Discussion (Misc queries) | |||
Excel - Golf - how to display "-2" as "2 Under" or "4"as "+4" or "4 Over" in a calculation cell | Excel Discussion (Misc queries) | |||
Format cell to display "Y" or "N"when entering a 1 or zero | Excel Discussion (Misc queries) | |||
Please add a "sheet" function like "row" and "column" functions | Excel Programming | |||
CELL("Format") function and Locale | Excel Programming |