Convert time to military time?
How can I convert the current time into military time?
I'd like to show the results in a message box kind of like: MsgBox "The military time is: " & strMilitaryTime The variable strMilitaryTime is a string variable which is where I want to store the current military time. Oh ya, I want the military time format to be: "hh:mm:ss", so 3:42:11 PM should convert to 15:42:11, etc... Thank you! Robert Crandal. |
Convert time to military time?
You didn't say where the 3:42:11 PM time came from. I'll take a guess at a
TextBox so I think you would be looking for this... If IsDate(TextBox1.Value) Then strMilitaryTime = Format(TextBox1.Value, "hh:mm:ss") MsgBox "The military time is: " & strMilitaryTime End If Rick Rothstein (MVP - Excel) "Robert Crandal" wrote in message ... How can I convert the current time into military time? I'd like to show the results in a message box kind of like: MsgBox "The military time is: " & strMilitaryTime The variable strMilitaryTime is a string variable which is where I want to store the current military time. Oh ya, I want the military time format to be: "hh:mm:ss", so 3:42:11 PM should convert to 15:42:11, etc... Thank you! Robert Crandal. |
Convert time to military time?
Actually, maybe I should fill out that If..Then block...
If IsDate(TextBox1.Value) Then strMilitaryTime = Format(TextBox1.Value, "hh:mm:ss") MsgBox "The military time is: " & strMilitaryTime Else MsgBox "That is not a correct time value!" End If Rick Rothstein (MVP - Excel) "Rick Rothstein" wrote in message ... You didn't say where the 3:42:11 PM time came from. I'll take a guess at a TextBox so I think you would be looking for this... If IsDate(TextBox1.Value) Then strMilitaryTime = Format(TextBox1.Value, "hh:mm:ss") MsgBox "The military time is: " & strMilitaryTime End If Rick Rothstein (MVP - Excel) "Robert Crandal" wrote in message ... How can I convert the current time into military time? I'd like to show the results in a message box kind of like: MsgBox "The military time is: " & strMilitaryTime The variable strMilitaryTime is a string variable which is where I want to store the current military time. Oh ya, I want the military time format to be: "hh:mm:ss", so 3:42:11 PM should convert to 15:42:11, etc... Thank you! Robert Crandal. |
Convert time to military time?
Thank you Rick, your code was sufficient enough for
my needs. It was simpler than I expected, because I saw other examples online that involved modulus arithmetic. And BTW, I was actually getting the current time from the "Time" variable (I think). Thanks again. ----- Original Message ----- From: "Rick Rothstein" Newsgroups: microsoft.public.excel.programming Sent: Monday, April 11, 2011 1:18 AM Subject: Convert time to military time? Actually, maybe I should fill out that If..Then block... If IsDate(TextBox1.Value) Then strMilitaryTime = Format(TextBox1.Value, "hh:mm:ss") MsgBox "The military time is: " & strMilitaryTime Else MsgBox "That is not a correct time value!" End If Rick Rothstein (MVP - Excel) |
All times are GMT +1. The time now is 05:03 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com