1樓：
excel提示下標越界是vba程式執行的一個錯誤提示，原因有以下幾個：1、引用了不存在的陣列元素：下標比可能下標範圍大或小，或是在應用程式中這一邊的陣列沒有指定範圍。
2、宣告陣列時沒有指定元素的數目：引用了不存在的集合成員。3、使用速寫形式的下標，結果指定了錯誤的元素。
4、引用或操作的工作薄、工作表不存在。
2樓：adc大神
j=array(1,1) 加最上面
3樓：士萍和憶遠
將 cells(i,4)=
right(cells(i,
3).hyperlinks(1).screentip,6)語句改為：
ifcells(i,
3).hyperlinks.count
> 0then
cells(i,4)=
right(cells(i,
3).hyperlinks(1).screentip,6)end
if理由：當第三列單元格內容不為空或「款式」時，若該單元格不包含任何超連結，則返回錯誤，因此增加一個判斷語句，該單元格的超連結個數大於等於1時，才可以顯示螢幕提示的後六個文字，否則跳過。
4樓：很多很多
excel中vba提示下標超界，說明物件不存在或者陣列元素不存在。
舉個簡單的例子：工作表中沒有"1月"這個工作表，卻用sheets("1月")；陣列定義的是arr(1 to 10)，卻用arr(11)，都會出現下標越界的提示。
簡單的理解：下標越界就是引用超出了所在的範圍。
1、當我們在excel的vba中輸入下面**，執行，就會出現「執行時錯誤9下標越界」的提示。**如下：
sub a()
dim arr() as string
arr(1) = "你好"
end sub
2、其實上面的「執行時錯誤9下標越界」是因為定義的動態陣列沒有確定維數和尺寸。定義成固定維數和尺寸的，或用redim界定一下維數和尺寸即可解決此問題。
改正後的**如下：
sub a()
dim arr() '定義一個動態陣列
dim i as integer
redim arr(1 to 3) '定義一個3個元素的陣列,並且對陣列進行初始化
arr(1) = 3
arr(2) = 4
arr(3) = 5'在下面語句重新定義一個10個元素的陣列，清除前面的元素，並重新分配新的儲存變數
redim arr(1 to 10)
for i = 1 to 10
arr(i) = i
next i
end sub，就可以了
擴充套件資料：
vb中的陣列越界
引用了不存在的陣列元素。
下標可能比下標範圍大或小，或是在應用程式中這一邊的陣列沒有指定範圍。檢查陣列的宣告以確認其上界和下界。若使用的是重新指定範圍的陣列，應使用 ubound 和 lbound 函式來決定陣列訪問。
如果索引指定為變數，應檢查變數名的拼寫。
宣告陣列時沒有指定元素的數目。例如，下列的**就會導致此錯誤：
dim myarray() as integer
myarray(8) = 234 ' 導致錯誤 9。
visual basic 並不會將沒有指定範圍的陣列自動設為 0 – 10。相反必須使用 dim 或 redim 來指定陣列中元素的數目。
引用了不存在的集合成員。
試著使用 for each...next 結構代替指定元素下標。
使用速寫形式的下標，結果指定了錯誤的元素。
vba執行時錯誤9，下標越界
5樓：很多很多
excel中vba提示下標超界，說明物件不存在或者陣列元素不存在。
舉個簡單的例子：工作表中沒有"1月"這個工作表，卻用sheets("1月")；陣列定義的是arr(1 to 10)，卻用arr(11)，都會出現下標越界的提示。
簡單的理解：下標越界就是引用超出了所在的範圍。
1、當我們在excel的vba中輸入下面**，執行，就會出現「執行時錯誤9下標越界」的提示。**如下：
sub a()
dim arr() as string
arr(1) = "你好"
end sub
2、其實上面的「執行時錯誤9下標越界」是因為定義的動態陣列沒有確定維數和尺寸。定義成固定維數和尺寸的，或用redim界定一下維數和尺寸即可解決此問題。
改正後的**如下：
sub a()
dim arr() '定義一個動態陣列
dim i as integer
redim arr(1 to 3) '定義一個3個元素的陣列,並且對陣列進行初始化
arr(1) = 3
arr(2) = 4
arr(3) = 5'在下面語句重新定義一個10個元素的陣列，清除前面的元素，並重新分配新的儲存變數
redim arr(1 to 10)
for i = 1 to 10
arr(i) = i
next i
end sub，就可以了
擴充套件資料：
vb中的陣列越界
引用了不存在的陣列元素。
下標可能比下標範圍大或小，或是在應用程式中這一邊的陣列沒有指定範圍。檢查陣列的宣告以確認其上界和下界。若使用的是重新指定範圍的陣列，應使用 ubound 和 lbound 函式來決定陣列訪問。
如果索引指定為變數，應檢查變數名的拼寫。
宣告陣列時沒有指定元素的數目。例如，下列的**就會導致此錯誤：
dim myarray() as integer
myarray(8) = 234 ' 導致錯誤 9。
visual basic 並不會將沒有指定範圍的陣列自動設為 0 – 10。相反必須使用 dim 或 redim 來指定陣列中元素的數目。
引用了不存在的集合成員。
試著使用 for each...next 結構代替指定元素下標。
使用速寫形式的下標，結果指定了錯誤的元素。
6樓：匿名使用者
你工作薄名稱的字尾不對，應該是。xlsx才對，還有如果是2007以上版本，有巨集的工作薄字尾為.xlsm。才對，你試著改下這裡試試
這樣才對
7樓：匿名使用者
所謂下標越界就是沒有找到的意思，這裡的與下標有關的就是工作簿workbooks、工作表sheets和單元格range了，這3者之一沒有找到都會提示下標越界。workbooks必須開啟了工作簿才能找得到，在這種前提下sheets必須存在才行，range只要語法不錯一般不會有問題。當然sheets最好寫成worksheets。
excel 為什麼 執行時錯誤9 下標越界
8樓：很多很多
excel中vba提示下標超界，說明物件不存在或者陣列元素不存在。
舉個簡單的例子：工作表中沒有"1月"這個工作表，卻用sheets("1月")；陣列定義的是arr(1 to 10)，卻用arr(11)，都會出現下標越界的提示。
簡單的理解：下標越界就是引用超出了所在的範圍。
1、當我們在excel的vba中輸入下面**，執行，就會出現「執行時錯誤9下標越界」的提示。**如下：
sub a()
dim arr() as string
arr(1) = "你好"
end sub
2、其實上面的「執行時錯誤9下標越界」是因為定義的動態陣列沒有確定維數和尺寸。定義成固定維數和尺寸的，或用redim界定一下維數和尺寸即可解決此問題。
改正後的**如下：
sub a()
dim arr() '定義一個動態陣列
dim i as integer
redim arr(1 to 3) '定義一個3個元素的陣列,並且對陣列進行初始化
arr(1) = 3
arr(2) = 4
arr(3) = 5'在下面語句重新定義一個10個元素的陣列，清除前面的元素，並重新分配新的儲存變數
redim arr(1 to 10)
for i = 1 to 10
arr(i) = i
next i
end sub，就可以了
擴充套件資料：
vb中的陣列越界
引用了不存在的陣列元素。
下標可能比下標範圍大或小，或是在應用程式中這一邊的陣列沒有指定範圍。檢查陣列的宣告以確認其上界和下界。若使用的是重新指定範圍的陣列，應使用 ubound 和 lbound 函式來決定陣列訪問。
如果索引指定為變數，應檢查變數名的拼寫。
宣告陣列時沒有指定元素的數目。例如，下列的**就會導致此錯誤：
dim myarray() as integer
myarray(8) = 234 ' 導致錯誤 9。
visual basic 並不會將沒有指定範圍的陣列自動設為 0 – 10。相反必須使用 dim 或 redim 來指定陣列中元素的數目。
引用了不存在的集合成員。
試著使用 for each...next 結構代替指定元素下標。
使用速寫形式的下標，結果指定了錯誤的元素。
9樓：堯宵雷經義
vb在使用陣列前必須指定陣列的大小，一種辦法是在定義時確定大小，如：dim
inputdata(10)
assingle
另一種是動態定義，宣告不用修改，如在出錯語句前加一句：
redim
inputdata(10)
assingle
10樓：余余
c:\users\騰\desktop\test.xlsx 這個檔名是否修改過或位置變動了，不在所指向的資料夾下？
11樓：陽光上的橋
是不存在msgsheetname這個名字的工作表，如果這個msgsheetname的值是整數，excel是不是以名稱、而是序號去找表表，你先顯示一下變數的值就明白了，例如：
msgbox msgsheetname
12樓：匿名使用者
出錯時，點除錯，開啟本地視窗，看下是哪個表出錯。
比如，出錯時顯示i為5，那麼檢查test5月表名中是否包含空格及其他會導致錯誤的情況。
或者，根本就沒有test5月這張表。
**沒看出問題
13樓：匿名使用者
excel提示下標越界是vba程式執行的一個錯誤提示，原因有以下幾個：
1、引用了不存在的陣列元素：下標比可能下標範圍大或小，或是在應用程式中這一邊的陣列沒有指定範圍。
2、宣告陣列時沒有指定元素的數目：引用了不存在的集合成員。
3、使用速寫形式的下標，結果指定了錯誤的元素。
4、引用或操作的工作薄、工作表不存在。
14樓：
你沒有附件上來。。。沒法試。
下面三條語句有相同的功能,使sheet1成為當前活動表
sheets("sheet1").select '錯誤,此種方法在excel2007中出錯,但一些資料顯示可以這樣使用**名sheet1來引用
sheets("abc").select '正確,此方法中的abc是工作表標籤名稱,由於此名稱可能被修改,所以在vba巨集程式中不贊成使用
sheets(1).select '正確,此方法中的數字序號是在excel工作簿下實際看到的工作表排列順序序號,在巨集程式中不贊成使用
sheets(sheet1.name).select '正確,此方法使用**名sheet1的name屬性來引用,適合在vba巨集程式中使用
希望對你有所幫助~
Excel vba執行時錯誤91物件變數或with塊變數未設定
沒有活動的worksheet物件。回答excel用巨集做查詢動作，如果查詢不到，就出這個錯誤。修改 前面部分如下 dim frow as integer if txt1.value then 先判斷使用者名稱是否為空 msgbox 使用者名稱不能為空！vbinformation,系統提示 exit ...
執行錯誤的C 程式，一個執行錯誤的C 程式
for x 2 x 100 x 這一句後面的 去掉 cout 100以內的素數為 using namespace std int isprime int x int main int isprime const int x 修改完畢，都是很小的細節問題。include using namespace...
excel vba中，如何讓巨集一直處於執行狀態
你的巨集寫法不對，文字怎麼能相加呢？如果要連線 也只能用 如果想要a18單元格因為a17單元格變化而變化，就是需要一個a17單元格的一個觸發事件 這個事件是 worksheet change 單元格內容改變事件 寫法是private sub worksheet change byval target...