JustAnswer のしくみ:
  • 専門家に質問
    知識豊富な専門家があらゆる質問にお答えするために常に待機しています。
  • 専門家が丁寧に対応
    E メールやサイト内オンラインメッセージなど、さまざまな手段で回答を通知。
    必要に応じてフォローアップの質問をすることもできます。
  • 満足度 100% 保証
    専門家からの回答を確認し評価をすることで、支払うかどうかを決めます。
DKK2002に今すぐ質問する
DKK2002
DKK2002, ITエンジニア
カテゴリ: IT・インターネット
満足したユーザー: 6142
経験:  NTTコミュニケーションズ .com Master★★
60772406
ここに IT・インターネット に関する質問を入力してください。
DKK2002がオンラインで質問受付中

自作の会計簿付き日記帳を作成しました。フォームを開くと 1月1日が表示されるので 今までは順送りで当日のフォームまで

質問者の質問

自作の会計簿付き日記帳を作成しました。フォームを開くと 1月1日が表示されるので 今までは順送りで当日のフォームまで送っていましたが、 最終記入日のフォーム画面で終了できれば 次の日の記入が楽です。
どこに どのようにコマンドを記入すればよいのか教えて下さい
アクセスのマクロは全く使ったことはないのです よろしく
投稿: 6 年 前.
カテゴリ: IT・インターネット
専門家:  DKK2002 返答済み 6 年 前.
ご質問をありがとうございます。

アクセスに関しての回答をするには,いただいている情報が少なすぎるのですが,基本的にはフォームをデザインビューで開き,日付を入力するテキストボックスのプロパティを開き,規定値の部分に「=Date()」と入力しておけば,新しくフォームを開いたときに今日の日付が入力されます。

最終記入日の日付でどうしても開くようにしたいと思われるなら,少し細工が必要になりますが,アクセスの使い方に少し慣れられてからの方が良いかと思われます。
DKK2002をはじめその他名のIT・インターネットカテゴリの専門家が質問受付中
質問者: 返答済み 6 年 前.

ありがとうございます 最終記入日の日付で開きたいのです。

フォームのフォームデザインビューで プロパテーの レコード移動時のビルダをクリック 

Praiveate sub_Cuvrent の次に DoCmd.GToRecord..acLast と打ち込むと

「エラーが発生しました ネットワークの接続が切断されている可能性があります」とのメッセージが出ます

この辺までの知識ですが これくらいの知識で わかるように説明していただければありがたいです 

質問者: 返答済み 6 年 前.

ありがとうございます 最終記入日の日付で開きたいのです。

フォームのフォームデザインビューで プロパテーの レコード移動時のビルダをクリック 

Praiveate sub_Cuvrent の次に DoCmd.GToRecord..acLast と打ち込むと

「エラーが発生しました ネットワークの接続が切断されている可能性があります」とのメッセージが出ます

この辺までの知識ですが これくらいの知識で わかるように説明していただければありがたいです 

専門家:  DKK2002 返答済み 6 年 前.
先に回答の承諾をいただいたようで恐縮です。ありがとうございます。

「レコード移動時」のイベントに設定されたようですが,フォームを開くときに最終レコードで開きたいとのことですので,「開く時」のイベントに設定する必要があると思われます。

下記ページなどを御参考になさってみてください。

http://www.accessclub.jp/bbs3/0059/superbeg22675.html

アクセスのVBAはなかなか奥が深いので,ガイドブックも数冊手元にご用意なさると役立つと思われます。
質問者: 返答済み 6 年 前.

了解しました  開く時のイベントプロージャーに次のように打ち込み保存しました

 PrivateSubForm_Open(CancelAsIntger)

DoCmd.GoToRecord,,acLast

EndSub

ですが フォーム表示されなくなりフォームがが開けなくなるのです

どこにまちがいがあるのでしょうか?

質問者: 返答済み 6 年 前.

了解しました  開く時のイベントプロージャーに次のように打ち込み保存しました

 PrivateSubForm_Open(CancelAsIntger)

DoCmd.GoToRecord,,acLast

EndSub

ですが フォーム表示されなくなりフォームがが開けなくなるのです

どこにまちがいがあるのでしょうか?

質問者: 返答済み 6 年 前.

了解しました  開く時のイベントプロージャーに次のように打ち込み保存しました

 PrivateSubForm_Open(CancelAsIntger)

DoCmd.GoToRecord,,acLast

EndSub

ですが フォーム表示されなくなりフォームがが開けなくなるのです

どこにまちがいがあるのでしょうか?

質問者: 返答済み 6 年 前.

了解しました  開く時のイベントプロージャーに次のように打ち込み保存しました

 PrivateSubForm_Open(CancelAsIntger)

DoCmd.GoToRecord,,acLast

EndSub

ですが フォーム表示されなくなりフォームがが開けなくなるのです

どこにまちがいがあるのでしょうか?

質問者: 返答済み 6 年 前.

了解しました  開く時のイベントプロージャーに次のように打ち込み保存しました

 PrivateSubForm_Open(CancelAsIntger)

DoCmd.GoToRecord,,acLast

EndSub

ですが フォーム表示されなくなりフォームがが開けなくなるのです

どこにまちがいがあるのでしょうか?

質問者: 返答済み 6 年 前.

了解しました  開く時のイベントプロージャーに次のように打ち込み保存しました

 PrivateSubForm_Open(CancelAsIntger)

DoCmd.GoToRecord,,acLast

EndSub

ですが フォーム表示されなくなりフォームがが開けなくなるのです

どこにまちがいがあるのでしょうか?

専門家:  DKK2002 返答済み 6 年 前.
ご案内させていただいたWEBページもご覧いただいたことだと思います。

今回は,一般的な手法としてご案内をさせていただきました。行なってくださっているのは,ご案内させていただいたWEBページにも紹介されていた手段です。

アクセスのエラーには,多くの要因が関係しています。フォームだけの要因だけでなく,テーブル構造やテーブル内のデータ,クエリー,フォームに含まれる他の要素など,恐らくこの質問欄に文章としてご開示をお願いすることは難しいほどたくさんあると思われます。

ですので,いただいている情報だけでは解決策をご提示させていただくのは難しいと思われます。実際にそのデータベースのファイル自体を解析しない事には完全な回答は不可能です。

これからも多くのエラーに遭遇すると思われますので,書籍やWEBページの情報を参考になさりながら,エラーをつぶしてゆくことを学ばれてください。

専門家:  DKK2002 返答済み 6 年 前.
ご案内させていただいたWEBページもご覧いただいたことだと思います。

今回は,一般的な手法としてご案内をさせていただきました。行なってくださっているのは,ご案内させていただいたWEBページにも紹介されていた手段です。

アクセスのエラーには,多くの要因が関係しています。フォームだけの要因だけでなく,テーブル構造やテーブル内のデータ,クエリー,フォームに含まれる他の要素など,恐らくこの質問欄に文章としてご開示をお願いすることは難しいほどたくさんあると思われます。

ですので,いただいている情報だけでは解決策をご提示させていただくのは難しいと思われます。実際にそのデータベースのファイル自体を解析しない事には完全な回答は不可能です。

これからも多くのエラーに遭遇すると思われますので,書籍やWEBページの情報を参考になさりながら,エラーをつぶしてゆくことを学ばれてください。

いわゆる「バグ潰し」という作業は非常に骨の折れる作業です。「,」が一つ多かったり少なかったり,「()」や「"」,「'」の入れ方だけでも結果が異なりますし,コマンドも一文字違うだけでもエラーが出ますので,それらをさがしてゆくのは,時間をかけて慣れてゆかれるしかないと思われます。

また,もしファイルをお送りいただいたとしても,PCの環境によっても結果が異なるということがアクセスには起こり得ます。こちらでファイルを直して送っても,そちらではエラーが出るということも起こるものですので,アクセスの性質上これは仕方のないことだとご理解願います。

WEBの情報や書籍の情報も,一般的な解としてのみ紹介されています。後はご自身で解決なさってください。

IT・インターネット についての関連する質問