こちら初心者でアクセスをなんとか使用しているものです。
現在、会社で使用しているアクセスのマクロについてどなたかご教示ください。
1.現在、前任者が作成したマクロを使用して、インポートしたDBを重複クエリでチェックを行っています。今の仕様だと重複があってもなくても「OKダイアログ」と「DBのフォーマット」が表示されます。出来れば、重複があった時に「エラーダイアログ」と重複DBを画面に表示し、重複がなかった時は「OKダイアログ」のみを表示したいと思っていますが、初心者なもので、今使用しているマクロを改修しながらバージョンアップしてる状況です。他に良い方法がありましたら教えてください。
2.前質問につながりますが、テキストファイル等をインポートする時にパスとファイ名をマクロで指定しますが、この時にオプションかなにかで
ファイル情報の日付をチェックしたいのです。インポート当日にインポートファイルが当日でない時があり古いファイルのままインポートを行なってしまい重複が発生してしまいますので良い対策方法と思いこのような方法はどうかと思いましたが他に良い方法がありましたら教えてください。
No.2
- 回答日時:
まず、「重複があったらそのレコード、無ければ0行」になるクエリを作成します。
(つまり、そのクエリを開いて1件もデータが無ければ重複無しとなるクエリです。)マクロの条件に
DCount("*","作ったクエリ") = 0
アクションにメッセージボックス「OK」と設定します。
次の行に
DCount("*","作ったクエリ") > 0
メッセージボックス「NG」と設定します。
これで重複が無いときにNGを出すことが出来ると思います。
あとはこれを応用して「データインデックスとデータ内容」を表示すればいいと思います。
また、ファイルの更新日をマクロで知る方法は残念ながら私にはわかりません。
この回答への補足
早期回答有難うございます。
たびたびすいません、回答にある「DCount("*","作ったクエリ") = 0」は具体的にどこに入力(記述)すればよいのでしょうか。クエリそれともマクロに記述すればよいですか?マクロの「アクション」項目で試したらエラーとなりました。。。。回答お願いします!!
No.1
- 回答日時:
1.それだけではアドバイスのしようがありません。
そのマクロが何をしているのかがわからないと何とも言えません。それを流用したいなら、その内容を。改めてそのチェック機能を作りたいならチェック内容をまとめてみるといいでしょう。
2.VBAが使えるなら以下のコードでファイルの最終更新日を確認できます。
Set fs = CreateObject("Scripting.FileSystemObject")
Set fo = fs.GetFile("c:\MSDOS.SYS")
MsgBox fo.DateLastModified
"c:\MSDOS.SYS"の部分をチェックするファイル名にすればいいでしょう。
この回答への補足
質問内容が分かりにくくてすいません。(素人なので許してください。)
1.マクロの内容ですが、まずC:\サブファイル.TXT(毎日更新される)をMDBにあるマスターデータに、追加インポートします。インポート終了後、マスターデータを重複クエリでチェックを行ないます(あるキーと対象に)。クエリ実行後、重複があった時でも、無かった時でも「OK」と「データインデックスとデータ内容」が表示されます。重複が無かった時は、「OK」だけ、重複があった時は「NG」と「データインデックスとデータ内容」を表示したいのですが、、、、、?こんな感じでわかりますかね!
2.VBAは難しいのでマクロのセッティングや記述などで作成を考えていますのでご回答はありがたいのですが現実ちょっと難しいです。
以上
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) CSVファイルがカンマ区切りにならない。対処法を教えていただきたいです。 仕事でSMS一斉送信ができ 2 2022/07/01 21:24
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/06 17:46
- Access(アクセス) スキルシートのエクセルの項目に 2 2023/04/04 22:41
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) VBA アドインについて お詳しい方 ご教授をお願いします。 相談事項 現在以下の対応を実施した所、 1 2022/11/02 16:53
- Access(アクセス) Accessにインポートした複数のテーブルを表示させる方法が分かりません。 1 2023/01/30 20:22
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
- Excel(エクセル) 【Excel】指定した文字列に該当する行を重複しないようにリスト 3 2022/03/30 12:27
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/08/10 11:34
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2023/01/20 14:36
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル終了時の保存確認メッ...
-
excelファイルに使われているVB...
-
Excelマクロ ファイル名が変わ...
-
Excelからnotesメールを自動で...
-
VBA マクロ実行時エラー’1004Ra...
-
VBAを一度起動するとずっと出て...
-
別のパソコンでエクセルのマク...
-
マクロを消すマクロは不可能?
-
マクロを設定したのに、拡張子...
-
コピーしたファイルのマクロを...
-
ワードを開いた時にメッセージ...
-
エクセルでマクロを別のPCで利...
-
昨日まで動いていたエクセルの...
-
VBAで他のBOOKを開いた時に表示...
-
excelでpersonal.xlsを常に開く...
-
エクセルマクロにてパワーポイ...
-
Excel のマクロを常に有効にで...
-
エクセルのマクロを使ったファ...
-
アクセスからエクセルファイル...
-
Excelが勝手にシート移動してし...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセル終了時の保存確認メッ...
-
VBA マクロ実行時エラー’1004Ra...
-
VBAを一度起動するとずっと出て...
-
別のパソコンでエクセルのマク...
-
コピーしたファイルのマクロを...
-
マクロを消すマクロは不可能?
-
昨日まで動いていたエクセルの...
-
エクセルファイルを自身のファ...
-
エクセル2013vbaで、見えない名...
-
Excelマクロ ファイル名が変わ...
-
エクセルマクロ実行中に別ファ...
-
excelファイルに使われているVB...
-
Excelが勝手にシート移動してし...
-
Word用のマクロが急に働かなく...
-
EXCEL マクロ クリップボードク...
-
【マクロ】エラーが発生⇒実行時...
-
excelが別プロセスで起動してし...
-
エクセルマクロを有効にしない...
-
アクセスでファイルを開いたと...
-
excelでpersonal.xlsを常に開く...
おすすめ情報