- ベストアンサー
AccessデータのWORDブックマークへの差込
Access 2010のデータ(資本金)をWORD2010のブックマーク(Money)に差し込むマクロを作成し、うまく稼動しました。 その箇所は次のとおり記述しています .Item("Money").Range.Text = Me!Form![資本金].Value アクセスの書式では、テーブル・クエリー・フォームともカンマ形式で表示の設定をしているのですが、差し込んだWORDでは、カンマ書式で表示されません カンマ形式で表示させるために、WORD側でなんらか手を加えたほうがいいのか、ACESS側で手を加えたほうがいいのか教えていただけますでしょうか?
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
>やはりデバッグ画面になります 何かしらのエラーメッセージが出てませんかね。 Me.Parent!資本金.text とか Format(Me.Parent!資本金,"#,##0") で。
その他の回答 (2)
- nicotinism
- ベストアンサー率70% (1019/1452)
肝心なところを見逃していたかも メインフォーム上に『資本金』コントロールがあるのですよね? また、フォームは単票形式ですか? なら、Me![資本金].Text では?
補足
はい、メインフォーム上に資本金コントロールがあります ただマクロではサブフォームから読み取るようにしていますので、Formを入れています メインフォームは単表形式で、サブフォームはデータシート形式です Me![資本金].Textを試しましたが、やはりデバッグ画面になります
- nicotinism
- ベストアンサー率70% (1019/1452)
試したわけではありませんが、Value ではなく Text で渡したら? .Item("Money").Range.Text = Me!Form![資本金].text
補足
早速ありがとうございます .valueを.textに変えると、デバッガー画面になりますので、.textは有効でないようです また、.valueを削除し、何も入れないとデバッガー画面はあらわれず、最後まで処理されました
お礼
自己回答ですみません おかげさまで解決しました。コントロールのTEXTとVALUEの意味を理解していませんでした。 Dim Adate As String '入力日を変数設定します Me![F_SUB].Form!.[入力日].SetFocus Adate = Me![F34_CHG-InvAppBul].Form!.[入力日].Text .Item("DatEntry").Range.Text = Adate 上記で作動しました! 大変参考になり、ありがとうございます
補足
ありがとうございます 表示を変えたいものは(1)数字のカンマ形式と(2)日付の表示形式(2012/9/7ではなく7 September 2012と表示させたい)です 数字の箇所ではメインフォーム、サブフォームともカンマありで表示させています 日付の箇所ではメインフォーム、サブフォームとも7 September 2012と表示させています マクロの記述を下記のとおりにしたところエラーはおきませんが、WORDの表示も変わりませんでした Me![F_SUB].Form!.[入力日].Format = "d mmmm yyyy" .Item("DatEntry").Range.Text = Me![F_SUB].Form![入力日].Value 二行目の.Valueを.Textにすると実行時エラー2185がでます コントロールがフォーカスを取得していない時に、 コントロールのプロパティまたはメソッドを参照することはできません。