ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Auto date in VBA (https://www.excelbanter.com/excel-programming/378106-auto-date-vba.html)

BMeredith

Auto date in VBA
 
First off, I appologize if this had been posted before. I have been looking
for a while now and cannot find the exact answer I need. I know it is going
to be very basic, yet have no luck doing it on my own. Thank you in advace
to all of you who may help me. Anyways, I am trying to write simple code to
update a cell value with the Text "Week of" and then calculate the first day
of the previous work week (Sunday) in mm/dd format. If this is not possible,
I am fine with the Today -7 function, but cannot get that to work. Here is
the code I have been working with and get an error on the Text portion alone.

Range("c2,c13,k13").Value = "Week of" & (Text(Today - 7, "mm/dd"))

Again, thank you to all who helps me with this.

Brandon


BMeredith

Auto date in VBA
 
My appologies, I'm sure you all would know this, but I am getting a Sub or
function not defined error.

BMeredith wrote:
First off, I appologize if this had been posted before. I have been looking
for a while now and cannot find the exact answer I need. I know it is going
to be very basic, yet have no luck doing it on my own. Thank you in advace
to all of you who may help me. Anyways, I am trying to write simple code to
update a cell value with the Text "Week of" and then calculate the first day
of the previous work week (Sunday) in mm/dd format. If this is not possible,
I am fine with the Today -7 function, but cannot get that to work. Here is
the code I have been working with and get an error on the Text portion alone.

Range("c2,c13,k13").Value = "Week of" & (Text(Today - 7, "mm/dd"))

Again, thank you to all who helps me with this.

Brandon



BMeredith

Auto date in VBA
 
Ok,

I got it to work witht he now function, but I do not need the time. Is
there another function that will just give me the day.



BMeredith wrote:
First off, I appologize if this had been posted before. I have been looking
for a while now and cannot find the exact answer I need. I know it is going
to be very basic, yet have no luck doing it on my own. Thank you in advace
to all of you who may help me. Anyways, I am trying to write simple code to
update a cell value with the Text "Week of" and then calculate the first day
of the previous work week (Sunday) in mm/dd format. If this is not possible,
I am fine with the Today -7 function, but cannot get that to work. Here is
the code I have been working with and get an error on the Text portion alone.

Range("c2,c13,k13").Value = "Week of" & (Text(Today - 7, "mm/dd"))

Again, thank you to all who helps me with this.

Brandon



Bob Phillips

Auto date in VBA
 
It is Date in VBA.

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

"BMeredith" <u29549@uwe wrote in message news:69c85cb727ed6@uwe...
Ok,

I got it to work witht he now function, but I do not need the time.

Is
there another function that will just give me the day.



BMeredith wrote:
First off, I appologize if this had been posted before. I have been

looking
for a while now and cannot find the exact answer I need. I know it is

going
to be very basic, yet have no luck doing it on my own. Thank you in

advace
to all of you who may help me. Anyways, I am trying to write simple

code to
update a cell value with the Text "Week of" and then calculate the first

day
of the previous work week (Sunday) in mm/dd format. If this is not

possible,
I am fine with the Today -7 function, but cannot get that to work. Here

is
the code I have been working with and get an error on the Text portion

alone.

Range("c2,c13,k13").Value = "Week of" & (Text(Today - 7, "mm/dd"))

Again, thank you to all who helps me with this.

Brandon





Mike Q.

Auto date in VBA
 
I got it to work witht he now function
How about an ugly if function
=IF(WEEKDAY(TODAY())=2,TODAY()-1,IF(WEEKDAY(TODAY())=3,TODAY()-2,IF(WEEKDAY(TODAY())=4,TODAY()-3,IF(WEEKDAY(TODAY())=5,TODAY()-4,IF(WEEKDAY(TODAY())=6,TODAY()-5,IF(WEEKDAY(TODAY())=7,TODAY()-6,TODAY()))))))
You could always give it a name to you don't loose half you screen when you
look at it.

--
Mike Q.


"BMeredith" wrote:

Ok,

I got it to work witht he now function, but I do not need the time. Is
there another function that will just give me the day.



BMeredith wrote:
First off, I appologize if this had been posted before. I have been looking
for a while now and cannot find the exact answer I need. I know it is going
to be very basic, yet have no luck doing it on my own. Thank you in advace
to all of you who may help me. Anyways, I am trying to write simple code to
update a cell value with the Text "Week of" and then calculate the first day
of the previous work week (Sunday) in mm/dd format. If this is not possible,
I am fine with the Today -7 function, but cannot get that to work. Here is
the code I have been working with and get an error on the Text portion alone.

Range("c2,c13,k13").Value = "Week of" & (Text(Today - 7, "mm/dd"))

Again, thank you to all who helps me with this.

Brandon




BMeredith via OfficeKB.com

Auto date in VBA
 
That was it, thank you Bob. I knew it was something stupid, lol. Thanks
again.

Bob Phillips wrote:
It is Date in VBA.

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

Ok,

[quoted text clipped - 15 lines]

Brandon


--
Message posted via http://www.officekb.com



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

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com