VBA语句中引用单元格内容怎么弄？

我的代码： Private Sub CommandButton3_Click()
ActiveWorkbook.SaveAs
Filename:= _
"C:\Documents and Settings\Administrator\桌面\" & Sheets("报告单").Range(b5).Text & " .xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
End Sub
就是以表“报告单”中B5单元格的内容作为文件名保存，运行提示：应用程序定义或对象定义错误。谢谢

---

把Range(b5) 改为 Range("b5")才对啊

---

Range(b5).Text 改为Range("b5").value

---

Range(b5).Text写成Range("b5")，再试一试

---