accessで日付の連結を使って表示させる方法

このQ&Aのポイント
  • accessのフォーム内で日付を表示させる方法について詳しく教えてください。
  • 日付データを西暦日付型から三つに分けて表示させる方法を教えてください。
  • フォーム上で日付を変更してデータを更新する効率的な方法はありますか?
回答を見る
  • ベストアンサー

access 分かれた日付の連結について

accessで、連結を使って、フォーム内に、日付を表示させています。 元のデータは西暦日付date型です。 それを、 コンボ[平成22]年  テキスト[1]月 テキスト[2]日 と、三つに分けて表示させています。 連結の仕方は、format(day,"ggge") format(day,"m")というかんじで それぞれ表示させています。 日付の項目はたくさんあります。 これをそのままフォーム上で、月など、それぞれを変更して、データ更新させたいのですが、なにか方法はあるものなのでしょうか。 難しければ、updateをしようとおもっているのですが、なにか効率的な更新方法があればお教えいただきたく思います。 連結の仕方をかえるなどしてできれば、一番よいですが。

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

  • ベストアンサー
回答No.1

(1)元の日付型のデータを連結したコントロールを作る (2) (1)とは別に年、月、日のコントロールをそれぞれ連結せずに作る (3)レコード移動時のイベントで年、月、日の値をセット([年]=Format(...)みたいな感じ) (4)各コントロールの更新後などのイベントで、(2)のコントロールの値から日付型のデータを作り(1)のコントロールにセット のようにしてみてはいかがでしょうか。 (確認はしていませんが、もしかすると(1)は不要かも)

ownmart
質問者

お礼

1が不要でできました。 ダミーのコントロールソースは、結構よく使われるのですね。 ありがとうございます。

関連するQ&A

  • ACCESS2007連結している為編集できません

    こんばんは。 ACCESS2007で一つお聞きします。 フォームに時間を選択するコンボボックスを作成しました。 コントロールソースに =Format([テーブルの日付時刻項目],"hh")として 入力しようとすると、このコントロールは連結している為編集できませんの エラーになってしまいます。 テーブルの日付時刻項目は 2017/05/31 21:30という感じでデータが入っています。 この項目に時と分はコンボボックスで選択し 日付+時+分で編集し更新したいのです。 エラーの解消方法がわかる方、教えて頂けないでしょうか。 宜しくお願いします。

  • ACCESS2000;日付と曜日表示について

    ACCESS2000で本日の日付を曜日と一緒に表示することについて。 =date()やformatを使ってやってみたら出来るのですが、この場合、=と直結してしまうため、せっかく日付と曜日を表示できてもコンボボックスをいじれなくなってしまいました。私が作ろうとしている表示は     年    月    日    曜日 で、各テキストボックスに、このフォーマットを開いたら本日の表示が出る。しかし、変更も各、コンボボックスで可能(西暦以外)というものです。 ただ表示するだけではなく、変更も可能にしようと思えば、どうしたらよいでしょうか? ちなみにACCESSやプログラミングはまだ1週間という初心者です。 早急に業務で作らなければならなく、困っています。 お願いします。

  • Access 日付データのテーブル上での不具合

    Access 日付データのテーブル上での不具合 OS:Windows10 Access:2013 ⇒ Office365 お世話になっております。 現在クライアントのデータベースをクリーニングしております。 日付型フィールド(フィールド名:日付)に見た目上日付が入っているのですが、 連結フォーム上に表示するとデータによって不具合が生じます。 例) テーブル格納データ:2019/11/05 フォーム上のテキストデータ:令01年11月(フォーム上は和暦年月表示) 同じテキストボックス(表形式)なのに、クリックした時の反応がデータによって違います。 あるデータは「2019/11/05」に戻るのに対して不具合があるデータは「令01年11月」のままです。 テーブルで直修正をするとそのデータはクリック時に「2019/11/05」に戻ります。 見た目上は同じでも格納データは型が違うようです。 いちいち不具合のあるデータを探して手で修正するわけにもいかないで、検索して見つけた情報を基に コード等で変換をしているのですが、改善されません。 <試したこと> (1)更新クエリ format関数による変換(Format([日付],"yyyy/mm/dd")) (2)コードで変換   Dim h_date As String   Dim h_date_true As Date If Not IsNull([日付]) Then h_date = Left([日付], 4) & Mid$([日付], 6, 2) & Right([日付], 2) h_date_true = DateSerial(Left(h_date, 4), Mid(h_date, 5, 2), Right(h_date, 2)) h_date_true = CDate(Format(h_date_true, "@@@@\/@@\/@@")) End If   レコードセット![西暦] = h_date_true この連結フォーム上で修正フィールドのデータを更新する仕様です。 クエリやレコードセット等でデータをそろえるために何か良い方法はございますでしょうか。

  • Word2003 日付の書式書式ggge年M月について教えてください。

    日付の書式について思った通りの結果にならず、困っています。 あるテキストを使用して、フォームの作成をしています。 テキストボックスフォームで、日付の書式が異なる「日付」を2つ作る指示があります。 指示通りに作成し、作成後に入力をすると思い通りの結果が得られません。 下記に指示と結果を記します。 <テキストの指示> ※テキストボックスフォームフィールドを2箇所設定、各々のオプションで下記の設定を行うものです。 (1)種類「日付」、日付の書式「ggge年M月d日(aaa)」  ヘルプの追加でステータスバーに"半角で西暦下2桁/月/日を入力"と表示させる。 (2)種類「日付」、日付の書式「ggge年M月」  ヘルプの追加でステータスバーに"半角で西暦下2桁/月を入力"と表示させる。 <入力結果> (1)の箇所に"09/06/27"と入力すると、"平成21年6月27日"と思い通りの結果が表示されます。 (2)の箇所に"09/06"と入力すると、"平成21年9月"と表示されてしまいます。 (2)の箇所に"2009/06"と入力すると、"平成21年6月"と思い通りの結果が得られます。 "ggge年"は、西暦4桁で入力されるべきものなのでしょうか? テキストにあるヘルプの追加で表示させる"半角で西暦下2桁/月を入力"は正しいのでしょうか? どなたかご存知の方がいらっしゃいましたら教えてください。

  • ACCESS フォームの非連結の日付を参照したい

    ACCESS2010、WinXPの環境です。 受注データを参照したフォームから納品データに転記するフォーム(納品入力F)と追加クエリを作成しています。 非連結で作成した納品入力Fに、商品名、数量、日付とも、変更する可能性がある為、非連結の商品名、数量、日付のテキストボックスを作っています。 日付は、=DATE()で規定値に設定して コマンドボタンでプラスとマイナスで日付を前後できるようにしています。 追加クエリは、それぞれの非連結フィールドに 式1: [Forms]![納品入力F]![商品名]  式2: [Forms]![納品入力F]![数量]  式3 [Forms]![納品入力F]![日付]としています。 日付は、日付[S]型です。 これで追加クエリでデータシートをみると、数量や商品名は参照できていますが、 日付のみが空白になります。 ACCESS2000の時に作成した同じ方法(のつもり)でさくせいしたフォームと クエリでは、うまく参照してデータに転記できています。 何度か新規に作成して試したのですが、同じ内容となります。 原因や解決方法を教えてください。

  • ACCESS コンボボックス 日付入力VBA

    win10 office365 access365におきまして フォーム Fを開いて そのなかの非連結テキストが コンボボックスになっており そのコンボボックス名をcombo としますとき そこに規定の文字列 これは そのコンボボックスの選択文字列として あるもので たとえば、あかさ この文字列は コンボボックスを開くと 第1列に表示されます 一番左側です を入れたいとき Sub Sample() DoCmd.OpenForm "F", acNormal Form![F]!combo = "あかさ" end sub フォームFは当然開くのですが 非連結コンボボックス comboは 空白のままです Form![F]!combo = "あかさ" ここの部分を Form![F]!combo.column(0) = "あかさ" または Form![F]!combo.column(1) = "あかさ" としても 同様の結果となります ② もうひとつすみませんが テキストボックス コメントテキストに 本日の日付で 4月17日であれば 0417 と入れたいので Forms![F]![コメントテキスト] = Format(Now, mmdd) としますと 2024/04/17 13:02:59 と出てしまいます できるものなら 全角で 0417 と打ち出したいのですが、、 重ねて 恐縮ですが 御教示宜しくお願い致します

  • Accessの検索用フォーム

    Access初心者です。 テキスト学習をしていまして「フォーム」上で膨大なデータを、「検索用」にコンボボックスを作成して検索をかけることができる・・・とありました。 検索用のコンボボックスとして「日付」で検索をしたいと思うのですが、日付の表示方法を「カレンダー」のように表示することはできますか? また、設定の仕方を教えていただけると助かります。 よろしくお願いいたします。

  • ACCESSの日付け型

    日付け型のフォーマットの設定とかはあるんでしょうか? 僕のクライアントの日付型は2002/02/22のように西暦を4桁で表示することができるのですが、あるクライアントのACCESSは02/02/22のようにレコードに西暦を2桁しか表示しません。4けたに統一する方法はありますか? デザインビューの書式設定をいじりましたがyy/mm/ddのようになっていました。

  • Access 2003 日付の表示について

    クエリ作成にて 集計する→日付をグループ化する→月を選択しました。 日付 を月でグループ化: Format$([テーブル1].[日付],'mmmm yyyy') となり、表示が February 2010となります。 これを平成22年 2月と表示したいのですが、mmmm yyyyをggge年 m月と変更すると、クエリ式'(Sumテーブル1.量1)'の構文エラー:演算子がありません。となり変更できません。 テーブル構造は フィールド名  データ型 id オートナンバー 日付      日付/時刻型 機械番号    数値型 材質      テキスト型 量1      数値型 量2      数値型 情報が不足していれば追記いたします。

  • Access97での日付の書式

    Access97で作ったシステムをWindows2000のパソコン上で利用しています。その場合、日付の書式設定にggge"年"m"月"d"日"を設定すると和暦の"平成13年7月23日"とうまく表示されません。Windows98のパソコン上では表示ができます。過去の質問を拝見させて頂いて、【コントロールパネル】の【地域のオプション】の設定の影響かと思い、いろいろ試してみましたが、うまくいきません。とりあえず、format関数等を使わずに、書式で和暦"平成13年7月23日"と表示する方法がありましたら、教えてください。ちなみに、ggge"年"m"月"d"日"で設定をしてデータシートビューに切り替えると書式が勝手に次のように変更されてしまいます。→ ggge\m"月"\d"月" OSのバージョンによって異なるのでしょうか??よろしくお願いいたします。

専門家に質問してみよう