Article View: fj.lang.perl
Article #177Perl for Win32 で Excelを制御したのですが
From: Yoshitaka OOHASHI
Date: Sat, 04 Apr 1998 00:00
Date: Sat, 04 Apr 1998 00:00
46 lines
2196 bytes
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に変換するドキュメントが存在するのでしたら、在処を教えて
ください。
よろしくお願いします。
Technical Details
Message-ID:
<6g44ru$d4$1@news.alles.or.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailShow Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 1043e7,65ba727884935c5f,start X-Google-Attributes: gid1043e7,public From: Yoshitaka OOHASHI <takpon@alles.or.jp> Subject: Perl for Win32 で Excelを制御したのですが Date: 1998/04/04 Message-ID: <6g44ru$d4$1@news.alles.or.jp> X-Deja-AN: 340707222 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset=iso-2022-jp Organization: AllesNet Mime-Version: 1.0 Newsgroups: fj.lang.perl