1樓:星星塔羅牌
有這麼幾個問題:
1 mkdir語句中的括號裡應為 ("e:\"fname) '建立資料夾。
注意引號和&的配合。
2 開啟資料夾語句不對。那個open是開啟指定檔案的語句。
3 物件建立後注意關閉(清理後再離場)
測試後的完整**為:
sub 建立資料夾()
dim fname '定義變數。
fname = "a1") 指定**內容。
mkdir ("e:\"fname) '建立資料夾。
e:\"fname) '開啟資料夾。
set fs = createobject("") 複製指定檔案到指定資料夾。
d:\scan\", e:\"fname & ", true '
set fs = nothing
end sub
2樓:帳號已登出
假設檔名在sheet1的a1單元格,檔案在c盤。
test目錄,檔案為xlsx格式,密碼為aaa,複製到sheet2sub 必須是巨集()
filename:="c:\test\" worksheets("sheet1").range("a1") xlsx", password:="aaa"
sheet2").a1]
workbooks(worksheets("sheet1").range("a1") xlsx").close 0
end sub
3樓:陽光上的橋
下面的例子**使用密碼abc開啟a1中指定名稱的excel檔案,並且把檔案中的複製到本表a2
with :=range("a1"),password:="abc")
x = sheets("sheet1").range("a1");
closeend with
range("a2") x
如何根據乙個excel檔案單元格中的值,用巨集呼叫相應名稱的excel檔案中的值?
4樓:網友
不需要巨集,將檔案放到同一資料夾內,直接跨檔案引用,用 [檔名]表名!單元格 進行引用即可。這裡還要做乙個字串連線,還要用到indirect函式。
如在collect,sheet1,a2中輸入以下分2步說明:
第一步:a1為」14001「,則的計算結果為[!b2第二步:indrect函式則是根據第一步生成的字串引用對應的單元格。
在當前excel檔案中執行巨集,使它開啟另乙個excel檔案並且指定檔名和位置,且直接列印它。
5樓:雲南新華電腦學校
有這麼幾個問題:
1 mkdir語句中的括號裡應為 ("e:\" & fname) '建立資料夾。
注意引號和&的配合。
2 開啟資料夾語句不對。那個open是開啟指定檔案的語句。
3 物件建立後注意關閉(清理後再離場)
測試後的完整**為:
sub 建立資料夾()
dim fname '定義變數。
fname = "a1") '指定**內容。
mkdir ("e:\" & fname) ' '建立資料夾。
"e:\" & fname) '開啟資料夾。
set fs = createobject("") '複製指定檔案到指定資料夾。
d:\scan\", "e:\" & fname & "\", true '
set fs = nothing
end sub
6樓:姓王的
用巨集**肯定能實現的。
excel以單元格數值作為檔名的問題求助
7樓:退休畫線工
用indirect函式即可,公式修改為:
vlookup($b2,indirect("'y:\03 部門資料夾\04 初中部\教務處\教師月考核空表\年級組。
8樓:平陽虎
=vlookup($b2,indirect("'y:\03 部門資料夾\04 初中部\教務處\教師月考核空表\年級組。
excel檔案,以單元格內容命名檔名,巨集怎麼做?
9樓:鄒良勵鵑
在指定單元格中輸入「=mid(cell("行核filename"),find("[cell("filename"))一,find("]cell("filename"))find("[cell("filename"))一)」即可。如下圖檔敬掘所稿哪示。
求助!利用vba在指定資料夾中開啟全部excel檔案並複製指定單元格內容
10樓:常山大寶
太複雜,只能給你個建議:
順序讀取sheet表。
每讀取1個sheet表,在路徑下查詢對應的檔案開啟讀取檔案,把原始資料拷貝到sheet表。
關閉開啟的檔案( set ak = nothing)讀取下乙個sheet表。
11樓:網友
下面的方法可以不顯示開啟檔案的過程,只是在記憶體中進行訪問,速度比直接開啟vba脫離excel就無法執行。不知道你是在什麼情況下取單元格資料? 如果是在。
excel巨集以乙個**內的內容在指定位置建立資料夾並開啟 然後複製乙個指定excel檔案到那個資料夾裡
12樓:網友
試驗如下**:
sub 建立資料夾()
dim fname
fname = , 1).value
mkdir ("e:\" & fname)shell "explorer " & "e:\" & fnameset fs = createobject("")"原始檔案完整路徑/檔名", "目標檔案完整路徑/檔名", true '
end sub
13樓:網友
有這麼幾個問題:
1 mkdir語句中的括號裡應為 ("e:\" & fname) '建立資料夾。
注意引號和&的配合。
2 開啟資料夾語句不對。那個open是開啟指定檔案的語句。
3 物件建立後注意關閉(清理後再離場)
測試後的完整**為:
sub 建立資料夾()
dim fname '定義變數。
fname = "a1") '指定**內容。
mkdir ("e:\" & fname) ' '建立資料夾。
"e:\" & fname) '開啟資料夾。
set fs = createobject("") '複製指定檔案到指定資料夾。
d:\scan\", "e:\" & fname & "\", true '
set fs = nothing
end sub
execl巨集實現自動另存為指定單元格內容為檔名
14樓:網友
if bl = false then "e:\" & sheets("sheet1").range("c4") &sheets("sheet2").
range("b5") &format("--") &format(now(),"yyyy""-""mm""-""dd""-""hh""時""mm""分""ss""秒") &"-" & i & ".xls"
把你第6,7行替換為以上語句;是你要的結果嗎?
excel 中如何把單元格中的數乘固定單元格數
小小小兔 方法 引用 絕對值 即可。1 開啟excel 在統計單元格輸入 b3 c 3 輸入c3後按f3即變為絕對值 2 因是絕對引用,此方法對其他單元格的變動不受影響。 羅夢家居 excel 如何每個數值都乘同一個數 使用絕對引用 如果c列的數等於b列中的數乘a1單元格,在c1中輸入 b1 a 1...
如何在EXCEL中鎖定單元格,單元格內容不被修改
鎖定單元格保證內容不被修改,只有在工作表被被保護是才有效果的。你可以先把工作表設為保護模式的。注意,要輸入密碼的哦,不能忘記密碼了,要不就打不開表了。 明哥 我在excel 2010中試了一下,先設定要保護的單元格的 單元格格式 中的為 保護 頁中 鎖定 項為 有效 就是打上勾,然後確定退出,再在 ...
excel中怎麼把一列數乘以固定單元格
哆啦a夢是夢想家 以excel 2016為例,有以下步驟 1 開啟一個excel 如下圖所示 2 輸入一列數字,如下圖所示 3 在另一個單元格中輸入要乘的數字,如下圖所示 4 在計算結果單元輸入等於號,如下圖所示 5 輸入公式,選擇a1 b 1,如下圖所示 6 回車得到計算結果,如下圖所示 7 拖拽...