如果一个单元格是列表,怎么用vba去修改，好像不能直接去修改它的text，它有两个选项，yes，no，怎么用

Question

vba修改

Answer 1

假设列表在A1单元格，使用下面的代码可修改。

    With Range("A1").Validation
        .Delete
        .Add Type:=xlValidateList, Formula1:="Yes,No"
    End With

追问

不是要修改，我是要本来选的yes，我要自动把它改成no，不知道怎么改

追答

这一句就可以了，如有帮助，还望采纳！

 Range("A1").Value = "No"