Vba 我想清除一个单元格，然后给它赋值

获取编译错误：参数不是可选的 只想清除单元格中的值而不是整个范围，然后将值放入该单元格中。请帮忙

---

以下是一些可以完成这项工作的方法：

Sub Clear_Table(ct)
    Range(ct).Select
    'Range(Selection, Selection.End(xlToRight)).Select
    'Range(Selection, Selection.End(xlDown)).Select
    Selection.ClearContents
    Range(ct).Select
End Sub

Sub rite()



Clear_Table ("E10")

Range("E10").Value = "dwsds"

End Sub

---

尽量避免选择。请参阅此处的更多内容-

同意维蒂亚塔的观点，但我无法复制您的错误。也许你还有其他的密码。欢迎，@DaulatDaga：只要你能：

Option Explicit

Sub Clear_Table(ct As Range)

    ct.ClearContents

End Sub

Sub rite()

    Clear_Table Range("E10")
    Range("E10").Value = "dwsds"

End Sub