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月26日 09:02 発信者：marie
題名：RE(2):PB7.0: EXCEL の書式設定方法
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.