Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

5726 / 9994

←次へ　｜　前へ→


	【7482】Re:クエリの重複情報をクエリに出力したい

Gin_II - 06/3/10(金) 15:40 -


	引用なし

	パスワード

>もしこのコードをモジュールのＶＢコードに訳す場合は、どのようなコードに
>なるのでしょうか？

VBAで、どのように使うのでしょうか？
DAO の Recordset としたいのなら、

Dim strSql As String
Dim rst As DAO.Recordset

strSql = "SELECT Report.発注コード, Report.商品名, Report.管理, Report.単位, Report.合計 " _
　　　 & "FROM Report " _
　　　 & "WHERE (((Report.発注コード) " _
　　　 & "In (SELECT [発注コード] FROM [Report] As Tmp GROUP BY [発注コード] HAVING Count(*)>1 ))) " _
　　　 & "ORDER BY Report.発注コード;"

Set rst = Currentdb.OpenRecordset(strSql)

とか。

288 hits

▼

【7476】クエリの重複情報をクエリに出力したい Hg-0310 06/3/10(金) 11:47