• ベストアンサー

AccessデータのWORDブックマークへの差込

Access 2010のデータ(資本金)をWORD2010のブックマーク(Money)に差し込むマクロを作成し、うまく稼動しました。 その箇所は次のとおり記述しています .Item("Money").Range.Text = Me!Form![資本金].Value アクセスの書式では、テーブル・クエリー・フォームともカンマ形式で表示の設定をしているのですが、差し込んだWORDでは、カンマ書式で表示されません カンマ形式で表示させるために、WORD側でなんらか手を加えたほうがいいのか、ACESS側で手を加えたほうがいいのか教えていただけますでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.3

>やはりデバッグ画面になります 何かしらのエラーメッセージが出てませんかね。 Me.Parent!資本金.text とか Format(Me.Parent!資本金,"#,##0") で。

oraho
質問者

お礼

自己回答ですみません おかげさまで解決しました。コントロールのTEXTとVALUEの意味を理解していませんでした。 Dim Adate As String '入力日を変数設定します Me![F_SUB].Form!.[入力日].SetFocus Adate = Me![F34_CHG-InvAppBul].Form!.[入力日].Text .Item("DatEntry").Range.Text = Adate 上記で作動しました! 大変参考になり、ありがとうございます

oraho
質問者

補足

ありがとうございます 表示を変えたいものは(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がでます  コントロールがフォーカスを取得していない時に、   コントロールのプロパティまたはメソッドを参照することはできません。

その他の回答 (2)

  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.2

肝心なところを見逃していたかも メインフォーム上に『資本金』コントロールがあるのですよね? また、フォームは単票形式ですか? なら、Me![資本金].Text では?

oraho
質問者

補足

はい、メインフォーム上に資本金コントロールがあります ただマクロではサブフォームから読み取るようにしていますので、Formを入れています メインフォームは単表形式で、サブフォームはデータシート形式です Me![資本金].Textを試しましたが、やはりデバッグ画面になります

  • nicotinism
  • ベストアンサー率70% (1019/1452)
回答No.1

試したわけではありませんが、Value ではなく Text で渡したら? .Item("Money").Range.Text = Me!Form![資本金].text

oraho
質問者

補足

早速ありがとうございます .valueを.textに変えると、デバッガー画面になりますので、.textは有効でないようです また、.valueを削除し、何も入れないとデバッガー画面はあらわれず、最後まで処理されました

関連するQ&A