i'll bet it's because you are passing the literal string
"xlUnderlineStyleSingle" instead of its underlying value ie. 2
try
$Sheet->Range("a10")->Font->{Underline} = 2;
hth
toby
> -----Original Message-----
> From: praveen vejandla [mailto:[EMAIL PROTECTED]]
> Sent: Tuesday, October 01, 2002 2:40 PM
> To: [EMAIL PROTECTED]
> Subject: win32:: ole excel
>
>
> Hi All,
>
> Is there any way to underline a particular cell in excel sheet
> using perl win32::OLE module.?
>
> I tried with below statement but it is not working.
>
> $Sheet->Range("a10")->Font->{Underline}=
> "xlUnderlineStyleSingle";
>
> Thanks and Regards,
> Praveen
> _______________________________________________
> ActivePerl mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs