「Web出版サイト」ベータ公開

Q&A集[?]

当サイトでのご質問の受付は終了しました

すべてのコンテンツを読み込み専用としたため、回答欄からも投稿できません

Apache OpenOffice/LibreOfficeのご質問はそれぞれのフォーラムへご投稿ください

質問コーナー

サイト内検索

分類メニュー

関連サイト


本日:1
昨日:0
総数:1449
現在:3


ファイルのインポート

ページOpenOffice.org FAQの登録ページ
投稿者S-Osaka
分類
edit/refer
優先順位
edit/refer
状態
edit/refer
カテゴリー
edit/refer
投稿日2010-10-11 20:07:41 (月)
OSwin vista
依存するページ
バージョン
edit/refer

メッセージ

回答ページでは行末に「~」を付加する必要はありません

教えてください。
CSVデータを任意のシートに読み込みたいのでいろいろ探していて、下記のようなマクロを見つけました。
ところがこれで、CSVファイルを参照はできるのですが、シートへの書込みがわかりません。
このマクロをもとにそういうことができるのであれば是非その方法を教えてください。
よろしくお願いします。
なお、ファイルを開いて入れ子ループで列行のデータを記入する方法は知っています。
一括で呼び込みたいのです。

Filename = this_path & "test.csv"
 
 Dim Args(1) As New com.sun.star.beans.PropertyValue
 Args(0).Name = "FilterName"
 Args(0).Value = "Text - txt - csv (StarCalc)"
 
 Args(1).Name = "FilterOptions"
 Args(1).Value = "44,34,64,1,2/1/1/1/1"
 StarDesktop.loadComponentFromURL(ConvertToUrl(Filename), "defalt", 0, Args )

こちらは見ましたか?

Wanwano (2010-10-11 22:45:21 (月))

http://hermione.s41.xrea.com/pukiwiki/index.php?OOoBasic%2FCalc%2FFAQ#aba512fe

これですね ありがとう

S-Osaka (2010-10-12 08:25:47 (火))

これが、知りたかったです。
ありがとうございます。
ただ、日本語部分に文字化けがあるのですが、これは
sFilterOption = "44,34,76,1,"
あたりのパラメータで調整できるのでしょうか?

わかりました。

S-Osaka (2010-10-12 10:55:19 (火))

sFilterOption = "44,34,76,1,"
の部分がArgs(1).Value = "44,34,64,1,2/1/1/1/1"
に対応しているようですね。
文字化けは解決しました。

フィルタオプションの参考ページ

M.Kamataki (2010-10-12 11:13:32 (火))

はにゃ?さんのサイトにもあります。

http://hermione.s41.xrea.com/pukiwiki/index.php?OOoBasic%2FCalc%2FCSV#y4a5a403

また、公式に参照すべきは、以下のページになります。

http://wiki.services.openoffice.org/wiki/Documentation/DevGuide/Spreadsheets/Filter_Options

デベロッパーズガイド(DevGuide)最新版の日本語訳の話もあるんですが、SUNの古いものでも役立つと思うので、以下もご覧ください。

http://dlc.sun.com/pdf/819-1324/819-1324.pdf

607ページからがフィルタオプションの紹介ですが、Character Setの表はないですね。

なお、当ページは完了にします。

お名前:
題名: