【StarSuite Basic/Op ..
[
2ch
|
▼Menu
]
■コピペモード
□
スレを通常表示
□
オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト
362:デフォルトの名無しさん 08/11/26 21:56:25 VBA系はマじゃないからわんさかいるな・・・ 363:デフォルトの名無しさん 08/11/27 22:40:06 >>348 seek して TextInputStream を Shift_JIS エンコードに設定して 区切り文字に chr(0) 指定の readString で読むとか 8B E3 00 8B E3 98 5A 8E AE 8A CD 90 ED 00 8B E3 Sub readtysef sURL = "file:///E:/usr/123" oIN = CreateUnoService( _ "com.sun.star.ucb.SimpleFileAccess")._ openFileRead(sURL) oTxtRead = CreateUnoService( _ "com.sun.star.io.TextInputStream" ) oTxtRead.setEncoding("Shift_JIS") oTxtRead.setInputStream(oIn) oTxtRead.skipBytes(3) ' from 8B sRes = oTxtRead.readString(Array(chr(0)), True) oIn.closeInput() End Sub 364:デフォルトの名無しさん 08/12/11 16:47:11 マクロ編集のエディタが使い辛いのですが、エディタの機能を拡張したり、他のエディタと置き換えたり呼び出したりとか そういうことはできませんか？
次ページ
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
レスジャンプ
mixiチェック！
Twitterに投稿
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch
5222日前に更新/95 KB
担当:undef