Find Excel opened file name in Win32::OLE

Selvakumar has asked for the wisdom of the Perl Monks concerning the following question:

How can i find the opened file name in Excel. I am using the below code to open but i want to check before whether the same file already in opened mode or not?

my $Excel = Win32::OLE->GetActiveObject('Excel.Application') || Win32::OLE->new('Excel.Application', 'Quit');
my $Book = $Excel->Workbooks->Open("d:/Sample.Xls")

Comment on Find Excel opened file name in Win32::OLE

Replies are listed 'Best First'.
Re: Find Excel opened file name in Win32::OLE by Anonymous Monk on May 19, 2009 at 11:13 UTC
Workbook Object (Excel 2003 VBA Language Reference) `my $Book = $Excel->ActiveWorkbook; my $filename = $Book->{Name}; # or $Book->Name??` [download]	[reply] [d/l]

Back to Seekers of Perl Wisdom