エクセル、表から名前を貼り付ける方法

質問

会社の有給申し込み表を作りたいのですが、
会社の社員名簿（班、名前）の表から名前をクリックするたびに、大きなセル（４０文字はいる）へ文字列として追加されるような方法はあるでしょうか？
１班　飯島　田中　鈴木
２班　佐藤　加藤　
３班　：
：
上記は表になっている
名前をクリックするたびに、セルＧ２０へ
田中、鈴木、加藤‥
となってほしい。
（田中、鈴木、加藤）は一人へ調整などと書き換えたりしたい。
・・・無理・・・ですかね？

回答No.1

zap35 · ベストアンサー

（シングル）クリックではなくダブルクリックにしましたが、以下のマクロを「シート名タブ右クリック」→「コードの表示」で開く画面に貼り付けてください。シートに戻り、氏名のセルをダブルクリックするとG20セルに書き込みます。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
　With Range("G20")
　　If Len(Target.Value) > 0 Then
　　　If Len(.Value) = 0 Then
　　　　.Value = Target.Value
　　　Else
　　　　.Value = .Value & "、" & Target.Value
　　　End If
　　End If
　End With
End Sub

＞（田中、鈴木、加藤）は一人へ調整などと書き換えたりしたい。
は意味が分かりませんでした。

お礼

ありがとうございます。
できました！できました！

＞（田中、鈴木、加藤）は一人へ調整などと書き換えたりしたい。
これは”は一人へ調整”等任意の言葉を書き加えたいという意味です。
これもできましたので、完璧です！

本当にありがとうございました。