[RESOLVED] formate in vba code

how do i get this format for example June 7, 2010
MyDate = Format(Now() + 7, "mm/dd/yy")

still it shows mm/dd/yy
MyDate = Format(Now() + 7, "[$-409]mmmm d, yyyy;@")

Kam

Maybe something like this:

Code:

---

z1 = Now                    ' 5/31/2010 1:45:32 PM
z2 = Format(z1, "Long Date") ' Monday, May 31, 2010
v1 = Instr(z1, ",")
z3 = Mid(z1, v1 + 1)        ' May 31, 2010

---

Is that what you're looking for?

Spoo

You must declare MyDate as String (or Variant), not Date.

Code:

---

    Dim MyDate As String
   
    MyDate = Format(Date + 7, "mmmm d, yyyy")
    Debug.Print MyDate '-->  June 8, 2010

---

thanks Anhn

Kam -- sorry, I completely missed your desire regarding the +7
Anhn -- nice

Spoo