【StarSuite Basic/OpenOffice.org Basic】

■ このスレッドは過去ログ倉庫に格納されています
2006/10/06(金) 20:04:48
StarBasicまたはOOo Basicプログラミングに興味のある方、
もしくは学習中の方、知識共有の場にしましょう。

参考になる主なリンク
StarSuite 8 Basic プログラミングガイド
http://docs.sun.com/app/docs/doc/819-1332?l=ja
OpenOffice.org 推進サイト
http://ooosupport.good-day.net/ja/documents/faq/
OpenOffice.org日本ユーザー会翻訳プロジェクト BASIC HELP
http://openoffice-docj.sourceforge.jp/tr/translated/basic_help_frame.html
OpenOffice.org本家 API Project
http://api.openoffice.org/
ウィキブックス OpenOffice.org Basic
http://ja.wikibooks.org/wiki/OpenOffice.org_Basic
ウィキブックス OpenOffice.org Calc Basic
http://ja.wikibooks.org/wiki/OpenOffice.org_Calc_Basic
pukiwiki Plus!
http://hermione.s41.xrea.com/pukiwiki

他に追加情報があったら教えてください。
2008/09/17(水) 00:45:12
いや、結局googleでWeb上に分散している答えを探すしか方法がないってことが問題なんでしょ。

あらかじめ答えの書かれた URL が分かってるならいいけど、
それを知らず、なおかつその答えがWeb上に存在するかどうかすら怪しいものを、
疑問点が湧くたびに調べなきゃならないってのは相当なストレスだよ。

俺は一時期VBAマクロの移植作業で苦労した経験があるが、
もう当面やりたいとは思わない。
2008/09/17(水) 00:47:41
いや、GUI から出来るのにそもそも API から不可だったりすることが大問題
調べても見つからないから、ソースを見たら外部から利用できる API がなかったりする
2008/09/17(水) 01:01:24
>>327　x値は普通1系列しか無いんじゃない？

>>328　＞結局googleでWeb上に分散している答えを探す
web全体まで見なくても、http://www.oooforum.org/forum/内だけで、
大抵の場合はカタが付くよ。
自分が困ってる問題には、たいがい先につまづいてる人が居るから。
2008/09/17(水) 01:07:20
>>330
XY 散布図に多系列だと、大抵は x に対応する y が必要だからさ・・・
.chart2.data.DataSequence は x と y の対応に関する指定がないっぽいから望み薄だ
2008/09/17(水) 01:19:14
今試したら俺 >>326 の方法で XY 散布図のデータ系列の追加できたけどな。
もともと x, y1, y2 の2系列があるところを x, y1, y2, y3 の3系列にするってかんじに。

あとは色とかは線の太さとかは自分で設定すればいいし。
2008/09/17(水) 01:30:29
いや、散布図で一本目と別の x に対する y の値のグラフを同じグラフに描くような感じに
2.3 頃から使えるようになったやつ
2008/09/17(水) 01:34:58
なるほど、そんな機能があるとは知らなかった。

そんな新しい機能に対するAPIが用意されてるかどうかはすこぶる怪しいな。
2008/09/17(水) 11:05:10
ダメっぽいよ。未だGUIでも個別設定と纏めて設定を切り替えるととち狂うし。
散布図から他のグラフに変えて、元に戻してもおかしくなるし。
# 要は、x軸複数系列は完成してないと見るべし。
2008/09/19(金) 19:11:41
グラフのデータ系列の操作だがどうやら
oChart = ThisComponent.getSheets().getByIndex(0).getCharts().getByIndex(0).getEmbeddedObject()
oCooSys = oChart.getFirstDiagram().getCoordinateSystems()
付近から始めるみたいだ。
337336
垢版 |
2008/09/20(土) 01:34:53
やっと、作成済みの散布図に新しい XY の系列の追加がうまくいったあぁ
2008/09/20(土) 10:04:47
>>337 おめ。

さぁ、後からツボった人が参照できるように、
書いたコードをどこかに晒す作業に戻るんだ。

// 公開の縛りとかが無くて、そゆ事が可能なコードならね：）
2008/09/20(土) 23:00:52
>>338
某所・・・ネットの狭間に書いといたよ
2008/09/29(月) 15:59:20
3.0 rc3 が出て、正式が 10/7 だと正式は rc3 になるんだろうけど
user/Script/python にいれた python マクロが認識されないままになりそうだ
2008/10/14(火) 13:41:17
OOo3.0をさっそく入れてみた。エクセル２００３のマクロが動くかどうか試してみた。
シートオブジェクトを代入するところでつまずいた。orz

Dim ST_G As Excel.Worksheet, ST_D As Excel.Worksheet
Sub 図作成()
Set ST_G = Worksheets("Sheet1") ←ここでエラー
Set ST_D = Worksheets("Sheet2")
2008/10/14(火) 14:04:56
Dim ST_G As Excel.Worksheet
を As Object にすればいいんじゃない
343341
垢版 |
2008/10/14(火) 16:12:36
>342
ありがとうございます！
ところが、別のところ（セルの塗りつぶし）でもエラーが出ました。移植に必要な情報ってどこかに
あるんですか？
2008/10/14(火) 22:39:14
ちゅうかさ、v.2 の頃に以前 VBA サポートを有効にしたビルドを使ったことあるけど、
あれにあんまり期待しない方がいいと思うぞ。ほとんどが動かなかったし。
2008/10/15(水) 15:35:32
※NetBeansスレでも聞いたのですが、こちらでもお願いします。
NetBeansでOpenOffice.Apiを使ったことのある方、教えてください。

やりたいこと　「OpenOffice.Calcからjavaのメソッドを呼び出す」
調べたら
NetBeansでOpenOffice.Apiを使えば簡単にスケルトンクラスを作ってくれることがわかりました。
早速、Apiをインストールしたのですが、以下の現象がでてます。

Apiをインストールすると

アドオン、calc　アドイン、component、クライアントアプリ

の４つのプロジェクトが作成可能になります。

今回のやりたことは、componentプロジェクトでできそうです。
試してみると、アドオン・calc　アドインは動作するのですが、componentプロジェクトがうまく作れません。

componentプロジェクトを作成すると、サービスの登録画面が表示され、インターフェース、サービスを追加しようとしたのですが、なぜか追加できません。
インタフェースを選択し新規データ型を定義ボタンから、追加しているのですが、うまくいきません。

解決策、またはやり方の間違えを指摘できる方、お願いします。

OS:WindowsXP pro
IDE:Netbeans 6.1
OO:OpenOffice 2.4.1
SDK:StarSuite_8_SDK

で試しています。
OpenOfficeSDKは現在DLできないようなので、StarSuite_8_SDKを使ってみました。

よろしくお願いします。
2008/10/15(水) 15:42:53
>>345
こことかどうかな
ttp://wiki.services.openoffice.org/wiki/General_UNO_Component_Project_Type
2008/10/15(水) 15:51:07
>>346
早速の返信ありがとうございます。

そのサイトを参考に進めていたのですが、Interfaceを追加するところから先に進まない状況です。
Logでも吐き出してくれれば調査できるのですが、そういうのも見当たらず・・。

もしかすると、IDEとOOのバージョン組み合わせに問題があるのかもしれません。

ほかにも何か、気になることがあればお願いします。
2008/11/26(水) 12:13:34
バイナリファイルからnull terminated stringを
読む方法はありますか?
OpenOffice.org 3.0/calc/OOo Basicです。

対象のファイルはバイナリファイル
(ゲーム提督の決断4のセーブデータ)であり
アドレス2192F(h)から
8b e3 98 5a 8e ae 8a cd 90 ed 00
と記録されています。(Shift-JISで「九六式艦戦」)

Dim Result as String
Get #1, Offset+1, Result
とすると「六式艦戦」から始まる長さ51807バイトの
文字列になってしまいます。
どうやら先頭2バイトを文字列長さと認識しており、
00を文字列終端と認識しません。

Input #1, Result
とすると「ﾋ￣ﾘZﾎ？ﾊ？ﾐ？」という長さ10バイトの
文字化けした文字列になってしまいます。

null terminated stringをOOo Basicのstringとして
読み込む方法を教えてください。
2008/11/26(水) 14:12:07
バイナリデータの取得自体はこのへん？
ttp://hermione.s41.xrea.com/pukiwiki/index.php?OOobbs%2F96

サイズの指定は手動でいいなら
Dim buf(10) As Byte ' 0〜10の11個
oInputStream.readBytes(buf(), 11)
こんな感じでできるんじゃないの。それをどうstringに変換するかは知らんけど。

ってそういう話じゃないのかな？
350348
垢版 |
2008/11/26(水) 14:29:26
リンク先が参考になりました。
ありがとうございます。

バイト型の配列で読みとれたら、後は文字列への変換ですね。
Shift-JIS→Unicode変換の方法がわかれば、
Chr関数はUnicode値→文字へ変換と組み合わせることで
解決できそうです。
2008/11/26(水) 14:44:02
こういう基本的なドキュメントってどっかにまとまってるべきだよなあ
352 
垢版 |
2008/11/26(水) 14:50:59
>>351に言い出しっぺの法則が適用されました
2008/11/26(水) 14:54:39
いや、ドキュメント作るにしたって元ネタがSunの出してる全然不足だらけのドキュメントと
掲示板に散在するTIPS集しかないじゃん。まさかソースからドキュメント起こせとでも？
2008/11/26(水) 15:11:14
やる気があるならまずは全然不足だらけのドキュメントと掲示板に散在するTIPS集の情報を一箇所にまとめてみれば？
2008/11/26(水) 15:18:54
やる気があるなんて誰も言ってないけど。俺は自力で探す方法でなんとかしのいでるし。
まあVBAのならともかく、Calc Basic のドキュメントなんて書籍化しても100部くらいしか売れないだろうな。
2008/11/26(水) 15:22:44
まあそうだろうね
やる気があるとは思っていないからあるならって仮定付きで言ったまでで
しかし書籍化なんて言葉が思い浮かぶだけでもびっくりだ
2008/11/26(水) 15:26:30
何をそんなにカリカリして食いついてくるのか理解不能だな
358 
垢版 |
2008/11/26(水) 15:30:17
「まとめるべきだよなぁ」なんて言ってるからじゃね？
頭から他力本願な癖に「〜すべきだ」なんて強要する態度が気に入らないと思われ。
2008/11/26(水) 15:33:08
何怒ってんだろう？OOo関係に文句いったらカチンとくるの？
2008/11/26(水) 15:42:07
いやOOo使ってないし
単にあがってるスレだったのが理由
さがってればスレの存在自体知らなかった
一般的な突っ込みの仕方をしただけなんで
OOoのドキュメント環境の知識はないよ
361デフォルトの名無しさん
垢版 |
2008/11/26(水) 17:13:44
煽ってるつもりなんだろうか？
アホの考える事はわからんの〜
2008/11/26(水) 21:56:25
VBA系はマじゃないからわんさかいるな・・・
2008/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
2008/12/11(木) 16:47:11
マクロ編集のエディタが使い辛いのですが、エディタの機能を拡張したり、他のエディタと置き換えたり呼び出したりとか
そういうことはできませんか？
2008/12/18(木) 22:06:11
VBAで開発して、ある程度できたらOOoにコピペして調整。
366デフォルトの名無しさん
垢版 |
2008/12/24(水) 11:19:22

Basice IDE　上でコピペしただけで、ダウンしてしまいます。。
何なんだろう。この使いがたさは。。
367さいき
垢版 |
2009/01/16(金) 19:16:56
base で何かを作りたいと思って　調べたことを書きました。
http://yumisaiki.blogspot.com/2009/01/open-office.html

でも、普通に今日の日付を標準で表示させるというような簡単なこともmacro書かないといけないみたいですが、
方法がどうしてもわかりません。
368さいき
垢版 |
2009/01/19(月) 02:27:18
自己レスで＝す。今日、日付フィールドの属性にあるドロップダウンというのをはいにすると
カレンダーコントロールのような入力画面になることを発見しました。

これはなかなか無料とは思えない便利な機能です！
2009/01/20(火) 22:46:37
>>368
Basic、Baseについては、http://oooug.jp/faq/ でも多くの情報が得られます。

例えば、http://oooug.jp/faq/index.php?Faq%2FBase なんてどうでしょう。
Baseでつまづいた時の参考になります。

日付フィールドに関しては、紆余跼蹐があって、初期のころは当日の日付が
入力されていたようです。以下にそんなことがかかれています。

http://oooug.jp/faq/index.php?Faq/1/334

以下を見ると、〜.odbというBaseのサンプルもたくさん登録されています。

http://oooug.jp/faq/index.php?plugin=attach&pcmd=list
2009/03/04(水) 00:55:44
情報ありがとう
2009/03/14(土) 11:27:02
そうか
372デフォルトの名無しさん
垢版 |
2009/03/20(金) 21:26:07
>>201
ｵﾔｽﾐ…
　 ＜⌒／ヽ-、_＿_
／＜_/＿＿＿＿／
￣￣￣￣￣￣￣
2009/04/15(水) 23:18:02
そうか
2009/04/20(月) 03:25:02
スレ違い
2009/05/11(月) 10:57:31
補完機能が付くのはいつくらいなんでしょうか？・・・・
376デフォルトの名無しさん
垢版 |
2009/05/20(水) 20:52:16
>>375
何の？
2009/06/05(金) 11:21:23
OpenOfficeのGUIからはエクスポート機能を使ってPDFや画像形式でファイルを保存できますが、
コマンドラインからは同様の機能はすぐに使えるんでしょうか？

ググってみたんですが、macroを使って変換するのは見つけたんですが、機能として持っているのなら
macro使わない方法もあるかと思って質問してみました。

あと、unoconvを使ってみたんですが、これはOpenOfficeをサーバとして起動して何かを渡して
いるようなので、そういうことができるならmacroなしのコマンドラインからという手段がありそうですよね？
2009/06/13(土) 13:40:22
writerで外字を使おうとしたら文字化けしてしまう。
StarSuiteでは外字使えないんでしょうか？
windowsはsp3、IMEを使ってます。
2009/06/21(日) 17:49:09
>378
こっちで聞いてみたらどうですか？
OpenOffice.org 総合相談所 6
http://pc11.2ch.net/test/read.cgi/bsoft/1239637122/l50
380デフォルトの名無しさん
垢版 |
2009/06/23(火) 06:48:32
OpenOffice3.1.0を使用しています.
クイック起動はオフにしています.
DelphiからOpenOffice　Calcを使ってxlsファイルを読み込む処理をしています.
http://www.clubdelphi.com/trucos/index.php?id=428　ここを参考に作成しました.
ClassID:=ProgIDToClassID('com.sun.star.ServiceManager');
h:=CoCreateInstance(ClassID, nil, CLSCTX_LOCAL_SERVER, IDispatch, id);
とした時点で、soffice.bin/soffice.exeという２個のプロセスが生成されます.
その後、読み込み処理を終了して、
ワークブックのクローズ、　objDocument.Close(True);　を実行した時点で、
OpenOffice　Caleは表示を終了し、画面からは消えます.
しかし、最終的に　TWorkbook.Destroyを実行しても、
soffice.bin/soffice.exeという２個のプロセスが消えません.
CoCreateInstanceの後始末が必要なのかなと思って、
ServiceManager.Release;　としたら、サポートしていないと例外が発生しました(objServiceManager := id;).
なにか、OpenOfficeを終了させるというコマンドを投げないといけないのでしょうか (ExcelのOleFunction("Quit");の様な)
ぐぐってみても、OpenOffice Basicで終了コマンドというようなものが見つかりませんでした.
soffice.bin/soffice.exeという２個のプロセスが残らないようにする方法を教えてください.
よろしくお願いします.
2009/06/23(火) 13:58:54
>>380
終了させるには com.sun.star.frame.Desktop サービスから
css.frame.XDesktop インターフェースの terminate メソッド

普通は最後のドキュメントを閉じれば終了するはずなんだけど・・・
382380
垢版 |
2009/06/23(火) 20:02:01
>>381
ありがとうござます。
terminateでちゃんとsoffice.bin/soffice.exeが消えました。
2009/07/08(水) 15:08:41
access2003のファイルをBaseでは開くにはどういう操作をしたらいいのでしょう？
ExcelファイルをCalcで開くみたいには簡単にいきません。
どなたか教えてください。
2009/07/17(金) 01:30:31
ここプログラミング掲示板のOpenOffice.orgマクロ言語に関するスレッドなので、
ビジネスソフト掲示板あたりのOpenOffice.orgに関する総合スレッドで質問なさったほうが
返答を得やすいと思います。
2009/08/17(月) 17:46:37
自動焼人 ★　＝　自動保守 ◆KAWORUKOFI　＝　自動保守#K9K?_D[L

名言集　その４
『俺、100人規模の集団サイバーテロの主犯だったこともあるんだぜ』

http://yutori7.2ch.net/test/read.cgi/news4vip/1249830540/　のID:PVAf+dux0　＝　自動焼人 ★

> 965 ：以下、名無しにかわりましてVIPがお送りします [sage] ：2009/08/10(月) 00:02:09.35 ID:PVAf+dux0
> まぁ何だ。
> 俺の過去の経歴に比べたら、割れ厨なんて鼻くそレベルなんだけどなｗ
> 100人規模の集団サイバーテロの主犯とか、いろいろとな。


----------------------------------------------
この自動焼人 ★メールマガジンの配信停止をご希望される方は
http://qb5.2ch.net/test/read.cgi/sec2chd/1250169591/
にて自動焼人 ★までご連絡ください
2009/08/17(月) 17:57:29
自動焼人 ★　＝　自動保守 ◆KAWORUKOFI　＝　自動保守#K9K?_D[L

名言集　その２
『お前が規制系キャップ取れるか審査してやるよ』

http://yutori7.2ch.net/test/read.cgi/news4vip/1249830540/　ID:PVAf+dux0　＝　自動焼人 ★

> 36 ：以下、名無しにかわりましてVIPがお送りします [sage] ：2009/08/10(月) 00:31:30.02 ID:PVAf+dux0
> >>33
> キャップとコテハンの違いは何？

> 46 ：以下、名無しにかわりましてVIPがお送りします [sage] ：2009/08/10(月) 00:38:05.34 ID:PVAf+dux0
> >>45
> その回答では落ちるなｗ
> 答えは教えないがｗ

> 50 ：以下、名無しにかわりましてVIPがお送りします [sage] ：2009/08/10(月) 00:41:29.96 ID:PVAf+dux0
> Q.キャップとコテハンの違いは何？
> A.２ちゃんねるのボランティアの登録制度

> それがお前の答えかｗ

> 52 ：以下、名無しにかわりましてVIPがお送りします [sage] ：2009/08/10(月) 00:43:10.06 ID:PVAf+dux0
> まぁ、どうせ正解が出るわけもないし、次の問題。
> 君が思う面白いスレはどんなの？
----------------------------------------------
この自動焼人 ★メールマガジンの配信停止をご希望される方は
http://qb5.2ch.net/test/read.cgi/sec2chd/1250169591/
にて自動焼人 ★までご連絡ください
387デフォルトの名無しさん
垢版 |
2009/09/03(木) 10:46:46
BASIC繁栄時代があったらしい
2009/09/03(木) 12:49:40
現在のcライクインタープリタなbasicと、
前世紀に栄えていたbasicとは、実は別言語である

という説を唱えてみる
389デフォルトの名無しさん
垢版 |
2009/09/16(水) 23:26:07
OOoBasicで複式簿記の家計簿作ったよ

http://www.geocities.jp/retort_curry119/kakeiboPage.htm
390デフォルトの名無しさん
垢版 |
2009/09/26(土) 21:17:35
>>389　w(゜o゜)wワオ！
391デフォルトの名無しさん
垢版 |
2009/10/10(土) 16:05:40
OpenOfficeマクロプログラミング
宍戸輝光　工学社　09/10　\1,890

出たね。
392デフォルトの名無しさん
垢版 |
2009/10/18(日) 14:03:53
昨日からbaseいじっております。以前も（2.0）触ってみましたが、挫折しました。
M社の2003サポート切れの心配やバージョン毎の購入にウンザリしており、今回は挫折したくありません。
オフィスソフト自体は自宅で必要ではないのに会社の為に自分も購入している方も多いと思います。
一企業が一企業のソフトに業務を依存しなくてはならない現状が非常に間違った方向だとも思いますし、、。
現在basicの書き場所がBASEでわからなく、、、探していて辿りつきました。
道は遠いですか？
2009/10/19(月) 14:13:11
残念ながらここは過疎っているので、ビジネスsoft板やソフトウェア板などの
OpenOffice一般を扱うスレッドでマクロの質問等もなさると反応がいいと思います。
マクロを中心に扱った日本語書籍がやっと世に出た段階なのでこれからですね。
2009/11/05(木) 23:10:50
>391　さんが紹介された本、誰か買って読んだ方いらっしゃいますか？
紀伊国屋書店のページ↓は見てみましたが、どんなもんなんでしょ。
http://bookweb.kinokuniya.co.jp/guest/cgi-bin/wshosea.cgi?KEYWORD=%82%6E%82%90%82%85%82%8E%82%6E%82%86%82%86%82%89%82%83%82%85%83%7D%83%4E%83%8D%83%76%83%8D%83%4F%83%89%83~%83%93%83%4F
2009/11/09(月) 21:56:59
オプソは好きだが、M$オフィスの方がまだまだずっと出来がいい
396デフォルトの名無しさん
垢版 |
2009/11/22(日) 20:36:49
プログラミング環境としては悪くないね、OOo
2009/11/22(日) 21:17:09
「初心者向けの」プログラミング環境ってことなら、ドキュメントがろくに揃ってないことで却下だなあ。

無料ってことをウリにするなら、Visual Studio の Express Edition には適わないし
.NET限定だけど、売りもののProfessional Editionへのステップアップも容易
2009/11/28(土) 19:35:58
「プログラミング環境」って？
コード補完や文法ミスの指摘をしてくれるＩＤＥがあるってこと？
へぇ、知らんかった。ずいぶん進化したもんだね。
399デフォルトの名無しさん
垢版 |
2009/12/05(土) 08:08:59
>>394
本屋でパラッと見たけどSDK関連の記載がなかったみたい。
つまり、これを参考にしても何も作れない。
2009/12/05(土) 17:01:30
SDK関連の記載って例えばどういうの？
401デフォルトの名無しさん
垢版 |
2009/12/09(水) 22:35:32
ttp://hermione.s41.xrea.com/pukiwiki/
2009/12/09(水) 23:00:57
>>401
なんかリンクが貼ってあるばかりでイマイチつかみどころのない説明ばかりだな
2009/12/09(水) 23:02:05
そもそも >>1 にあるやん
404デフォルトの名無しさん
垢版 |
2009/12/09(水) 23:12:58
ここも役に立つよ。
ttp://blog.livedoor.jp/addinbox/
2010/01/13(水) 11:10:06
>>394
初心者がOooのBasicを始めるきっかけにするには良い本と思う。

ネットの情報は辞書的なページが多いので、簡単なチュートリアルがあるので助かった。
ダイアログの作り方とか。

ただ内容的にCalｃに偏ってるし、標準関数とか全部記載していないので、
本に書いてあること以上のことをしようとするとネットに頼らざるを得ない。

どの言語の本でもそうだけど1冊だけで全て網羅するのは無理。

漏れ的には買って損はなかったよ。
2010/01/13(水) 12:11:33
本なんだからそれでいいんじゃないの
2010/01/13(水) 12:24:32
>>405
なんでPythonにしなかったの？
2010/01/13(水) 12:58:49
>>407　pythonならdteよりwebの方に良い情報がころがってるんじゃまいか？
2010/01/13(水) 12:59:17
OOo Basic で配列操作とか自前でやるの疲れるよな
2010/01/13(水) 13:34:08
PythonよりBasicの本の方が売れるでしょ
2010/01/14(木) 02:00:25
規制されてなかったらなんかマクロ書くわ
412デフォルトの名無しさん
垢版 |
2010/01/14(木) 22:19:57
次スレは「OpenOffice.org マクロ」とでもして、言語を問わずに。
2010/01/15(金) 00:06:23
まだ半分以上スレ残りあるんだが
2010/01/15(金) 07:47:58
まさか新スレ立てるなよ
2010/01/16(土) 00:24:08
次すれになるようにマクロ書くか
Sub RepositioningBookmaks
oDoc = ThisComponent
oText = oDoc.getText()
oBookmarks = oDoc.getBookmarks()

For i = 0 to oBookmarks.getCount() - 1 step 1
oMark = oBookmarks.getByIndex(i)
oAnchor = oMark.getAnchor()
If Len(oAnchor.getString()) > 1 Then
sName = oMark.getName()
oStartRange = oAnchor.getStart()

oNewMark = oDoc.createInstance("com.sun.star.text.Bookmark")
oNewMark.setName(sName)
oText.removeTextContent(oMark)
oText.insertTextContent(oStartRange, oNewMark, False)
End If
Next
End Sub
2010/01/16(土) 23:07:07
ユーザー定義のツールバー探すもの
Sub find_toolbar
sUIName = "Test1"

oFound = nothing
oLM = ThisComponent.getCurrentController().getFrame().LayoutManager
oElements = oLM.getElements()
For i = 0 To UBound(oElements) step 1
oItem = oElements(i)
If Mid(oItem.ResourceURL, 1, 40) = "private:resource/toolbar/custom_toolbar_" Then
If oItem.getSettings(False).UIName = sUIName Then
oFound = oItem
Exit For
End If
End If
Next
If NOT IsNull(oFound) Then
' do something
msgbox "found"
End If
End Sub
2010/01/18(月) 17:31:36
文字列検索ができません。
＊や％は使えるんですか？
2010/01/18(月) 17:43:31
InStr じゃ無理だな
2010/01/18(月) 19:00:34
ありがとうございます。
解決しました。
420デフォルトの名無しさん
垢版 |
2010/01/19(火) 20:41:01
>>415l-416 乙。どんどん頼みます。勉強になります。感謝します。
2010/01/25(月) 00:51:54
規制が解除されたからまた埋めようかと思ったけど書くことが思いつかん
2010/01/25(月) 17:45:13
Writerで文字の段落と挿入された画像のURLをテキストデータとして
出力する場合に文字の段落はプログラミングガイドにあるように
supportsService("com.sun.star.text.Paragraph")
で判断できるのですが、挿入された画像は
supportsService("com.sun.star.text.TextGraphicObject")
では判断できないのですが、使用法が違うのでしょうか？

それともcom.sun.star.graphicかcom.sun.star.drawingを使うのでしょうか？

あとハイパーリンクへのアクセスの仕方も良く分からない（T_T)

ヒント等があればお願いします。
2010/01/25(月) 20:42:16
段落から Contents Enumeration すると画像に相当するもんが見つからないから・・・
画像が埋め込みじゃなければ GraphicURL プロパティ
2010/01/26(火) 17:03:09
>>423
どうもです。
画像は埋め込みでないので画像のURLの情報を得ようとすると

Doc = ThisComponent
OG = Doc.getGraphicObjects
msgbox OG(0).GraphicURL

で画像のURLの情報にアクセすることは分かるのですが、
Writerに記載した順序でテキストデータに出力する場合は、
EnumerationのWhileループではできなさそうですね(＾＾;

APIのWikiは英語だしよく分からない(T_T

ググるとカーソル位置に画像を挿入するサンプルコードは見つかるんですけどねぇ
2010/01/26(火) 17:50:42
css.text.XTextRangeCompare インターフェース使って画像の Anchor と段落の位置関係は分かるけどな
2010/01/29(金) 10:59:56
>>425
>css.text.XTextRangeCompare
どうもです。調べてみます。
2010/02/14(日) 13:48:06
OpenOfficd.org3,2 起動時間がすごく短縮されている。
これは有り難い。

OracleによるSun買収でどうなるか心配していたけど、
今回は、まじめにやってくれたみたいね。
■ このスレッドは過去ログ倉庫に格納されています
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。
ニューススポーツなんでも実況