Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: Win32::OLE Excel Adding worksheet after last current sheet

by jsprat (Curate)
on Nov 05, 2003 at 20:35 UTC ( #304860=note: print w/replies, xml ) Need Help??


in reply to Win32::OLE Excel Adding worksheet after last current sheet

You are so close!

To use named parameters, you need to use a hash reference. This line uses a reference to an anonymous hash:

my $Sheet2 = $Book->Worksheets->Add( {after => $Book->Worksheets($Book->Worksheets->{count})} );

Replies are listed 'Best First'.
Re: Re: Win32::OLE Excel Adding worksheet after last current sheet
by Anonymous Monk on Nov 05, 2003 at 21:30 UTC
    Perfect!!!! Thanks alot!
Re^2: Win32::OLE Excel Adding worksheet after last current sheet
by Anonymous Monk on Apr 30, 2009 at 10:14 UTC
    Hi, I am tring to run macro through the perl script but always getting following error The macro 'SetIO' cannot be found. Win32::OLE(0.1707) error 0x800a03ec in METHOD/PROPERTYGET "Run" at agilent.pm line 20 the value is Vcore Please check the code below, please help me to solve this problem I am new to perl and VB/Excel #use strict; use warnings; use Win32::OLE qw(in with); use Win32::OLE::Const 'Microsoft Excel'; $Win32::OLE::Warn = 3; my $filename = "E:/DM360/Power/DM365_Test.xls"; my $Excel = Win32::OLE->GetActiveObject('Excel.Application')||Win32::OLE->new('Excel.Application', 'Quit'); # use the Excel application i #f it's open, otherwise open new my $Book = $Excel->Workbooks->Open( "E:\\DM360\\Power\\Measure.xls" ); # open the file my $Sheet = $Book->Worksheets(Readings); $Sheet->Activate(); printf ("the value is %s \n",$Sheet->Cells(1,3)->{'Value'}); $Excel->Run("SetIO"); $Excel->Run("CommandButton1_Click"); #$Excel->Run("Temp"); $Book->Save; #optional - save any changes made by the macro $Book->Close;
      $Excel->Run("SetIO");

      This tries to run a macro SetIO. Excel says it cannot find this macro. So maybe you want to check that a macro of this name exists. There is nothing that we can do from here to help you further.

Re^2: Win32::OLE Excel Adding worksheet after last current sheet
by dipak28 (Initiate) on Apr 30, 2009 at 10:25 UTC
    Hi, I am tring to run macro through the perl script but always getting following error - The macro 'SetIO' cannot be found. Win32::OLE(0.1707) error 0x800a03ec in METHOD/PROPERTYGET "Run" at agilent.pm line 20 the value is Vcore Please check the code below, please help me to solve this problem I am new to perl and VB/Excel #use strict; use warnings; use Win32::OLE qw(in with); use Win32::OLE::Const 'Microsoft Excel'; $Win32::OLE::Warn = 3; my $filename = "E:/DM360/Power/DM365_Test.xls"; my $Excel = Win32::OLE->GetActiveObject('Excel.Application')||Win32::OLE->new('Excel.Application', 'Quit'); # use the Excel application i #f it's open, otherwise open new my $Book = $Excel->Workbooks->Open( "E:\\DM360\\Power\\Measure.xls" ); # open the file my $Sheet = $Book->Worksheets(Readings); $Sheet->Activate(); printf ("the value is %s \n",$Sheet->Cells(1,3)->{'Value'}); $Excel->Run("SetIO"); $Excel->Run("CommandButton1_Click"); #$Excel->Run("Temp"); $Book->Save; #optional - save any changes made by the macro $Book->Close;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://304860]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (5)
As of 2020-10-01 13:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My favourite web site is:












    Results (13 votes). Check out past polls.

    Notices?