
Enter the below code in "ThisWorkbook"
Option Explicit
Private Sub Workbook_Open()
Flag = True
RunWhen = Now + TimeSerial(0, 0, 1)
Application.OnTime RunWhen, "UpdateClock"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Flag = False
Call StopClock
End Sub
Enter the below code in "Module 1"
Option Explicit
Public Flag As Boolean
Public RunWhen As Double
Sub UpdateClock()
If Flag = True Then
' *** Change Sheet name and Range reference to suit ***
Worksheets("Sheet1").Range("A1").Calculate
RunWhen = RunWhen + TimeSerial(0, 0, 1)
Application.OnTime RunWhen, "UpdateClock"
End If
End Sub
Sub StopClock()
Application.OnTime EarliestTime:=RunWhen, Procedure:="UpdateClock", Schedule:=False
End Sub
Source: http://www.mrexcel.com/forum/showthread.php?t=31483&page=2
Monday, January 25, 2010
Update time automatically in Excel
Posted by Schwerin Moses at 9:42 AM 0 comments
Sunday, December 13, 2009
Interior / Home Designs
Posted by Schwerin Moses at 7:15 AM 1 comments
Thursday, October 22, 2009
Install OS from USB

Install Windows Vista / Windows 7 from USB
● Method 1: http://www.intowindows.com/how-to-install-windows-7vista-from-usb-drive-detailed-100-working-guide/
● Method 2: Use WinToFlash
Can also format the USB drive using the following method (link)
Install Windows XP from USB
● Use WinToFlash
Install Mac (10.4) from USB
Install Ubuntu/Linux from USB
● Can be done using unetbootin.
Posted by Schwerin Moses at 4:57 PM 0 comments
Wednesday, September 30, 2009
Free and open source softwares

Audio Converters
Switch
Burning Softwares
InfraRecorder
ISORecorder page (with general instructions on use):
CDBurnerXP Pro
DeepBurner Free
ImgBurn (burn ISO images)
Final Burner Free
BWGBurn
BurnAware FREE Edition
Radio Rippers
Radio Ripper
Partition Editors
Easeus Partition Master Home Edition
Posted by Schwerin Moses at 1:12 AM 0 comments
Labels: Free, Open Source, Windows



