1樓:匿名使用者
'開啟檔案用下面的語句
private sub commandbutton1_click()workbooks.open sheets(1).cells(2, 2).value & ".xls"
end sub
'選擇檔案用下面的語句
private sub commandbutton1_click()workbooks(sheets(1).cells(2, 2).value & ".
xls").activate
end sub
2樓:
假設兩個檔案都存放在同乙個資料夾下面:
[b1] = "檔案2.xls"
sub 開啟b1檔案()
dim openfile_path as stringdim openfile_name as string'獲取需要開啟的檔名,和路徑
openfile_path = thisworkbook.pathopenfile_name = [b1]
'顯示一下檔名是否正確,可以注釋掉
msgbox [b1]
'其實就這麼一句話的事..
workbooks.open openfile_path & "\" & [b1]
end sub
然後自己設定乙個按鈕加巨集
3樓:匿名使用者
a1寫要開啟檔案的路徑:例如====》d:\yourfile\me\b1寫要開啟的檔名:
例如 ===》myfriend.xls在vba上定義, dim strpath as string :dim strfilename as string
賦值, strpath=cells(1,1) : strfilename =strpath+cells(1,2)
開啟檔案: workbooks.open filename:=strfilename
可以啦!五步而已。另加按鈕不算!
excel vba絕對引用的問題
牛星星兒 在你使用的sheet的selectionchange事件中寫入以下 即可 private sub worksheet selectionchange byval target as range dim i as integer,j as integer,k as integer,a as ...
有關魔方高手的問題
在40秒之內能還原肯定用cfop吧,那就買個好點的魔方,多練吧.不知道你oll,pll公式背的怎麼樣了,如果沒背全,這裡有提公升的空間,還有f2l,這個要練,魔方論壇上有很多關於f2l的經驗,這個確實是制約速度的重大原因.我覺得慢點練吧,就是練f2l時,多注意觀察,在做前一組的時候,主動去尋找下一組...
EXCEL VBA啟動其它應用程式問題
小小噤 開啟檔案 執行列印輸出 就不會了 我也搞條碼的 嘿嘿 mopen shell explorer.exe d tm.btw vbnormalfocus shell yourpath bartender.exe vbnormalfocus yourpath是exe的絕對路徑 以上是開啟barte...