求合併工作簿的vba,工作簿中含有很多公式，有什麼好的辦法嗎？
1樓：陽光上的橋
合併時去除公式，以當時的結果為最終結果，無需合併後重新vlookup。開啟的檔案的時候可以帶引數禁止提示是否更新。示例**如下圖：
**文字如下：
option explicit
sub 合併工作簿和核慎()
dim st as worksheet, arr, n, i, p, f
set st = activesheet '資料合併到的結果工作表。
p = d:\需要合併的檔案所在的資料夾\" 必須以\結尾。
f = dir(p & xls?")
while f <>
with & f, false, true) '唯讀、不更新打卡掃瞄到的檔案。
n = '匯氏哪總結果表已有行數。
i = sheets("彙總").
if n = 1 then
彙總表為，合併的第乙個檔案。
arr = sheets("彙總").range("a1").resize(i - 14, 20) '獲取a1開始的內容，去掉合計開始的14行。
else後續檔案。
喚敬 n = n + 1
arr = sheets("彙總").range("a3").resize(i - 16, 20) '獲取a3開始、合計之前的行。
end if
1).resize(ubound(arr), ubound(arr, 2)) arr '檔案中的內容以數值方式填入彙總表。
close false '關閉檔案，不儲存。
end with
f = dir
wendend sub
2樓：網友
用vba並不麻煩，提供個思路：新建乙個「彙總」工作表的合凳仿並表（後邊簡稱合併表），格式跟「彙總」那個**是一樣的，中間資料行是可以根鉛飢據你需要合併的資料量變化的，在所有合併工作簿的資料夾中（當然最好這個資料夾是指定唯一的），在每個待合併工作簿裡查詢彙總的資料，直接複製過來合併表中（僅僅複製資料，無任何公式的），迴圈一次就可以搞定了。你看看這個思路是否能解決你的問題。
截圖就是大致槐粗返思路的結果示意。
3樓：網友
vba唯讀取數值，並不讀公式，有啥麻煩的？
4樓：萌新資格證書
不給資料，怎麼對症下藥。
合併excel多個工作簿vba**
5樓：
摘要。合併excel多個工作簿vba**。
求乙個vba，乙個資料夾中多個excel工作簿合併成乙個工作表
6樓：網友
1、將需要合併的excel檔案與目的excel檔案放在乙個資料夾下。
2、 開啟，將「開發工具」選單載入到excel選單下。
<>4、 製作世虛罩匯入鍵。點選「開發工具」選單，選擇「插入」--activex」控制項下的命令按鍵。在工作表中畫乙個命令按鈕。
5、 單擊「開發工具」下的「設搜鬧計模式」，再雙擊剛剛建立的命令按鈕「commandbutton1」,進入**框。
6、 將以下**全部複製到**框中。
7、 將hb檔案儲存成啟用巨集的工作簿。關閉當前**框，回到excel介面。選擇「檔案」--另存為」--儲存型別」下選擇「啟用巨集的工作簿」，ok。
8、開啟，單擊按鈕。則幾個需要合併的excel檔案譽段中的工作表a,b,c合併到了這個檔案中。
怎樣清除整個excel工作簿中的數值,保留公式
你的意思是清除除含文字 公式以外的單元格數值是嗎？這個其實並不難做到啊！用is類的函式判斷一下。再結合if函式。或者用vba。歡迎到excel home論壇學習 交流 謝謝！下面這個巨集可以幫你清除不包括文字和公式的數值哦。試試吧。sub 清除數字 dim rng as range dim x as...
EXCEL整個工作簿轉PDF後其中多頁的工作表匯出後縮在一張裡怎麼解決
1 首先將excel 點選開啟。2 開啟之後，點選頁面佈局選項卡里面的列印區域。3 然後點選左上角的檔案選項。4 點選了之後，在彈出的視窗裡面選擇列印裡面的列印預覽。5 進入列印預覽頁面之後，在此頁面的工具欄上面找到頁面設定，點選進入。6 進入到頁面設定之後，在縮放裡面選擇調整為將整個工作表列印在一...
excel如何引用不同工作簿的資料有效性
用迂迴函式，如 indirect sheet1 a a 或用自定義名稱 選定 選單欄 插入 名稱 定義。可以先在一個工作表讀取另一個工作簿中你所需設定有效性的內容，然後再在本工作簿中以這個工作表來設定有效性 如何在excel不同的工作表之間使用資料有效性？選擇復 資料有效性 之後，在 允許制 裡從下...