Monks,

I am calling a dot file named vad.dot and it has a macro sub vad (path as string)...
I want to pass the parameter to this macro from Perl using Win32::OLE.

use Win32::OLE;
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Word';
$Win32::OLE::Warn = 2; # Throw Errors, I'll catch them

################################# Get the word object ################

my $word = Win32::OLE->GetActiveObject('Word.Application') || 
        Win32::OLE->new('Word.Application', 'Quit');    #get the word 
+object
$word->Documents->Add || die("Unable to create document ", Win32::OLE-
+>LastError());

################## Call the vad macro to create table #####

$word->AddIns->Add({Filename=>"$cur_dir\\vad.dot", Install=>"True"});
#$word->run("vad")       #running fine
$word->run("vad", "D:\\Prasad\\Projects\\tools\\vad"'); #getting error

[download]
Previously, When I ran my tool without parameters for my macro, it was working fine.
Could someone tell me how to pass arguments?
This is the error I am getting, 
OLE exception from "Microsoft Word":

Unable to run the specified macro

Win32::OLE(0.1707) error 0x80020003: "Member not found"
    in METHOD/PROPERTYGET "run" at D:\Prasad\Projects\tools\vad\vad.pl
+ line 314

[download]
In VBA macro,
sub vad(path as string)
{
}

[download]
updated: added macro skeleton and fixed typos.

Thanks in advance

Prasad

In reply to Pass arguments to VBA macro by prasadbabu

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.