Validationでリストを設定

「…あと、この"ござる"のところは、どのように実装する予定です？」 八木くんが画面を指差しました。

    If リスト範囲設定(ListName, ListRange) = True Then
        '---ここからValidationでリストを設定するでござる

    End If

「あ、はい。マクロの記録で記録したコードがあるので、それを編集して使用しようかと…」 泉先輩がプロジェクトエクスプローラーの、Module1モジュールをダブルクリックします。
コードウィンドウに、"マクロの記録"で記録されたコードが表示されました。

Sub Macro1()
'
' Macro1 Macro
'

'
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=リスト設定!$B$2:$B$12"
　　　　：
　　　　：

「ほう…」

八木くんはメガネをクイッと持ち上げながら、表示されたコードを覗き込みました。

第11話「マクロの記録の正しい使い方」に続きます
文・イラスト ／ 武藤 玄