Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 在vba中将单元格()用于字符串时出错?_Excel_Vba - Fatal编程技术网

Excel 在vba中将单元格()用于字符串时出错?

Excel 在vba中将单元格()用于字符串时出错?,excel,vba,Excel,Vba,因此,我尝试使用Cells对象来存储字符串,但我不断收到一个应用程序错误: Sub analyze() Dim rC As Integer Dim rtData As Worksheet Set rtData = ThisWorkbook.Sheets("RTN Data") Dim finalSht As Worksheet Set finalSht = ThisWorkbook.Sheets("Final") Sheets("Final").Cells(1, 1).Text = "order

因此,我尝试使用Cells对象来存储字符串,但我不断收到一个应用程序错误:

Sub analyze()
Dim rC As Integer
Dim rtData As Worksheet
Set rtData = ThisWorkbook.Sheets("RTN Data")
Dim finalSht As Worksheet
Set finalSht = ThisWorkbook.Sheets("Final")
Sheets("Final").Cells(1, 1).Text = "order#"
finalSht.Cells(0, 2) = "Nurse"
finalSht.Cells(0, 3) = "Message"

rC = rtData.Cells(rows.Count, 1).End(xlUp).Row



End Sub
不管我以何种方式引用它

请提供帮助。

是在单元格中格式化时显示的文本,您无法分配它。将其视为只读。将字符串指定给单元格的,或者(因为.Value是默认值)将其放入单元格

Sheets("Final").Cells(1, 1) = "order#"
Sheets("Final").Cells(1, 1).Value = "order#"
这很容易用日期来证明。单元格的formatted.Text属性可能为2015年7月18日,date.Value为2015年7月18日,raw为42203

⑨.Text属性的官方文档相互矛盾

返回或设置指定对象的文本。只读字符串


它是只读的,或者您可以设置它。并非两者都有。

.text是只读属性。尝试将您的值指定给.value

此外,单元格从1开始计数,因此单元格(0,2)没有意义

Sheets("Final").Cells(1, 1).Value = "order#"
finalSht.Cells(1, 2) = "Nurse"
finalSht.Cells(1, 3) = "Message"

哈哈,非常感谢你…你解决了我所有的问题,我从0开始算抢手货我完全错过了从零开始的单元格行。