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 (記載なし)
Copyright © 2013 Power Future Co., Ltd.