Re^2: Win32:OLE -> difference between English and German Excel

Hi,
I tried this, but it doesn't work. Something I found was the XlApplicationInternational which should store the constant xlUpperCaseColumnLetter which is different for each country, but I didn't manage it to get the value of this Constant.
I tried several codes but none of them will function, maybe you can help?

#my $V = $Excel->International->{xlUpperCaseColumnLetter};
my $lang = $V->XlApplicationInternational->{xlUpperCaseColumnLetter};
print "Column letter: $V\n";
[download]

Comment on Re^2: Win32:OLE -> difference between English and German Excel Download Code

Replies are listed 'Best First'.
Re^3: Win32:OLE -> difference between English and German Excel by Grygonos (Chaplain) on Jul 01, 2004 at 12:42 UTC
Below code is tested and verified on ActiveState 5.8.0 with Excel 97' `#!/Perl/bin/perl use strict; use warnings; use Win32::OLE; use Win32::OLE::Const; my $xl = Win32::OLE->new('Excel.Application'); my $xlConst = Win32::OLE::Const->Load('Microsoft Excel 8.0 Object Libr +ary'); print $xl->International($$xlConst{'xlUpperCaseColumnLetter'}); print $xl->International($$xlConst{'xlUpperCaseRowLetter'});` [download] Grygonos	[reply] [d/l]

Replies are listed 'Best First'.

Re^3: Win32:OLE -> difference between English and German Excel
by Grygonos (Chaplain) on Jul 01, 2004 at 12:42 UTC

Below code is tested and verified on ActiveState 5.8.0 with Excel 97'

#!/Perl/bin/perl

use strict;
use warnings;
use Win32::OLE;
use Win32::OLE::Const;


my $xl = Win32::OLE->new('Excel.Application');
my $xlConst = Win32::OLE::Const->Load('Microsoft Excel 8.0 Object Libr
+ary');

print $xl->International($$xlConst{'xlUpperCaseColumnLetter'});
print $xl->International($$xlConst{'xlUpperCaseRowLetter'});
[download]

Grygonos

[reply]
[d/l]