スキルアップ・問題解決なら、モーグにおまかせ！

お世話になります。
 
いつも、困るとお願いしてすみませんが教えてください。
 
クエリで、結合した値をコピーして他のソフトにその値をペーストしたいのですが、ネットで探してもマクロの例などが見つからなくて困ってます。
 
マウスでドラッグして、右クリックでコピーしてもできますが、できたらボタンをクリックしたらコピーして値を取得して、他のソフトでは右クリックのペーストかControl+Vでペーストできるようにしたいのです。
 
　おこないたい動作
 
　1　ボタンをクリックすると、特定のフィールドの値をコピーする
　　　　＊クエリで、計算した値などと複数のフィールドの値を結合した値です。
 
　2　他のソフトの入力欄に、ショートカットキーか右クリックでペースト
 
 
以上です。
 
 
他のフィールドに値を複製する様なマクロ例はあったのですが、コピーが見つからずに甘えてすみません。
 
よろしくお願いいたします。
 

yurappy さんの引用:

　おこないたい動作
 
　1　ボタンをクリックすると、特定のフィールドの値をコピーする
　　　　＊クエリで、計算した値などと複数のフィールドの値を結合した値です。
 
　2　他のソフトの入力欄に、ショートカットキーか右クリックでペースト

hatenaさま
 
お世話になります。
ご親切にありがとうございます。
 
説明不足で申し訳ございません。
 
 

引用:
クエリ上にボタンを配置することはできないので、クエリをレコードソースとするフォームか、非連結フォームにサブフォームとしてクエリを埋め込む形なるとは思います。

yurappy さんの引用:

ボタンは、フォーム上に設けたいです。
フォームは単票でサブフォームはありません。
フhttps://www.moug.net/ォームのレコードソースは、コピーしたいフィールドを含むクエリです。

Private Sub コマンド1_Click()
    Me.テキストボックス名.SetFocus
    DoCmd.RunCommand acCmdCopy
End Sub

hatenaさま
 
お世話になります。
助けていただいて、ありがとうございます。
 
教えていただいたコードで思うようにコピーして動作しました。
 
クエリで結合したとおりの結果にきちんとコピーできてとても助かりました。
 
いつも、助けてくださって大変ありがとうございます。
 
教わる度に、VBAの奥深さと機能の豊富さに驚かされて、勉強不足を感じてお恥ずかしいです。
 
とても嬉しく、ほんとうにありがとうございました。
 
いつも、ご親切にしていただいてありがとうございます。
 
また困った時には助けてください。
 
ありがとうございました。
 
よろしくお願いいたします。