<目的>
　ボタンを作り、作成したマクロを実行する

　

１．開発メニュー

２．デザインモード　挿入　ActiveXコントロール　コマンドボタン　選択

　

４．Sheet1のA1あたりで ドラッグしてコマンドボタン作成

５．作成したコマンドボタンをダブルクリックすると・・

６．コマンドボタンをクリックしたイベントのマクロが作成される

７．そこにコメントと呼び出すマクロを書き込む
Call ****でつくったマクロが実行します。

８．一旦表に戻ってコマンドボタンの名前の編集をします

９．右クリックでメニューが開くので コマンドボタンオブジェクト→編集を選び

１０．名前を変える

１１．デザインモードをオフにする

１２．実行する準備が出来たので・・

１３．書き出すSheet2の内容に何も無いことを確認して・・

１４．Sheet1に戻り実行ボタンをクリックします。

１５．InputBoxの初期値はAltなので、わざと変更してみて

１６．Ctrlキーを検索し、書き出す様にしてみます。

１７．Sheet2にはCtrlキーからスタートする内容が記載されています。