[英]Subscript out of range error
Private Sub sendemail(esubj)
ROW_BEGIN = 1
ROW_END = 72
Sheets("Input").Select
Range("A" & ROW_BEGIN & ":S" & ROW_END).Select
Range("A" & ROW_BEGIN).Select
fileL = "\\fire\school\FINANCE\Report\FY10\Key Indicator\"
fileL = fileL & (Left(Range("I7"), 3)) & Right(Year(Date), 2)
fileL = fileL & "\Key Report - " & myfdate & ".xls"
我有一个工作簿,其中有一个名为Input的电子表格标签。 当我尝试运行它时,出现下标超出范围消息。 为什么不能从输入电子表格中提取?
为什么要执行所有Select
?
代码在哪一行失败?
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.