Access VBA質問箱 IV

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

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


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

5193 / 9994

←次へ　｜　前へ→


	【8030】エクスポート処理時の条件範囲

あくせーす - 06/6/23(金) 0:00 -


	引用なし

	パスワード

エクスポートについて、以下の条件はどうすれば良いでしょうか。

エクスポートさせたくないフィールド：Password、個人情報にかかわるフィールド、etc
エクスポート処理について、[連休番号]フィールドが一番大きい数字40となっている
すべてのレコードと、エクスポートさせたくないフィールドを除くフィールドを
エクスポートしたいんですが、どのようなプログラムで
指定するのでしょうか・・？

連休番号　連休　　User　　Password　・・・(略)
20　　　　秋休み　A　　　 ***
20　　　　秋休み　B　　　 ***
20　　　　秋休み　C　　　 ***
30　　　　春休み　A　　　 ***
30　　　　春休み　B　　　 ***
30　　　　春休み　C　　　 ***
30　　　　春休み　D　　　 ***
40　　　　夏休み　A　　　 ***
40　　　　夏休み　B　　　 ***
40　　　　夏休み　C　　　 ***
40　　　　夏休み　D　　　 ***
40　　　　夏休み　E　　　 ***
40　　　　夏休み　F　　　 ***
40　　　　夏休み　G　　　 ***

とする。

エクスポートすると、
連休番号　連休　　User ・・・エクスポートしたいフィールド名
40　　　　夏休み　A
40　　　　夏休み　B
40　　　　夏休み　C
40　　　　夏休み　D
40　　　　夏休み　E
40　　　　夏休み　F
40　　　　夏休み　G

となる。

連休番号50を追加場合は、50を入れているレコード全部と、不要なフィールドを
除いたフィールドをエクスポートさせる。

単純にすべてのデータをエクスポートする場合は、TransferSpreadsheetをつかって、
エクスポート先(ExcelVar)、クエリ名(Q_Name)を使えば問題はないですが、上記条件の
場合はどのようにして行うのでしょうか？
すいませんが、どなたか分かる方、教えて下さい。

　　If MsgBox(Massage, vbOKCancel, "確認") = vbOK Then
　　　 '最初のデータをフィールド名として使う。
　　　　DoCmd.TransferSpreadsheet acExport, _
　　　　　　　　　　acSpreadsheetTypeExcel9, Q_Name, ExcelVar, True
　　　　MsgBox "データ出力は、正常に完了しました。", , "完了"
　　End If

358 hits

▼

【8030】エクスポート処理時の条件範囲 あくせーす 06/6/23(金) 0:00

≪