关于vba中出现下标越界的解决方法？
VBA代码，出现下标越界问题。求差错 前两行代码换为如下代码Dim wb As WorkbookSet wb=Workbooks.Open(\"C：\\general.txt\")wb.Worksheets(\"general\").Activate
关于vba中出现下标越界的解决方法？ 这是我写的一个简单的关于拆分工作表的VBA程序，但是在我电脑上excel2010上运行就会出现下标越界的问题，…
VBA中提示下标越界怎么解决？
vba代码中，提示下标越界，哪里越界，如何解决？ 按我的理解Workbooks(1).Sheets(k).Copy Workbooks(2).Sheets(1)应该改为sht.Copy wk.Sheets(1)然后把 k=k+1 这行删掉即可
以下vba代码为什么会下标越界，我新手，头疼啊。请高手指点。 你把\"[当日报表.xls]\"打开了，取的却是\"[当日数据.xls]\"，不报错才怪呢，太粗心了吧
为什么我的VBA代码会下标越界？ Option Base 1Sub find1()Dim arry()As StringDim I As LongDim rw As Longrw=Cells(Rows.Count，1).End(xlUp).Row ' 假设row=365ReDim arry(1 To 2，1 To rw)'删除这一句=>；ReDim arry(1 To rw)For I=1 To rwarry(1，1)=Cells(I，1)''下标越界，测试显示进入第一个数组arry(1，1)就越界了Next IFor I=1 To rwarry(2，I)=Cells(I，3)Next IEnd Sub
VBA运行时错误9，下标越界 你工作薄名称的后缀不对，应该是。XLSX才对，还有如果是2007以上版本，有宏的工作薄后缀为.XLSM。才对，你试着改下这里试试这样才对
这段VBA代码为何会下标越界？ 第八行：“Workbooks(ThisWorkbook.Path&\"\\\"&sm).Sheets(1).Copy after：=ThisWorkbook.Sheets(3)”里“Workbooks(ThisWorkbook.Path&\"\\\"&sm).”引用错误。“Workbooks（\"工作薄名\"）”形式引用必须是已经打开的工作簿，其中的“工作薄名”必须是不带路径的名称，也就是其打开时显示在Excel应用程序顶部标题栏的名称。由于这个引用错误，造成运行时下表越界错误。第八行代码应改为：“Workbooks(sm).Sheets(1).Copy after：=ThisWorkbook.Sheets(3)”，同时还应在此前添加几行代码：其作用是判断工作薄 sm 是否打开，如没有打开，则打开之后再引用拷贝。如果已经是打开的就不能再打开。打开的代码是“Workbooks.Open(ThisWorkbook.Path&\"\\\"&sm)”。拷贝完后再关闭之。关闭代码应该是“workbooks(sm).close”，而不是“workbooks(ThisWorkbook.Path&\"\\\"&sm).close”。如果试图关闭一个没打开的工作簿，或引用带路径的工作簿名进行close操作，都会导致下标越界错误。
VBA中在运行如下代码时报错“运行时错误’9，下标越界，”
