date formate with a text

[anilg0001]

how can i print in my A1 cell as
A1=We have completed all the files and uploaded to the Outbox folder (Apr22)"
here the Apr22 = April month , 22 date (Current month and date)
please advise

 

[VoG]

Try

="We have completed all the files and uploaded to the Outbox folder ("&TEXT(TODAY(),"mmm dd")&")"

 

[anilg0001]

sorry mr Vog, I need this as a macro.

when i try this as
Range("B3").Value = "We have completed all the files and uploaded to the Outbox folder (" & Text(TODAY(), "mmm dd") & ")"
it shows error on the red part

 

[VoG]

Try

Range("B3").Value = "We have completed all the files and uploaded to the Outbox folder (" & Format(Date, "mmm dd") & ")"

 

[Peter_SSs]

In a macro it would be

Range("B3").Value = "We have completed all the files and uploaded to the Outbox folder (" & Format(Date, "mmm dd") & ")"

 

[anilg0001]

Thanks mr Peter_SSS and Mr Vog this work greatly
.
One more doubt how can i go at the end of a cell after running a macro
means
if my B range like

<table width="470" border="0" cellpadding="0" cellspacing="0"><col style="width: 353pt;" width="470"> <tbody><tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt; width: 353pt;" width="470" height="17">88Comet_34812 - KC026P (VIN# 34812) PO#</td> </tr> <tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt;" height="17">90Fontaine_50410 - KC027P (VIN# 50410) PO#</td> </tr> </tbody></table> <table width="470" border="0" cellpadding="0" cellspacing="0"><col style="width: 353pt;" width="470"> <tbody><tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt; width: 353pt;" width="470" height="17">88Comet_34812 - KC026P (VIN# 34812) PO#</td> </tr> <tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt;" height="17">90Fontaine_50410 - KC027P (VIN# 50410) PO#</td> </tr> </tbody></table>
after run a macro B5 cell need to be selected

if my B range like

<table width="470" border="0" cellpadding="0" cellspacing="0"> <col style="width: 353pt;" width="470"> <tbody><tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt; width: 353pt;" width="470" height="17">88Comet_34812 - KC026P (VIN# 34812) PO#</td> </tr> <tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt;" height="17">90Fontaine_50410 - KC027P (VIN# 50410) PO#</td> </tr> </tbody> </table> <table width="470" border="0" cellpadding="0" cellspacing="0"> <col style="width: 353pt;" width="470"> <tbody><tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt; width: 353pt;" width="470" height="17">88Comet_34812 - KC026P (VIN# 34812) PO#</td> </tr> <tr style="height: 12.75pt;" height="17"> <td style="height: 12.75pt;" height="17">90Fontaine_50410 - KC027P (VIN# 50410) PO#
<table width="470" border="0" cellpadding="0" cellspacing="0"><tbody><tr height="17"></tr><tr style="height: 12.75pt;" height="17"><td style="height: 12.75pt; width: 353pt;" width="470" height="17">88Comet_34812 - KC026P (VIN# 34812) PO#</td></tr><tr style="height: 12.75pt;" height="17"><td style="height: 12.75pt;" height="17">90Fontaine_50410 - KC027P (VIN# 50410) PO#</td></tr></tbody></table><table width="470" border="0" cellpadding="0" cellspacing="0"><tbody><tr height="17"></tr><tr style="height: 12.75pt;" height="17"><td style="height: 12.75pt; width: 353pt;" width="470" height="17">8Comet_34812 - KC026P (VIN# 34812) PO#</td></tr><tr style="height: 12.75pt;" height="17"><td style="height: 12.75pt;" height="17">90Fontaine_50410 - KC027P (VIN# 50410) PO#</td></tr></tbody></table>
</td> </tr> </tbody> </table>
after run a macro B10 cell need to be selected


means end of B range+1 cell selected

how can i write the code sir.

 

[VoG]

Try

Range("B" & Rows.Count).End(xlUp).Select

 

[anilg0001]

thanks its work exactly what i need
thanks again