excel表格里如何录制下拉选项这个动作，我想做一个宏

excel表格里如何录制下拉选项这个动作，我想做一个宏

Sub xiala()
'
' xiala 宏
'

'
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=$D$1:$D$8"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.IMEMode = xlIMEModeNoControl
.ShowInput = True
.ShowError = True
End With
End Sub

$D$1:$D$8为下拉引用的区域

你是说你想在单元格里面做一个下拉菜单，然后点击下拉就可以在菜单里面选择选项了吧？
这个在excel的数据有效性里面可以设置
进入excel，工具栏那里选择 数据，然后找到 数据有效性，点击第一个 数据有效性 ，然后会弹出一个窗口，在窗口里面的 允许 那里选择 序列 ，之后在下面会出来一个新的文本框，在那里输入你的可选项，不同的项之间用英文的逗号隔开。之后点确定就可以了。
然后那个单元格就会有一个下拉菜单的符号，点那个就可以弹出选项，然后就可以选择了