ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   opening excel file - date format problem: DD/MM/YYYY vs MM/DD/YYYY (https://www.excelbanter.com/excel-programming/325682-opening-excel-file-date-format-problem-dd-mm-yyyy-vs-mm-dd-yyyy.html)

yung

opening excel file - date format problem: DD/MM/YYYY vs MM/DD/YYYY
 
Hi,

I am using Excel 2000, programming with VB6.

I have a HTML file "Temp.xls" (yes, in xls extension) with a table only.
There is a cell containing a date:
..... <tr<td07/12/2004</td</tr...
Note that this date means Dec 7, 2004 (in DD/MM/YYYY format).
When I open this file in Excel, it shows the date format well as above.
But when I write code to open it:

Dim xlsApp as Object
Dim FilePath as String
.....
FilePath = "C:\Temp.xls"
Set xlsApp = Nothing
Set xlsApp = CreateObject("Excel.Application")
xlsApp.Workbooks.Open (FilePath)
....

I find that the date becomes 12/07/2004, which is not what I want.

The date fornat in my regional setting is dd/mm/yyyy already. How can I
solve this problem?

Thanks a lot!

Yung



broogle

opening excel file - date format problem: DD/MM/YYYY vs MM/DD/YYYY
 
I think you have to format that cell in your code.

Sheets("mysheet").Range("myrange").Value = Format(Now(), "dd-mm-yy")


Tom Ogilvy

opening excel file - date format problem: DD/MM/YYYY vs MM/DD/YYYY
 
I see you are using xl2000. I think in that case, you would need to find
the date and convert it - formatting the cell after the fact as suggested
will have no effect.

If it displays as

12/07/2004, then you can use vba's conformance to US English to your
advantage (untested, but try)

ActiveCell.Value = ActiveCell.Text

in your code after you open the file (ActiveCell represents a reference to
the cell with the date)
--
Regards,
Tom Ogilvy

"yung" wrote in message
...
Hi,

I am using Excel 2000, programming with VB6.

I have a HTML file "Temp.xls" (yes, in xls extension) with a table only.
There is a cell containing a date:
.... <tr<td07/12/2004</td</tr...
Note that this date means Dec 7, 2004 (in DD/MM/YYYY format).
When I open this file in Excel, it shows the date format well as above.
But when I write code to open it:

Dim xlsApp as Object
Dim FilePath as String
....
FilePath = "C:\Temp.xls"
Set xlsApp = Nothing
Set xlsApp = CreateObject("Excel.Application")
xlsApp.Workbooks.Open (FilePath)
...

I find that the date becomes 12/07/2004, which is not what I want.

The date fornat in my regional setting is dd/mm/yyyy already. How can I
solve this problem?

Thanks a lot!

Yung






All times are GMT +1. The time now is 10:36 PM.

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