マクロでの入力動作について質問です。マクロを使って選択したセルに文字を入力するボタンを複数作りたいのですがご教授いただけないでしょうか？ボタンで特定の文字を選択 ↓セルにクリックで入力ということをしたいんです。勤務表などに記号を入れていく動作をしたいので、ボタン選択後にクリックで連続してセルに入力出来ればありがたいです。初心者なので解りやすく説明していただけると助かります。よろしくお願いします。

確認ですが、複数のボタンを作り、どのボタンを押したらどういう文字を（その後でクリックした）セルに書き込むかを決めておく、ということですか？？

その理解でよければ、以下のような感じでよいかと。

ただし

\u0026gt; セルにクリックで入力

は勝手ながらダブルクリックしています。たとえば間違ったセルを選択した場合などを考慮し、同じセルを再度ダブルクリックしたら空白にするようにしています。

またボタンの名前は（コードをシンプルにするために）セルに入力する文字列と同じものにしています（以下では「承認」と「却下」）。

すべてのボタンに \u0026quot;Sample\u0026quot; をマクロ登録をしてください。文字列をクリアする別のボタンを設けた方がよいかと思いますが。

【標準モジュール】
Public 文字列 As String

Sub Sample()
    If IsError(Application.Caller) Then Exit Sub
    文字列 = Application.Caller
End Sub

【対象シートのシートモジュール】
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If 文字列 \u0026lt;\u0026gt; \u0026quot;\u0026quot; Then
        If Target.Value \u0026lt;\u0026gt; 文字列 Then
            Target.Value = 文字列
        ElseIf Target.Value = 文字列 Then
            Target.ClearContents
        End If
        Cancel = True
    End If
End Sub