🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

2 total messages Started by Yoshitaka OOHASHI Sat, 04 Apr 1998 00:00
Perl for Win32 で Excelを制御したのですが
#177
Author: Yoshitaka OOHASHI
Date: Sat, 04 Apr 1998 00:00
46 lines
2196 bytes
大橋ともうします。

Perl for Win32 + IIS 3.0 を使っています。

実は Perl Script で Excel の表を作成しようとしています。(Visible=0で)

現在のところ表の雛形を作成し、データを埋め込むところまではできました。

しかし、表の罫線を引くところでどうしても解決できず、止まっております。
VBA(Excel)のコードをPerlへなおして(正確に直せていないと思いますが)
実行すると、Methodが呼べないと怒られてしまいます。
たぶん、コードが間違っているのでしょうが、私の持っているドキュメントでは

VBA -> Perl の変換について詳しい記述がないのでわからない状態です。

Can't call method "Borders" without a package or object reference at
exceltest5.
pl line 80.

で、80行目はどうなっているかというと、

$ExcelApp->Range("a1:a3")->Borders(xlEdgeBottom)->{'LineStyle'} =
xlContinuous || die &XLQUIT;

このほかにもいろいろ試したのですが、だめでした・・・

$ExcelApp については

$ExcelApp = CreateObject OLE "excel.application" || die "Unable to
create Excel Object: $!\n";
$OBJfile = "TESTOBJ.XLS";
$OBJpath = "C:/InetPub/wwwroot/samples/$OBJfile";
$ExcelApp->{'Visible'} = 1; # 通常は 0 (非表示)
$ExcelApp->Workbooks->Open($OBJpath);

こんな感じで書いてあり、エラー行(80)をはずすとデータが入ってちゃんと表
示できます。

どなたか、ヒントをください!
Excel-VBA(罫線をひくところ) をPerlに変換する規則などありましたら教えて
ください。
また、VBAをPerlに変換するドキュメントが存在するのでしたら、在処を教えて
ください。

よろしくお願いします。
Re: Perl for Win32 で Excelを制御したのですが
#180
Author: Yoshitaka OOHASHI
Date: Sun, 05 Apr 1998 00:00
15 lines
924 bytes
自己レスです

Yoshitaka OOHASHI wrote:

> 大橋ともうします。
>
> Perl for Win32 + IIS 3.0 を使っています。
>
> 実は Perl Script で Excel の表を作成しようとしています。(Visible=0で)

xl~のバリアント値を数値にして、というアドバイスがあり、
解決致しました。

どうも失礼しました。
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads