今「スタッフ一覧.accdb」というAccessのファイルがあります。
https://f.hatena.ne.jp/moon-fondu/20191210190745
上記URLのように、「スタッフ番号」「勤務地」「名前」などの情報で構成されています。
このテーブルから情報を抜き出しまして。
https://f.hatena.ne.jp/moon-fondu/20191210190749
のようなデータが並ぶExcelファイル「スタッフ情報改訂版.xlsx」として、データを出力したいのです。
B列の各セルは、Accessのテーブルにある「勤務地」「名前」列のデータを引っ張り、
--------------
「勤務地」のデータ＋改行＋"("＋「名前」のデータ＋")"
--------------
という文字列で構成されます。
単にデータを出すだけなら、Accessの「外部データ」タブから簡単にできるとは思います。
データを出力した後で、データを編集するという手もあるかと思いますが…。
Access上で何らかのVBAやSQLを書いて出さなければいけない状況です。
お力添えいただけますとありがたいです。
よろしくお願い致します。
No.1
317
115
1500pt
テスト結果(動画の途中からですが)、
https://youtu.be/x_EB5ZiH4sQ?t=454
↑こんな感じの操作で良ければ。
Accessクエリーのフィールドに一つ
連結テスト : [勤務地] & chr(13) & chr(10) & "(" & [名前] & ")"
上記の式を追加します
vbcrlfで改行させ AccessのクエリーをExcelへエクスポートするテスト 演算フィールドで連結列を作り 間をvbcrlfで改行
1.演算フィールドを作ると、フィールドを連結させられるので、
xxx: [フィールド] & [フィールド]
の式を作成する
2.改行させたいので vbcrlf と改行コードを付ける
xxx: [フィールド] & vbcrlf & [フィールド]
※vbcrlfがエラーになってしまったので、
chr(13) & chr(10)で代用しました。
連結テスト : [勤務地] & chr(13) & chr(10) & "(" & [名前] & ")"
3.Accessの機能 外部データを使用して Excelへ出力してみる
書式を保存でエクスポートすると、改行付で無事に出力されました
※↑ここは、確認が必要ですね・・
https://youtu.be/x_EB5ZiH4sQ
↑動画頭から試行錯誤※操作ミスを笑ってください
Excelへの出力処理の参考となれば幸いです。
(解決の糸口となれば・・・)
2
236
235
ミスの多い操作動画が参考になったみたいで、安心しました。
2019/12/11 22:17:20Accessの操作系は私も知らないことが多くて、
Shift+F2でズーム や Ctrl+F2で式を編集するところなどは、
数年前に、若いチームメンバーに
「なんで狭い所に入力してるんですか？Shift+F2でズームしますよ」
など、他の人から便利な操作を教わりました。
クエリーの式(演算フィールドで)
XXXXX: 計算式
XXXXX: [フィールド] & [フィールド]
XXXXX: Left([フィールド], 9) ←VBAの標準関数を呼んだり
いろいろと使えるので
google:クエリ 演算フィールド
や
google:access 式ビルダ
などをキーワードに探って、
自分のもの(技術)としてください。
ベストアンサーありがとう
へのコメント返信なのに長くなりすぎたので
この辺で失礼します ぉぃぉぃ
※お礼のコメントうれしかったです。
ken3memoさん色々ありがとうございます！Shift+F2、Ctrl+F2、使ってみます(^^;)
2019/12/18 07:43:31