无法修改细胞

Question

Sub ex2() 
    Sheets("sheet2").Range("a2").Text = "Anil" 
End Sub 

我要复制的数据阿尼尔到单元格A2的。文本属性，但我正在运行时间错误说：

无法设置的Text属性范围类。

任何一个建议如何使用文本方法工作？

Answer 1

.Text是只读的。

要设置单元值，请使用.Value属性。

Answer 2

使用.Value属性，而不是为.text：

Sub ex2() 
    Sheets("sheet2").Range("a2").Value = "Anil" 
End Sub 

Answer 3

根据下面的链接，你应该用数值方法...

http://msdn.microsoft.com/en-us/library/office/gg192736(v=office.14).aspx

Sub ex2() 
    Sheets("sheet1").Range("a2").Value = "Anil" 
End Sub