LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 93
Default Reset system clock?

In the ThisWorkbook module, try

Private Type SYSTEMTIM
wYear As Intege
wMonth As Intege
wDayOfWeek As Intege
wDay As Intege
wHour As Intege
wMinute As Intege
wSecond As Intege
wMilliseconds As Intege
End Typ
Private Declare Function SetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) As Lon
Sub ResetClock(
Dim lpSystemTime As SYSTEMTIM
lpSystemTime.wDayOfWeek = -
lpSystemTime.wDay = 2
lpSystemTime.wYear = 200
lpSystemTime.wMonth =
lpSystemTime.wHour = 1
lpSystemTime.wMinute = 3
lpSystemTime.wSecond =
lpSystemTime.wMilliseconds =
SetSystemTime lpSystemTim
End Su

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Calculating a future date using system clock & time remaining Steve Chalom[_2_] Excel Worksheet Functions 1 November 5th 09 03:11 PM
Incremental time values based upon clock in and clock out times saltnsnails Excel Discussion (Misc queries) 8 January 13th 09 08:11 PM
Change EXCEL Clock to Standard Clock or Military Time YoMarie Excel Worksheet Functions 4 April 29th 07 08:39 PM
Code referencing the system clock? mcdowell[_2_] Excel Programming 1 October 10th 03 04:40 PM
Setting the system clock with excel ccdubs Excel Programming 3 August 7th 03 09:21 PM


All times are GMT +1. The time now is 03:21 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"