如何使excel中的巨集命令自動使用在上百個excel中

2021-04-18 19:07:34 字數 2903 閱讀 1544

1樓:匿名使用者

解決方法很多。

方法一、在上百

個(需要使用該巨集的)excel工作簿中插入模組,專並將該巨集**複製過去。屬方法

二、將當前這個包含巨集的工作簿開啟,需要時只要執行該巨集就可以了。當然還要看這個巨集的**是如何編寫的,跨工作簿執行是否會有問題,總之,只要對**做少量修改就能使其通用化。

2樓:

把這個檔案來存到c:\program files\microsoft office\office11\xlstart就好了,自這樣開啟excel會自動開啟你這個有巨集的檔案,那樣你再想在你那上百個檔案中用巨集時就可以直接呼叫了

3樓:匿名使用者

excel啟動時自動執行復

其中administrator部分應改為當前的使用者名稱

此外,excel2010的選項-》高階-》常規-》啟動時開啟此目錄中的所有檔案 也可以設定任意資料夾

4樓:匿名使用者

一、找到位置,複製進去。不同系統賬戶位置不同,查詢比較麻煩。

二、打來檔案,把巨集複製出來到記事本,關閉,新建檔案錄製個人巨集,將記事本的替換進去。不過,快捷鍵要重新設定。

如何使用excel巨集命令實現自動計算功能?

5樓:sky不用太多

chartovalue() 函式可計算單個單元格中可能含有的計算公式。若a1單元格有3×4+3,要求b1出結果,請在b1的輸入框中填寫=chartovalue(a1) 。並支援下拉自動應用公式。

strtosum()函式可計算單元格區域中可能含有的計算公式。若想在h10中求a1:f10的彙總結果,請在h10的輸入框中填寫=strtosum(a1:f10) 。

'以下是需要使用的**,請按下alt+f11啟動vba編輯器,插入乙個模組,將以下**貼上其中,就可以應用了。

public function chartovalue(myrange as range) as single

'將單元格中可能存在的算式進行計算(僅限於四則運算和括號)

on error resume next

dim str1 as string, str2 as string, str3 as string, str4 as string

dim i as integer

str1 = myrange.text

str2 = "1234567890.+-*/ ()+-×÷()"

'取出算式

for i = 1 to len(str1)

str3 = mid(str1, i, 1)

if instr(1, str2, str3) > 0 then

str4 = str4 & str3

end if

next

'替換算式中因為習慣可能存在的非法,以利計算

str4 = replace(str4, "+", "+")

str4 = replace(str4, "-", "-")

str4 = replace(str4, "×", "*")

str4 = replace(str4, "÷", "/")

str4 = replace(str4, "(", "(")

str4 = replace(str4, ")", ")")

str4 = evaluate(str4)

if isnumeric(str4) = true then

chartovalue = val(str4)

else

chartovalue = 0

end if

end function

public function strtosum(myrange as range) as single

'將單元格區域中含有的算式彙總結果——區域中單元格必須連續

'如:我有15元+欠別人10元,彙總結果=25,而不是 5

dim i as long

dim sumsing as single

with myrange

for i = 1 to .cells.count

sumsing = sumsing + chartovalue(.cells(i))

next

end with

strtosum = sumsing

end function

微軟的office是最為流行的辦公軟體,主要有office2010和office2007兩個版本。office 2000是第三代辦公處理軟體的代表產品,可以作為辦公和管理的平台,以提高使用者的工作效率和決策能力。office 2000中文版有4種不同的版本:

標準版、中小企業版、中文專業版和企業版。

在office 2000中各個元件仍有著比較明確的分工:一般說來,word主要用來進行文字的輸入、編輯、排版、列印等工作;excel主要用來進行有繁重計算任務的預算、財務、資料彙總等工作;powerpoint主要用來製作演示文稿和幻燈片及投影片等;access是乙個桌面資料庫系統及資料庫應用程式;outlook是乙個桌面資訊管理的應用程式;frontpage主要用來製作和發布網際網路的web頁面。

microsoft office xp是微軟有史以來所發行的office版本中最重要的版本,而且也被認為是迄今為止功能最強大、最易於使用的office產品。新版office放棄了以往以產品發布年命名的慣例!產品名稱中的xp,是英文experience(體驗)的縮寫,代表著新版office在包容覆蓋廣泛裝置的web服務之後,將給使用者帶來豐富的、充分擴充套件的全新體驗。

除核心的 office xp 程式 — microsoft word、excel、outlook和 powerpoint— 外,office xp 專業版 中包含 microsoft access 2002,它是 office xp 資料庫解決方案,可幫助使用者儲存、訪問和分析資料。

excel中怎樣使不及格的分數自動用紅色表示出來啊

材料 工具 excel2010 1 開啟學生excel成績表,用滑鼠從頭到尾將全部學生每門科目的分數全部框選。2 然後單擊excel介面上方功能區 開始 選項卡中 條件格式 下的小三角,開啟下拉列表,選擇 新建規則 命令。3 單擊該命令後,彈出 新建格式規則 對話方塊。在對話方塊中的 選擇規則型別 ...

EXCEL如何自動求和呢,在excel中自動求和怎麼設定

excel如何一鍵求和?假設想求a1 a15以及c10 d15的和應該在 某個單元格 你想放在 就放在 輸入公式 sum a1 a15,c10 d15 其中,sum函式的求和引數不得超過30個 如果有一組資料 a1 a10 也就是 a1 到a 10 的資料,你想在 a11 求出 a1 a10 的和,...

如何在excel中自動新增行,excel表格如何自動新增行

excel中自動增加行的方法 1.首先,開啟excel 然後選中需要自動換行的單元格區域,單擊選單欄的 格式 中的 單元格 2.在彈出的 格式單元格 視窗中選擇 對齊 3.將 文字控制 下面的 自動換行 勾選,確定即可。excel的行數是固定的.無法增加行.付費內容限時免費檢視 回答excel中是不...