PB 電子会議室
| 発言No. | 更新日 | 題名（クリックすると発言内容と関連するコメントが表示されます） |
|---|---|---|
| 11277 | 00/05/15 17:34:14 | RE(4):PB6.5: OLE上のExcelファイルのイメージコントロールについて By ふくぞー |
| 11276 | 00/05/15 17:09:17 | RE(3):PB6.5: OLE上のExcelファイルのイメージコントロールについて By てとらぽっと |
| 11265 | 00/05/15 14:00:58 | RE(2):PB6.5: OLE上のExcelファイルのイメージコントロールについて By ふくぞー |
| 11264 | 00/05/15 13:34:12 | RE(1):PB6.5: OLE上のExcelファイルのイメージコントロールについて By てとらぽっと |
| 11254 | 00/05/15 09:34:11 | PB6.5: OLE上のExcelファイルのイメージコントロールについて By ふくぞー |
カテゴリ：スクリプトの記述
日付：2000年05月15日 13:34 発信者：てとらぽっと
題名：RE(1):PB6.5: OLE上のExcelファイルのイメージコントロールについて
ふくぞーさん、こんにちは。
＞さて、OLEコントロールに関連付けられているExcel上の
＞イメージコントロールにファイルを関連付けさせる方法がどうしても
＞わかりません。
＞VBAだと以下のようになるのでしょうが、
＞Sheet1.Image1.Picture = LoadPicture(\"C:\\WINDOWS\\logo.BMP\")
＞これをPB上で実現する方法がわかりません。
解決策は、他にも方法があるかもしれませんけれども、
上記のようにVBAでのコーディングが完了している・判明している場合なら
Excelのファンクション（マクロ）にして呼び出すと楽かと思いますが
いかがでしょうか。
（例は、テストしていませんが、こんな感じということで）
ole_1.Object.WorkSheets(\"Sheet1\").Image1LoadPicture(\"C:\\WINDOWS\\logo.BMP\")
Function Image1LoadPicture(BmpFileName As String)
Image1.Picture = LoadPicture(BmpFileName)
End Function
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows NT 4.0
DBMS Oracle SQL*Net 8
Browser InternetExplorer5.X
Server SoftWare
OS (記載なし)
DBMS Oracle 8.0
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.