Convert Excel custom date column in vb6

Question

I have a vb6 code that read value from excel which is in mm-yy format . I want to convert it as dd-mm-yyyy format in my application

My vb6 code for reading column is

.Range(Purchase_Excel!ExpdateColumn & intLoopCounter)

where counter is the row number

Ricardo Diaz · Answer 1 · 2019-03-05T17:40:12.847

0

Try to wrap the column reader with the format function like this:

Format(.Range(Purchase_Excel!ExpdateColumn & intLoopCounter), "mmm yyyy")

edited Mar 05 '19 at 17:40

answered Mar 05 '19 at 17:36

Ricardo Diaz

the date in excel Sep-20 – MANOJ AP Mar 05 '19 at 17:38
I want is as sept 2020 – MANOJ AP Mar 05 '19 at 17:38
your suggestion return 20-sept-2019 – MANOJ AP Mar 05 '19 at 17:39
Please check the edited answer. "mmm yyyy" should give you what you expect. – Ricardo Diaz Mar 05 '19 at 17:41
It work with Format(.Range(Purchase_Excel!ExpdateColumn & intLoopCounter).Text, "yy-mm-dd") – MANOJ AP Mar 05 '19 at 17:47
but the dd value is not exact as in excel – MANOJ AP Mar 05 '19 at 17:48
Can I get the value seen [exactly same ] in the Formula bar of Excel – MANOJ AP Mar 05 '19 at 17:50
1) Decide what format do you need. You originally mentioned "dd-mm-yyyy" then "mmm yyyy" and now "yy-mm-dd". 2) Are you using Excel VBA or VB6? – Ricardo Diaz Mar 05 '19 at 17:53

1 Answers1