If you define a sub like this

 
sub explore {
    my $obj = shift;
    print "Exploring $obj (".ref($obj).")\n";
    if( ref($obj) =~ /Win32::OLE/ ) {
    for my $key (sort keys %{$obj}) {
        print "\t$key => ".$obj->$key."\n";
    }
    }
}
[download]

and then apply it to one of the VB objects like this

explore( $datasheet );
[download]

you get all the possible fields you can work with:

        Application => Win32::OLE=HASH(0x385ca80)
        Cells => Win32::OLE=HASH(0x3491660)
        Columns => Win32::OLE=HASH(0x3491678)
        Creator => 1297303378
        Font => Win32::OLE=HASH(0x34915a0)
        Height => 0
        Left => 4359
        Parent => Win32::OLE=HASH(0x3491720)
        Range =>
        Rows => Win32::OLE=HASH(0x3491708)
        Top => 4337
        Width => 0
[download]

.

This way you can find your ways through the VB object djungle (d is silent).