Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Text and Today() function in VBA
Here is a piece of my code. It will not compile.
I want SDate to be a text string in the format of "8/10/06 00:00:00 AM" and EDate "8/10/06 11:59:59 PM". I preffered if this values were yesterday's dates, but they have to change daily. Any suggestions? Thanks. My Code: Dim SDate As String Dim EDate As String Set SDate = "TEXT(Month(TODAY())&" / "&DAY(TODAY())&" / "&Year(today()) & ""00:00:00 AM""" Set SDate = "TEXT(Month(TODAY())&" / "&DAY(TODAY())&" / "&Year(today()) & ""11:59:59 PM""" |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
Text and Today() function in VBA
Sub ppena()
Dim s As String s = Now() s2 = Split(s, " ") sDate = s2(0) & " 00:00:00 AM" eDate = s2(0) & " 11:59:59 PM" MsgBox (sDate) MsgBox (eDate) End Sub -- Gary's Student " wrote: Here is a piece of my code. It will not compile. I want SDate to be a text string in the format of "8/10/06 00:00:00 AM" and EDate "8/10/06 11:59:59 PM". I preffered if this values were yesterday's dates, but they have to change daily. Any suggestions? Thanks. My Code: Dim SDate As String Dim EDate As String Set SDate = "TEXT(Month(TODAY())&" / "&DAY(TODAY())&" / "&Year(today()) & ""00:00:00 AM""" Set SDate = "TEXT(Month(TODAY())&" / "&DAY(TODAY())&" / "&Year(today()) & ""11:59:59 PM""" |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Text does not display | Excel Discussion (Misc queries) | |||
TODAY function question... | Excel Worksheet Functions | |||
text spilling over text and colums | Excel Discussion (Misc queries) | |||
Date & Time | New Users to Excel | |||
TODAY function? | Excel Worksheet Functions |