今回はExcelのシートにコマンドボタンを挿入してマクロを実行する方法について解説します。
[目次]
1.通常のマクロ実行
通常マクロを実行するときは「開発タブ」→「マクロ」をクリックします。
![](http://how-to-business.com/wp-content/uploads/2020/04/b59f31ad5d1ef40e4f7effc6f31b4d8c.png)
続いて実行するマクロを選択し、実行ボタンをクリックします。
![](http://how-to-business.com/wp-content/uploads/2020/04/c554d717ce20e57db106d10e594392c1.png)
しかしこのやり方でマクロを実行すると少し過程が多く、ボタンが小さいので何度も操作するには少し面倒に感じます。
2.コマンドボタンでマクロ実行
そこでコマンドボタンと呼ばれるものをシートに追加し、マクロ実行していきます。
「開発タブ」→「挿入」→「コマンドボタン」を選択します。
![](http://how-to-business.com/wp-content/uploads/2020/04/14915606e75eb91830821b5bf3afbfbb.png)
ドラッグしてコマンドボタンをシートに追加します。
![](http://how-to-business.com/wp-content/uploads/2020/04/b1ba6b1cc0ca221279c4cbbc16b99356.png)
コマンドボタンは追加できましたが、デフォルト表記ではマクロ内容が分からないため、表示文字列を変えます。
「右クリック」→「プロパティ」を選択します。
![](http://how-to-business.com/wp-content/uploads/2020/04/006e63feee737cdf990846e59766b481.png)
Captionを編集すると、コマンドボタンに反映されることが分かります。
![](http://how-to-business.com/wp-content/uploads/2020/04/20e35a4870453954196ca8b0eaeed761.png)
このやり方だとボタンを大きくできて、ワンクリックで実行できるようになります。
マクロを実装して確かめてみます。以下のソースコードを準備します。
'Sheet1
Private Sub CommandButton1_Click()
Call 値を入力
End Sub
'Module1
Sub 値を入力()
ThisWorkbook.Worksheets("Sheet1").Cells(1, 1).Value = 1
End Sub
コマンドボタンをクリックして実行してみます。
![](http://how-to-business.com/wp-content/uploads/2020/04/2c73752f2da11cd29ee13d9bde06bdc5.png)
コマンドボタンをクリックすることでマクロが実行できることが確認できました。