excel - カンマ文字を含めるためのデータ検証

Question

次の短いマクロを使用して、データ検証を文字のリストとして割り当てています。

Sub DVList()
    With ActiveCell.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="a,b,c,d"
        .IgnoreBlank = True
    End With
End Sub

マクロは動作します。

リストにコンマ文字を含めるようにマクロを変更したいと考えています。コンマがリストの区切り文字であるため、これを行う方法がわかりません。

ワークシートのセルを使用してリストを作成する必要がありますか??