View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Macro changes the format of dates

Just for information -
The OP said:
I use Windows 2000 (5.00.2195) and Office 2000



There is on LOCAL argument for OpenText in Excel 2000.

--
Regards,
Tom Ogilvy


keepitcool wrote in message
...
Rodolfo,

tried this with xlXP..

it's the only argument in help that gives you NO clue..
and it's NOT recorded with macro recorder.

it appears the LOCAL argument in OpenText method is the key you're
looking for.

Try following.. with local argument true resp false and notice the
difference


dates.txt with 1 line only..
01-05-03;05-01-03

sub Test()
Workbooks.OpenText Filename:="D:\Documents\dates.txt", _
Origin:=437, _
StartRow:=1, _
DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, _
ConsecutiveDelimiter:=False, _
Tab:=False, _
Semicolon:=True, _
Comma:=False, _
Space:=False, _
Other:=False, _
Local:=True '<- this decides date interpretation
end sub





keepITcool

< email : keepitcool chello nl (with @ and .)
< homepage: http://members.chello.nl/keepitcool


"Rodolfo Silva" wrote:

I use Windows 2000 (5.00.2195) and Office 2000.
I use a macro that open a text file delimited with
semicolon.
I use the next instruction:

Workbooks.OpenText FileName:=xarchi,
DataType:=xlDelimited, semicolon:=True, Tab:=False

"xarchi" contains the name of the file that I open.

Problem: The macro open the file and changes the format
of dates, i.e. 07/02/2003 when the text file contains
02/07/2003

When I open the file manually (via menu) dates are not
changed.
The macro works fine in Win95, Win98, WinXP and all the
previous Excel versions..
The problem is not at Regional Configuration.
If I use a text file delimited with comma, the macro
opens the file and does not convert the format of date.

Thanks in advance

Rodolfo Silva