Range("1:1048576").Find("成品", , , xlWhole).SelectApplication.InputBox("【成品】已找到,请选择要生成下拉菜单单元格!", , , , , , , 8).Validation.Add xlValidateList, , , "成品1,成品2,成品3"