EXCEL VBA執行時錯誤9下標越界

2021-05-01 08:51:00 字數 5664 閱讀 4756

1樓:陽光上的橋

下標越界一般是workbooks("電氣元器件庫.xlsm")或者sheets("sheet1")造成的,如果沒有對應的工作簿「電氣元器件庫.xlsm」、或者這個工作簿裡面沒有工作表「sheet1」就會導致此類錯誤。

注意:程式不會自動開啟工作簿進行公式計算。

請檢查工作簿名稱。

2樓:端蒙洋贊怡

sheet1看看是否此名稱的工作表不錯在!或者大小寫應該是sheet1

excel vba 執行時錯誤9,下標越界

3樓:excel辦公實戰

sheet1看看是否此名稱的工作表不錯在!或者大小寫應該是sheet1

excel vba 執行錯誤「9」 下標越界

4樓:

excel提示下標越界是vba程式執行的一個錯誤提示,原因有以下幾個:1、引用了不存在的陣列元素:下標比可能下標範圍大或小,或是在應用程式中這一邊的陣列沒有指定範圍。

2、宣告陣列時沒有指定元素的數目:引用了不存在的集合成員。3、使用速寫形式的下標,結果指定了錯誤的元素。

4、引用或操作的工作薄、工作表不存在。

5樓:adc大神

j=array(1,1) 加最上面

6樓:士萍和憶遠

將 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時,才可以顯示螢幕提示的後六個文字,否則跳過。

7樓:很多很多

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,下標越界

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樓:匿名使用者

你工作薄名稱的字尾不對,應該是。xlsx才對,還有如果是2007以上版本,有巨集的工作薄字尾為.xlsm。才對,你試著改下這裡試試

這樣才對

10樓:匿名使用者

所謂下標越界就是沒有找到的意思,這裡的與下標有關的就是工作簿workbooks、工作表sheets和單元格range了,這3者之一沒有找到都會提示下標越界。workbooks必須開啟了工作簿才能找得到,在這種前提下sheets必須存在才行,range只要語法不錯一般不會有問題。當然sheets最好寫成worksheets。

excel 為什麼 執行時錯誤9 下標越界

11樓:很多很多

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 結構代替指定元素下標。

使用速寫形式的下標,結果指定了錯誤的元素。

12樓:堯宵雷經義

vb在使用陣列前必須指定陣列的大小,一種辦法是在定義時確定大小,如:dim

inputdata(10)

assingle

另一種是動態定義,宣告不用修改,如在出錯語句前加一句:

redim

inputdata(10)

assingle

13樓:余余

c:\users\騰\desktop\test.xlsx 這個檔名是否修改過或位置變動了,不在所指向的資料夾下?

14樓:陽光上的橋

是不存在msgsheetname這個名字的工作表,如果這個msgsheetname的值是整數,excel是不是以名稱、而是序號去找表表,你先顯示一下變數的值就明白了,例如:

msgbox msgsheetname

15樓:匿名使用者

出錯時,點除錯,開啟本地視窗,看下是哪個表出錯。

比如,出錯時顯示i為5,那麼檢查test5月表名中是否包含空格及其他會導致錯誤的情況。

或者,根本就沒有test5月這張表。

**沒看出問題

excel巨集執行時,提示錯誤9,下標越界

你的語句有三種可能造成下標越界,一是workbooks itemmaster 如果沒有itemmaster檔案開啟會造成報錯,另外,一般我們是寫workbooks itemmaster.xls 二是.sheets sheet1 如果工作簿沒有名為 sheet1 的表,會造成下標越界 三是cells ...

visual basic 執行時錯誤

因為我平時也經常用巨集處理資料,所以,個人認為出現這種情況要能有以下幾種原因 檔案的位置,檔名,excel標籤頁的名字 如sheet1,sheet2或是其它名字 是否符合巨集的規範。檔案裡有資料格式與巨集規定的不一致,比如a1單元格中應該是 數值型 的,卻寫了文字字元。或是其它地方複製過來,有空格 ...

用友通提示執行時錯誤 2147024770 8007007e Automation錯誤這個問題怎麼解決

如果是客戶端 直接重灌 一般都能解決 如果是伺服器 最好是請懂的人重灌一下 一般都能解決此問題的 用友通提示執行時錯誤 2147024770 8007007e automation錯誤 這個問題怎麼解決1 資料庫軟體是不是正常的,遇到的情況是資料庫服務正常,因為系統管理可以正常登入,是否被sql20...