PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
23423 08/09/29 09:41:41 RE(4):PB7.0: EXCEL の書式設定方法 By marie
23421 08/09/27 11:16:14 RE(3):PB7.0: EXCEL の書式設定方法 By class
23419 08/09/26 09:02:02 RE(2):PB7.0: EXCEL の書式設定方法 By marie
23413 08/09/20 00:12:24 RE(1):PB7.0: EXCEL の書式設定方法 By class
23412 08/09/19 11:41:57 PB7.0: EXCEL の書式設定方法 By marie

カテゴリ:スクリプトの記述
日付:2008年09月27日 11:16 発信者:class
題名:RE(3):PB7.0: EXCEL の書式設定方法

marieさん、こんにちは。

ADD関数の第3引数(\"=RC=R[65535]]C\")にひとつ\"]\"が余分に付いてますので、
外してからもう一度試してみてください。

>classさん、おはようございます。

>返事が遅れて申し訳ありませんでした。

>下記スクリプトで試してみたのですが,ADD関数でエラーとなってしまいました。

>Integer xlExpression = 2
>//*
>i_ole_excel.Application.ActiveSheet.Columns( \"A:D\" ).Select
>i_ole_excel.Selection.FormatConditions.Add( xlExpression, \"\", \"=RC=R[65535]]C\" )
>i_ole_excel.Selection.FormatConditions(1).Font.ColorIndex = 15

>どうすればよいのでしょうか。なにとぞご教授お願いします。

>>marieさん、おはようございます。
>>
>>下記のマクロの先頭に\"oleobject.application.\"をつけてあげると
>>マクロと同じように動きます。
>>
>>oleobject.application.Columns(\"A:D\").Select
>>
>>ただし、powerbuilderからはプロパティ式が利用できないので、
>>関数を呼ぶように変更してみてください。
>>
>>//呼び方はVBAのヘルプか、オブジェクトブラウザを見てください。
>>int xlExpression = 2
>>oleobject.application.Selection.FormatConditions.Add(xlExpression,\"\",\"=RC=R[65535]C\")
>>
>>
>>
>>>EXCEL のマクロ
>>>    Columns(\"A:D\").Select
>>>    Selection.FormatConditions.Delete
>>>    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
>>>        \"=RC=R[65535]C\"
>>>    Selection.FormatConditions(1).Font.ColorIndex = 15
>>>
>>
>>



付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows XP
DBMS Oracle Net 10
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS Oracle10G
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.