2014-04-08 56 views
0

我們在Excel宏數。在Excel中的引用有一個叫SiebelHtml類型Libary或文件的東西這個效果。當它包含在Excel中時,它會加載許多函數和類。我可以在Perl中訪問Excel使用的一些庫嗎?

例如

sApp as SiebelApplication 

編譯時我包括libary。我在目錄中找到了兩個文件。他們是SiebelAX_Desktop_Integration.exe和SiebelAx_Desktop_Integration.inf。

有誰知道我是否可以將部分管理包括在一個Perl腳本,這些文件中的數據,這樣我可以編寫代碼的工作Perl的等效以上。我對VBA不是很瞭解,不瞭解引擎蓋下發生了什麼可以這麼說?

回答

-1

我不認爲這將有可能1至1 ..你將不得不重寫代碼看起來像下面的例子:

use feature 'say'; 
use Siebel::COM::App::DataControl; 
use TryCatch; 

my $app = Siebel::COM::App::DataControl->new(
     { 
      user  => 'sadmin', 
      password => 'sadmin', 
      host  => 'test', 
      enterprise => 'SIEBEL', 
      lang  => 'ENU', 
      aom  => 'eClinicalObjMgr_enu' 

     } 
); 

my $created_by = '0-1'; 
try { 
    $app->login(); 

    my $bo = $app->get_bus_object('Account'); 
    my $bc = $bo->get_bus_comp('Account'); 

    $bc->activate_field('Location'); 
    $bc->activate_field('Extension Phone Number'); 

    $bc->clear_query(); 
    $bc->set_view_mode(); 

    $bc->set_search_spec('Created By', "='$created_by'"); 
    $bc->query(); 

    if ($bc->first_record()) { 
     do { 
      my $val = $bc->get_field_value('Location'); 
      say $val; 
     } while ($bc->next_record()) 
    } else { 
     say 'Could not find the account'; 
    } 
} catch { 
    die 'Exception: ' . $app->get_last_error(); 
} 

,做神奇的是Siebel::COM perl的模塊的東西。 如果您發佈了一個Excel腳本示例,我可能會幫助您將其更改爲Perl等效項。

相關問題