Sub test()Application.ScreenUpdating = FalseDim f, wb, xf = Application.GetOpenFilename("Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt", 1, MultiSelect:=True)For x = 1 To UBound(f)Set wb = Workbooks.Open(f(x))NextEnd Sub1我不理解當(dāng)初你寫For x = 1 To UBound(f) 是什么意思2UBOUND（f） 我理解的f 是個(gè)變量名稱 你給我做的就是F就代表某EXCEL文件 然后是EXCEL的數(shù)量的最大數(shù) 問題我不知道循環(huán)這個(gè)又什么用 （我理解對(duì)不）
2 回答
侃侃無極
TA貢獻(xiàn)2051條經(jīng)驗(yàn) 獲得超10個(gè)贊
問題一：
f = Application.GetOpenFilename；這句后F是一個(gè)一維數(shù)組，分別為你選中的文件；
你可以輸入代碼PRINT F(1) 這個(gè)就會(huì)顯示第一個(gè)文件；PRINT (2) 就會(huì)顯示你選中的第二個(gè)文件
如果我們選中的是2個(gè)文件，那么 UBound(f)就為2了。
定義 For x = 1 To UBound(f)，是為了后面我要一個(gè)個(gè)的用WORKBOOKS.OPEN打開這些文件！
就是這句：Set wb = Workbooks.Open(f(x))
問題二：
假設(shè)我們都不知道自己選了多少文件，但是F知道。那么F的最大值為多少呢，就為UBound(f),意思就是f這個(gè)數(shù)組的最大值，還有其它用法，順便提一下，如下：
'數(shù)組是用編號(hào)排序的，那么如何獲得一個(gè)數(shù)組的大小呢 'Lbound(數(shù)組) 可以獲取數(shù)組的最小下標(biāo)(編號(hào)) 'Ubound(數(shù)組) 可以獲取數(shù)組的最大上標(biāo)(編號(hào)) 'Ubound(數(shù)組,1) 可以獲得數(shù)組的行方面(第1維)最大上標(biāo) 'Ubound(數(shù)組,2) 可以獲得數(shù)組的列方向(第2維)的最大上標(biāo) |
我也不知道自己解釋清楚沒有，不知道你有沒有學(xué)習(xí)過數(shù)組，如果還沒有學(xué)過，可能理解起來有點(diǎn)困難。
至尊寶的傳說
TA貢獻(xiàn)1789條經(jīng)驗(yàn) 獲得超10個(gè)贊
GetOpenFilename
可能返回多個(gè)文件，
For x = 1 To UBound(f)
這樣就是每個(gè)都打開
添加回答
舉報(bào)
0/150
提交
取消