フォームのテキストボックスの内容をボタンをクリックしてコピー

Accessでフォームのテキストボックスの内容を、コマンドボタンをクリックしてクリップボードにコピーする方法です。他のアプリケーションにテキストボックスの内容を貼り付けたい時などに便利です。

参考ここでは、オブジェクトの表示は［タブ付きドキュメント］の設定にしています。

フォームの作成

サンプルとして［T_社員］というテーブルがあります。

下の画像はテーブル［T_社員］のデザインビューです。

クエリウィザードを使用してクエリの作成

フィールドを選択してクエリを作成します。

ここでは、クエリウィザードを使います。

［作成］タブの［クエリ］グループにある［クエリウィザード］をクリックします。

以下の［新しいクエリ］ウィンドウで［選択クエリウィザード］を選択して［OK］ボタンをクリックします。

次のウィザードで、［テーブル/クエリ］の▼ボタンをクリックして、目的のテーブルを選択します。

必要なフィールドを選択します。左の［選択可能なフィールド］からフィールドを選択して、中央の［＞］を押して、右の［選択したフィールド］へ移動させます。

［次へ］のボタンをクリックします。

クエリに名前を付けます。

［クエリを実行して結果を表示する］を選択して、［完了］ボタンをクリックします。

完成したクエリを確認します。クエリは閉じておきます。

以下のクエリで分かるとおり、サンプルでは［備考］フィールドが空のレコードもあります。

単票フォームの作成

作成したクエリ［Q_社員］を選択して、［作成］タブの［フォーム］グループの［フォーム］をクリックします。

以下のように単票フォームが作成され、［レイアウトビュー］で表示されます。

ヘッダーのラベルやコントロールの大きさを調整して、フォームに名前を付けて保存します。ここでは［F_社員情報］とします。

参考コントロールのグループ化を解除する方法については、以下の記事で解説しています。

テキストボックス内の改行について

ここでの［備考］フィールドは、データ型が［長いテキスト］なので［Enter］キーで改行されます。

［短いテキスト］で改行する場合は、［Ctrl］+［Enter］で改行できます。

テーブルのデータシートビューでも同じです。

Access2010までは、データ型［長いテキスト］は［メモ型］、［短いテキスト］は［テキスト型］です。

［短いテキスト］でも［Enter］キーで改行したい場合

もし、［短いテキスト］でも［Enter］キーで改行したい場合は、プロパティの［その他］タブにある［Enterキー入力時動作］で設定します。

［短いテキスト］の場合は、［既定］になっていますので、これを［フィールドに行を追加］に変更します。

［長いテキスト］の場合は、既定が［フィールドに行を追加］になっています。

［Enterキー入力時動作］の［既定］というのは、［Accessのオプション］の［Enterキー入力後の動作］の設定に従うということです。

フォームにコマンドボタンを作成

作成した［F_社員情報］をデザインビューで開きます。

［デザイン］タブの［コントロール］グループにある［ボタン］をクリックして任意の位置でドラッグしてボタンを作成します。ここでは、テキストボックス［備考］の右横に設置します。

参考もし、以下のように［コマンドボタンウィザード］が表示されたら、［キャンセル］ボタンをクリックします。

コマンドボタンのクリック時イベントで設定

コマンドボタンのプロパティを開きます。

［デザイン］タブの［ツール］グループにある［プロパティシート］をクリックします。

プロパティは、［F4］キーを押しても表示できます。

［書式］タブの［標題］でコマンドボタンに表示する名前を変更します。

マクロビルダー（マクロアクション）で設定する方法と、コードビルダー（VBA）で設定する方法を解説します。

マクロビルダーとコードビルダーの違いについては、以下の記事で解説しています。

マクロビルダーで設定

［イベント］タブの［クリック時］にある［ビルダー選択］ボタン［...］をクリックします。

［ビルダーの選択］ダイアログボックスから［マクロビルダー］を選択して［OK］ボタンをクリックします。

［新しいアクションの追加］の▼ボタンをクリックして、［If］を選択します。

Ifのテキストボックスに以下を入力します。

次の［新しいアクションの追加］で［メッセージボックス］を選択します。

コマンドボタンを押した時に［備考］テキストボックスが空白なら、メッセージウィンドウを表示します。

［メッセージ］のテキストボックスに、メッセージに表示したい文字を入力します。

ここでは、［コピーできるものがありません］と入力します。

［Elseの追加］をクリックします。

［新しいアクションの追加］で今度は、［コントロールの移動］を選択します。

［コントロール名］に以下を入力します。

次にマクロアクション［値の代入］を選択しますが、このマクロアクションは［すべてのアクションんを表示］をクリックしないと、表示されませんので気をつけてください。

［値の代入］は、下から4番目にあります。

［値の代入］の［アイテム］に以下を入力し、［式］には［0］を入力します。

次も［値の代入］を選択して、［アイテム」と［式］に以下を入力します。

そして、［メニューコマンドの実行］を選択して、一覧から［コピー］を選択します。

以下のように設定できたら、上書き保存して閉じます。

プロパティには、［埋め込みマクロ］と表示されます。

参考同じようなマクロアクションを追加する場合は、コピー＆ペーストすると効率的です。また、マクロアクションは、アクションカタログから追加することもできます。

コードビルダーで設定

［イベント］タブの［クリック時］の［ビルダー選択］ボタン［...］をクリックします。

以下の［ビルダーの選択］ダイアログボックスが表示されます。

［コードビルダー］を選択して、［OK］ボタンをクリックします。

コードを入力する画面（VBEウィンドウ）が表示されます。

ここに以下のコードを入力します。

入力が終わったら、VBEウィンドウは閉じます。

プロパティには、［イベントプロシージャ］と表示されます。

フォームビューで確認

デザインビューからフォームビューに切り替えて、［コピー］ボタンをクリックします。

デザインビューからフォームビューに切り替えるショートカットキーは［F5］キーです。

テキストボックスの内容がクリップボードにコピーされています。メモ帳などに貼り付けて確認してください。

［備考］が空白の場合は、以下のメッセージウィンドウが表示されます。

単票フォームを分割フォームに変更するには

単票フォームを分割フォームに変更するのは、とても簡単です。

フォームのプロパティを表示します。

プロパティシートの［選択の種類］が［フォーム］になっていることを確認します。［フォーム］になっていない場合は、▼ボタンをクリックして、メニューの中から［フォーム］を選択します。

［書式］タブの［既定のビュー］は［単票フォーム］になっていると思います。

［既定のビュー］の▼ボタンをクリックして、［分割フォーム］を選択します。

［デザインビュー］から［フォームビュー］に切り替えて確認します。

もし、データシートビューが上に来ている場合は、再度フォームのプロパティを開いて、［書式］タブの［分割フォームの方向］で［データシートを下に］を選択します。

参考分割フォームについては、以下の記事で解説しています。分割フォームは、単票フォームとデータシートビューを並べて表示できるので、何かと便利です。

また、フォームに表示する項目が多い場合は、タブコントロールを使うとコンパクトに見やすくなります。以下の記事で解説しています。

関連Windows10には、クリップボードの履歴を表示できる機能があります。ピン留めをしておくと、履歴の消去やPCの再起動を行っても、データは保持されます。他デバイスとの同期もできます。

Officeのクリップボードについても解説しています。最大24個まで保存されます。