【エクセルマクロ】入力規則を別シートから作成：動画あり

エクセルマクロで、入力規則のリストを別シートから作成するVBAコードをご紹介します。

このページのマクロコードは、コピペで使えます。
ぜひお試しください！

入力規則を別シートから作成
動画の解説

入力規則を別シートから作成

以下のExcelVBAを実行すると、別シートと連動してプルダウンを設定します。


Sub ドロップダウンリスト別シート参照して作成()

Dim MyList() As Variant
Dim i As Long

    Sheets("Sheet2").Select
    
    For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
        ReDim Preserve MyList(i)
        MyList(i) = Cells(i, 1)
    Next i

    With Sheets("Sheet1").Range("A2:A6").Validation
        .Delete
        .Add Type:=xlValidateList, _
             Operator:=xlEqual, _
             Formula1:=Join(MyList, ",")
    End With

End Sub