下标超出范围错误答案

【问题标题】：Subscript out of range error下标超出范围错误
【发布时间】：2010-05-20 23:08:15
【问题描述】：

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 的电子表格选项卡的工作簿。当我尝试运行它时，我得到了下标超出范围的消息。为什么不能从输入电子表格中提取？？

【问题讨论】：

标签： excel vba

【解决方案1】：

你为什么要执行所有Selects？

代码在哪一行失败？

【讨论】：