2013-07-28 71 views
2
Sub ex2() 
    Sheets("sheet2").Range("a2").Text = "Anil" 
End Sub 

我要複製的數據阿尼爾到單元格A2的。文本屬性,但我正在運行時間錯誤說:無法修改細胞

無法設置的Text屬性範圍類。

任何一個建議如何使用文本方法工作?

回答

12

.Text是隻讀的。

要設置單元值,請使用.Value屬性。

+1

+ 1有正當理由的回答 – Santosh

+0

您能否讓文本和數值有所區別? – Anil

+0

@Anil'.Text'是'.Value',格式爲'.NumberFormat'。 – GSerg

2

使用.Value屬性,而不是爲.text:

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