Four steps:

1. insert this User Defined Function:

Function gmt() As Date
Application.Volatile
dot = "."
Set Serve = GetObject("winmgmts:\\" & dot & "\root\cimv2")
Set Zones = Serve.ExecQuery("Select * From Win32_TimeZone")

For Each Zone In Zones
intTimeZoneBias = Zone.Bias
intDayLightBias = Zone.DaylightBias
Next

gmt = Now() - (intTimeZoneBias - intDayLightBias) / (60 * 24)

End Function

2. in cell A1, enter:

=gmt()

3. put a rectangle on your worksheet using the Drawing toolbar

4. click on the rectangle to select it and then click in the formula bar and
enter:

=A1
--
Gary''s Student - gsnu200796


"Ed" wrote:

I want to make a box which is in military time tied back to a range of cells.
Can it be done and how could it be easily done. Thanks for help
--
ED