VBA For Excel，尝试获取范围内每行的最大/最小值。

我正在尝试解决如何获得图纸中一行内每个范围的最大值和最小值

With ThisWorkbook.Sheets("API-VAL")

LastRow = .Range("A1").End(xlDown).row
.Range("BU1:BU1 +(LastRow)").Formula = "=Max(BD1:BS1)" ***- Error in this row.
.Range("BV1:BV1048576").Formula = "=Min(BD1:BS1)"

End With

---

我得到一个“运行时错误-'1004'”应用程序定义或对象定义错误。有人能指出我哪里出了问题吗？多谢各位

.Range（“BU1:BU”和LastRow.Formula=“=Max（BD1:BS1）”

.Range（“BU1:BU”和LastRow.Formula=“=Max（BD1:BS1）”

谢谢你，这很好用，这把我的头撞到墙上了。我将来会记得CSTr。：）表达你的喜悦的最好方式是点击接受任何答案。谢谢你，这很好用，我一直在用这句话来打击我的头。我将来会记得CSTr。：）表达快乐的最好方式是点击接受任何答案。

.Range("BU1:BU" & CStr(LastRow)).Formula = "=Max(BD1:BS1)"