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

Q&A集[?]

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

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

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

質問コーナー

サイト内検索

分類メニュー

関連サイト


本日:1
昨日:0
総数:2562
現在:4


読み込んだフォームの日付データ部分に標準で今日の日付をつける

ページOpenOffice.org FAQの登録ページ
投稿者saiki
分類
edit/refer
優先順位
edit/refer
状態
edit/refer
カテゴリー
edit/refer
投稿日2010-09-09 06:49:38 (木)
OSUbuntu
依存するページfaq/4/1525
バージョン
edit/refer

メッセージ

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

MSOfficeのAccsessの感覚で、常に日付に自動的に今日の日付が入っているというのが、フォームのコントロールにある標準の日付に、Today()と書いても動かないそうで、マクロを書いてみようと、見よう見まねで作ってみました。

Sub Main
Dim oRowSet as Object
Dim oDate As New com.sun.star.util.Date
oRowSet.updateDate( oRowSet.findColumn( "登録日dat" ), oDate)
End Sub


このメインマクロをフォームの読み込み時に実行するように設定したのですが、 オブジェクト変数が設定できていないと言われています。

Dimが宣言するところなんだろうなとは思うのですが、どうしたらいいのかわからないです。

マクロってどうやって勉強したらいいんでしょうか?

取り組み始めて数ヶ月、このAcsessだったら超簡単なことができないだけでOpen Officeの敷居の高さを感じてしまい、ついついやっぱりaccessばかりで作っています。

最近buntuにはまり、やはり時代はオープンソースだと元気を出して再挑戦中です。


Baseは潜在能力はあるんですが…マクロ云々

ike@九州 (2010-09-09 10:11:32 (木))

MainForm のイベント "リセット後" に割り当てます
(新規入力フォーム時のみの動作)

Sub MainForm(oEvent)
 
 Dim oForm as Object
 Dim oDate As New com.sun.star.util.Date

 oForm = oEvent.Source
 oDate.Year = Year(Now())
 oDate.Month = Month(Now())
 oDate.Day = Day(Now())
 
 On Error Goto ErrorHandler
 
 '参照テーブルのカラム名が"登録日"の場合
 oForm.updateDate( oForm.findColumn( "登録日" ), oDate)
 
 ErrorHandler:
End Sub


表示書式はフォームの編集から"登録日dat"のプロパティで変更してください。

やりました!動きました。

saiki (2010-09-09 13:11:12 (木))

朝からメインのパソコンにブルーのストップエラーが出てしまい、くよくよしてもしかたないと、小さいミニノートのubuntuでbaseのマクロをいじって勉強しておりました。
今メインのパソコンのchkdskをながめつつ、すべて起こることはいいことだとしみじみと思っております。

これをヒントに、これから体で覚えていきたいと思います。
ありがとうございました。 いっきにbaseに対するやる気が出ました。

oFormとか、オープンオフィスのフォームという意味なんでしょうかね?
実は細かいことが気になって前に進めないA型さそり座ADHDなんで、こういったことからきちんと学びたいのですが、どこかおすすめのサイトとか、本とかないでしょうか?

自分で勉強したいのですが、いったいどこから勉強したらいいのかわかりません。

oFormの意味

M.Kamataki (2010-09-12 11:24:05 (日))

>oFormとか、オープンオフィスのフォームという意味なんでしょうかね?

オブジェクト型の変数なので、頭に小文字の「o」を付加しているのでしょう。OpenOffice.org以外のアプリケーションでも同じような変数名を見るので、少なくともOpenOffice.orgの「o」ではないのでは。

このような変数名の付け方というのはOpenOffice.orgに限らないので、プログラミングの本などでないでしょうかね。本ページは「完了」にしていますが、情報がある方がいらしたら、情報をお寄せください。

お名前:
題名: