excelvba命令

⑴ EXCEL 表格VBA命令

最好的方法就是在模版文件的打開事件中寫入代碼，先自動將某個固定的單元格內容加1，然後另存為到你指定的文件夾中，代碼很簡單：
Private Sub Workbook_Open()
With ThisWorkbook
.Sheets(1).[a1].Value = Sheets(1).[a1].Value + 1'單元格數據增加1
.Save'保存
.Sheets(1).[a1].ClearContents'清除a1單元格內容
.SaveAs "c:\" & ThisWorkbook.Name'另存為到指定路徑下
End With
End Sub

⑵ EXCEL 怎麼用VBA實現每隔1分鍾自動執行ctrl+s（保存）命令

1、首先在電腦上滑鼠右鍵單擊任意Excel表格，在右鍵菜單中選擇打開命令。

⑶ 5.3 Excel VBA的命令按鈕

命令按鈕(CommandButton )是應用程序中最經常使用的控制項，用來控制引發某一事件，完成各種功能。命令按鈕位於工具箱中，圖標如圖5.16所示。單擊命令按鈕的圖標，在窗體中要添加控制項的位置拖拽滑鼠，即添加一個命令按鈕。添加後還可以改變按鈕的大小及位置，也可以利用Top. Left. Width和Height屬性進行設置。

⑷ EXCEL VBA 某命令詳解

創建一個對象，該對象代表保存在網頁上的文檔中的項目。當對 Microsoft Excel 中的文檔進行了一些自動修訂時，這些對象可幫助隨後對網頁進行的更新。返回 PublishObject 對象。

PublishObject.Add(SourceType, Filename, Sheet, Source, HtmlType, DivID, Title)

SourceType XlSourceType 類型，必需。源的類型XlSourceType 可為以下 XlSourceType 常量之一。表示源對象。
xlSourceAutoFilter 自動篩選區域。
xlSourceChart 圖表。
xlSourcePivotTable 數據透視表。
xlSourcePrintArea 選定要列印的單元格區域。
xlSourceQuery 查詢表（外部數據區域）。
xlSourceRange 單元格區域。
xlSourceSheet 整張工作表。
xlSourceWorkbook 工作簿。

Filename String 類型，必需。用於保存源對象的 URL（在 Intranet 或網站上）或路徑（本地或網路上）。

Sheet Variant 類型，可選。保存為網頁的工作表名稱。

Source Variant 類型，可選。是用來標識數據項的唯一名稱，而這些數據項的 SourceType 參數為下列常量之一：xlSourceAutoFilter、xlSourceChart、xlSourcePivotTable、xlSourcePrintArea、xlSourceQuery 或 xlSourceRange。如果 SourceType 為 xlSourceRange，則 Source 指定的是一個區域，該區域可以是一個已定義的名稱。如果 SourceType 為 xlSourceChart、xlSourcePivotTable 或 xlSourceQuery，則 Source 指定的是圖表、數據透視表或查詢表的名稱。

HtmlType Variant 類型，可選。用於指定數據項是保存為某個互動式的 Microsoft Office Web Component 還是靜態文本和圖像。可為下表所列的 XlHTMLType 常量之一。

常量 說明
xlSourceAutoFilter 「自動篩選」區域
xlSourceChart 圖表
xlSourcePivotTable 數據透視表
xlSourcePrintArea 選定的用於列印的單元格區域
xlSourceQuery 查詢表（外部數據區域）
xlSourceRange 單元格區域
xlSourceSheet 整張工作表

ChDir 語句------改變當前的目錄或文件夾

⑸ 關於 Excel VBA 添加自定義命令

添加個標准模塊，把代碼放進去，然後就可以在表格的公式欄使用了

假設這個函數名為 MyFunction,可以在某個單元格的公式欄輸入 =MyFunction() 。這樣這個單元格就可以獲得你的函數的返回值了，當然，你不要試圖在你的自定義函數裡面更改其他單元格的值，只能讀取！！！微軟因為安全問題不允許在自定義函數裡面更改其他值，當然啦，這個也是有變通方法的。

⑹ 如何在EXCEL的VBA命令按鍵代碼中設定恆定的數字

Sub
Macro3()
'
'
Macro3
Macro
ActiveCell.FormulaR1C1
=
"1"
End
Sub
將該宏命令的快捷鍵設為
ctrl+字母
，就實現了你的功能，建議設為ctrl+L，順手。
如果想改換內容，就把「1」的1換成其他內容。

⑺ 在excel中如何使用vba命令實現批量刪除指定名稱的工作表

按Alt
+
F11，雙擊ThisWorkbook，粘貼下面的代碼：
Sub
ouyangff()
On
Error
Resume
Next
Application.DisplayAlerts
=
False
For
i
=
2
To
[g65536].End(3).Row
a$
=
Cells(i,
7)
Sheets(a$).Delete
Next
Application.DisplayAlerts
=
True
End
Sub
按Alt
+
F11，回到你的畫面所示的「表」中！
按Alt
+
F8，確定！
去試一試吧！！！

⑻ excel vba常用代碼

Visual Basic for Applications（簡稱VBA）是新一代標准宏語言，是基於Visual Basic for Windows 發展而來的。它與傳統的宏語言不同，傳統的宏語言不具有高級語言的特徵，沒有面向對象的程序設計概念和方法。而VBA 提供了面向對象的程序設計方法，提供了相當完整的程序設計語言。VBA 易於學習掌握，可以使用宏記錄器記錄用戶的各種操作並將其轉換為VBA 程序代碼。這樣用戶可以容易地將日常工作轉換為VBA 程序代碼，使工作自動化。[1]

數據類型

基本數據類型

即Primary Type Data，下述列表的括弧內為位元組數：

• Byte(1)：無符號數類型，取值范圍0-255

• Boolean(2)

• Integer(2)

• Long(4)

• Single(4)

• Double(8)

• Currency(8)

• Decimal(14)

• Date(8)

• String

• Object(4)

• Variant（根據分配確定）[2]

自定義的數據類型

相當於C語言的struct，例如：[2]

Type 自定義類型名 元素名 As 類型 … [元素名 As 類型] End Type

數組

• Option Base 0 ：數組索引值從0開始[2]

• Option Base 1 ：數組索引值從1開始

• Dim MyArray(10) ：聲明一個數組變數，10是最大的可用的數組索引值

• MyArray(5) = 101 ：給數組的元素賦值

• Dim Data(10,5) ：聲明一個二維數組變數

• Data(1,1) = "A001" ：給數組元素賦值

• Dim cArr(-11 To 20, 1 To 3) As String ：聲明一個數組，定義數組索引值的上下界

• Dim dArr() As String ：聲明動態數組

• ReDim dArr(0 To 5, 1 To 2) ：改變動態數組的尺寸默認把原數據清除。如果保留原來的數據，必須加上參數

• Preserve：使用Preserve參數時只能改變最後一位的大小

• If UBound(vTemp) = -1 Then：判斷數組變數vTemp是否為空數組

• End If Erase MyArrar, Data Erase語句清除數組元素，釋放變數佔用的空間[2]

常量

編輯

系統定義常量

系統定義常量有3個：True、False和Null。[4]

固有常量

固有常量是編程時引用的對象庫定義的常量。所有固有常量都可以在宏或VBA代碼中使用。通常，固有常量通過前兩個字母來指明定義該常量。來自VB庫的常量則以「vb」開頭。來自Access的常量以「ac」開頭。可以使用對象瀏覽器來查看所有對象庫中的固有常量列表。[4]

在VBA中，常量的數據類型有整型、長整型、單精度型、雙精度型、位元組型、貨幣型、字元型、日期型和邏輯型。一個整型數據就是一個整型常量，一個長整型數據就是一個長整型常量。例如，12%、-1%是整型常量，32768&、10000000&是長整型常量，-2.5 1、3.14是單精度實型常量，3.1415926#是雙精度實型常量，China、Shanghai是字元型常量，#07/13/2001 11:45PM#是日期常量，由符號 「 # 」 將字元括起來。[4]

符號常量

可以自行定義的常量即符號常量，必須先定義，後使用。可見，需要聲明的常量都是符號常量。[4]

基本語法格式:

1
[Publicr/Private]Const常量名[As類型]=表達式

如：Global Const符號常量名稱 = 常量值[4]

語句功能:

定義一個符號常量，並將指定表達式的值賦給符號常量。[4]

語句說明如下:[4]

1)「常量名」指定符號常量的名字。符號常量名可以由字母、數字和下畫線組成，但只能以字母開頭，不能含有空格。[4]

2)「表達式」指定符號常量的值。該表達式通常由數值型、字元型、邏輯型或日期型數據以及各種運算符組成，但在表達式中不能出現變數和函數。[4]

3) public用來表示這個常量的作用范圍是整個資料庫的所有模塊。[4]

4) private則表示這個常量只在使用該聲明常量語句的模塊中起作用。[4]

說明：

1)除用戶定義的符號常量外，VBA還提供了許多符號常量，我們可以直接使用。[4]

2)對數碼比較長，並且在程序中多次使用的常量，通常使用符號常量代替。運行程序時，系統自動把程序中的所有符號常量換為賦給它的值。[4]

變數

編輯

與常量一樣，變數也是一塊內存空間，用於保存程序運行過程中可能變化的數據。變數的名稱是用戶定義的一個標識符。[5]

在代碼中需要使用該變數時，只需引用相應的標識符即可，而不用管變數當前的值具體是什麼。[5]

聲明

與用戶自定義的常量相似，變數在使用之前都需要聲明，在VBA中聲明變數的語法格式有以下幾種：[5]

• 關鍵字變數名 AS數據類型

• 關鍵字變數1，變數2 ... 變數n AS數據類型

• 關鍵字變數1 AS數據類型，變數2 As數據類型， ... ，變數n AS數據類型

在第二種語法格式中， 「變數n」的數據類型為AS關鍵字後定義的數據類型，而「變數1」、「變數2」、…的數據類型為變體型。[5]

在VBA中，可用Dim、Private、Public和Static這4個關鍵字來聲明變數，使用不同關鍵字聲明的變數其含義也有所不同。[5]

◆ 利用Dim關鍵字聲明變數：Dim關鍵字主要用來在內存中分配一塊空間，並為該空間命名，是VBA中聲明變數最常用的關鍵字。使用Dim關鍵字聲明的變數只能在當前過程或模塊中使用。[5]

◆ 利用Private關鍵字聲明變數：Private關鍵字用於在類模塊中聲明一個私有變數，它只能在當前的類模塊中使用。當定義變數的位置同處於類模塊中時，其使用效果與使用Dim關鍵字定義的變數相同。[5]

◆ 利用Public關鍵字聲明變數：利用Public關鍵字聲明的變數可以在程序的任何地方調用，而與聲明變數的位置無關。[5]

◆ 利用Static關鍵字聲明變數：Static關鍵字用於聲明靜態變數，即變數的值在整個代碼運行期間都能被保留。[5]

賦值

變數在使用時還需要對其進行賦值。在VBA中對變數進行賦值可通過 「 = 」 符號或 「 Set 」 關鍵字進行。通過 「 = 」 符號對變數賦值的語法格式有以下幾種。[5]

• 變數名=數據

• 變數1=變數2 運算符 數據

• 變數1=變數2 運算符 變數3 … 運算符 變數n

如果在定義變數時指定了變數的數據類型，則為變數所賦的值也必須是該數據類型的值。如果變數定義為Integer類型，而在賦值時卻給了變數一個String類型的數據，則在編譯運行的過程中將彈出錯誤彈框。[5]

運算符

編輯

運算符是在程序中執行計算功能的某些特殊符號，它是程序代碼的重要組成部分。在程序代碼中，運算符不能單獨使用，必須與其操作數共同組成表達式後才具有運算意義。VBA中的運算符包含算術運算符、連接運算符、比較運算符和邏輯運算符等。[4]

算術運算符

算術運算符主要用於執行四則運算，僅用算術運算符連接起來的表達式稱為算術表達式。算術運算符及其作用與示例如表所示。[5]

例子

名稱

結果

-$a

取反

$a 的負值。

$a + $b

加法

$a 和 $b 的和。

$a - $b

減法

$a 和 $b 的差。

$a * $b

乘法

$a 和 $b 的積。

$a / $b

除法

$a 除以 $b 的商，允許小數。

$a $b 除法 $a 除以 $b 的商，結果取整。

$a Mod $b

取余

$a 除以 $b 的余數

注意：

在執行算術運算時，運算符兩側操作的數據類型必須相同，否則會出現「類型不匹配」的錯誤提示。當「+」運算符左右兩側都是字元串類型的操作數時，執行的是連接運算，如表達式「"Pass+"word"的計算結果為字元串「 PassWord 」。[5]

連接運算符

連接運算符的作用是將運算符兩側的操作數連接成一個數，其操作數的數據類型通常都為String類型。VBA中的連接運算符有「&」和「+」兩種，由於使用「+」執行連接運算時，容易與加法運算混淆，所以通常都採用「&」進行連接運算。[5]

比較運算符

比較運算符可以對運算符兩側的操作數執行比較運算，其返回結果為Boolean類型的True或False。比較運算符的操作數通常為具體的數值，當操作數為字元串或其他符號時，是根據該符號的ASCII碼進行比較的。VBA中的比較運算符及其作用與示例如表所示。[5]

例子

名稱

結果

$a = $b

等於

TRUE，如果 $a 等於 $b。

$a <> $b

不等

TRUE，如果 $a 不等於 $b。

$a < $b

小於

TRUE，如果 $a 嚴格小於 $b。

$a > $b

大於

TRUE，如果 $a 嚴格大於 $b。

$a <= $b

小於等於

TRUE，如果 $a 小於或者等於 $b。

$a >= $b

大於等於

TRUE，如果 $a 大於或者等於 $b。

邏輯運算符

邏輯運算符用於對運算符兩側的操作數執行邏輯運算，參與邏輯運算的操作數本身可以是邏輯表達式(表達式的最終結果為True或 False)，也可以是算術表達式(表達式的最終返回值為0或非0)。[5]

在邏輯運算中，數值0與邏輯值 False相同，表示邏輯假；非0數值與True相同，表示邏輯真。邏輯運算符及其含義與示例如表所示。[5]

例子

名稱

結果

$a and $b

And（邏輯與）

TRUE，如果 $a 與 $b 都為TRUE。

$a or $b

Or（邏輯或）

TRUE，如果 $a 或 $b 任一為TRUE。

$a xor $b

Xor（邏輯異或）

TRUE，如果 $a 或 $b 同位相異。

Not(1>2)

Not（邏輯非）

TRUE。

(1>2) Eqv (1>2)

兩個操作數同為假，返回False;兩個操作數同為真，返回True；兩個操作數一真一假，返回False

TRUE。

2<>1 Imp 3<5

運算符左右同為真,返回True;左右同為假,返回True;左真右假,回返 False;左假右真,返回True

TRUE。

語法結構

編輯

if 語句

1
if條件1then語句1elseif條件2then語句2elseif......else語句nendif

Select Case 語句

1
SelectCase表達式Case表達式列表1語句1Case表達式列表2語句2...Case表達式列表n語句nEndSelect

其中的表達式列表可以為：[5]

• 表達式例： "A"

• 用逗號分隔的一組枚舉表達式例：2,4,6,8

• 表達式1 To表達式2 例：60 To 100

• Is關系運算符表達式 例：Is < 60

Do...Loop 語句

1
DoWhile或Until條件語句塊1ExitDo語句塊2Loop

For...Next語句

1
Do語句塊1ExitDo語句塊2LoopWhile或Until條件

For Each … Next語句

1
For循環控制變數=初值To終值Step步長語句塊『ExitFor語句可以跳出循環體Next

跳出本次循環的continue語句

1
For循環控制變數=初值To終值Step步長Do'用於模擬continue語句塊If條件ThenExitDo'用於模擬continue語句塊LoopWhileFalse'用於模擬continueNext

With語句

1
With對象引用語句塊EndWith

On Error語句

1
OnErrorGoto出錯處理語句的label'跳轉到出錯處理語句

或

1
OnErrorResumeNext'遇到錯誤，不管錯誤，繼續往下執行

具有控製作用的函數

• If(條件式,表達式1,表達式2)[5]

• Switch(條件式1,表達式1,[條件式2,表達式2[,...,條件式n,表達式n]])

• Choose(索引式,選項1[,選項2,...[,選項n]]) '這是基於1的索引

其他語句

編輯

注釋語句

使用REM或者單引號開始的行。[6]

語句的連寫與續行

如果一行包括多條語句，用冒號分割各個語句。跨多行的語句，在行末用「空格加下劃線」表示續行[6]。

過程與函數

編輯

12
Sub過程名(參數表)語句塊ExitSub語句塊EndSub
1
Function函數名(參數表)AsType語句塊函數名=表達式ExitFunctionEndFunction

可以是Private、Public、Friend、Static等修飾。[6]

調用函數/過程時，可以加括弧或者不加括弧。如果調用表達式作為一行的一部分，那麼必須用參數，例如函數調用的返回值賦給變數。 調用過程時， 可以使用/不使用call關鍵字。使用call語句調用過程，如果無參數，則不加括弧；如果有參數，必須加括弧。如果調用時用括弧包住單個參數，則該參數強行按值傳遞。需要特別注意，不用call不加括弧的調用，形參與實參是傳值(passed by value)而不是傳引用(passed by reference)，這會導致一些對象的方法調用失敗。例如：[6]

1
DimcnAsADODB.ConnectionSetcn=CurrentProject.ConnectionDimrsAsNewADODB.Recordsetrs.Open"SELECT*FROMmyTable",cnDimExcelAppAsNewExcel.=ExcelApp.Workbooks.Add.Worksheets(1)ExcelWst.Range("A2").CopyFromRecordset(rs)'失敗，無法執行該行ExcelWst.Range("A2").CopyFromRecordsetrs'可成功執行該行

常用內置函數

編輯

VBA的常用內置函數：[5]

• MsgBox

• InputBox

• 舍入函數：Fix 向0取整,Int向下取整, Round四捨五入

• Rnd： 返回0-1內的單精度隨機數

• 字元串函數：[5]

• Filter：對字元串的一維數組的過濾

• InStr([Start, ]<Str1>,<Str2>[, Compare])與InStrRev： 查找子串

• Len：字元串長度

• Join：連接一維數組中的所有子字元串

• Left,Right,Mid： 截取子字元串

• Space(數值) ：生成空格字元串

• Ucase,Lcase：大小寫轉換函數

• Ltrim, Rtrim,Trim ：刪除首尾空格

• Replace

• Split：分割一個字元串成為一維數組

• StrComp：字元串比較

• StrConv：字元串轉換

• String(number, character)：制定字元重復若干次

• StrReverse

• 日期/時間有關函數：[5]

• Year, Month, Day, WeekDay,Hour,Minute,Second： 截取日期時間分量

• DateAdd： 日期/時間增量函數

• DateDiff(<間隔類型>,<日期1>,<日期2>[,W1][,W2])日期/時間的距離函數

• DatePart(<分割類型>,<日期>[,w1][,w2])時間分割函數

• DateSerial(<表達式1>,<表達式2>,<表達式3>) 合成日期；DateValue(「字元串表達式」)返回日期；

• Date,Time,Now,Timer： 返回日期時間

• DateValue

• TimeSerial：由時間序列得到時間對象

• TimeValue：由時間字元串得到時間對象

• Weekday：獲得日期的周幾

• WeekdayName

• 轉換函數：CBool、CByte、CCur、CDate、 CDbl、CDec、CInt、CLng、CLngLng、CLngPtr、[5]CSng、CStr、CVar、CVErr、Asc(<字元串表達式>)返回第一個字元的Ascii編碼值、Chr(ASCII碼)返回字元、Hex、Oct、Str(<數值表達式>)返回字元串、Val(string)、Format、FormatCurrency、FormatDateTime、FormatNumber、FormatPercent、MonthName。

• Nz(表達式或欄位屬性值[,規定值])如果是空，則返回0或者""或者函數的第二個參數值[5]

• 驗證函數：isNumeric、isDate、isNull、isEmpty、IsArray、IsError、IsMissing、IsObject[5]

• 數學函數：Abs、Sqr、Tan、Atn（即atan）、Sin、Cos、Exp（e為基的指數）、Log自然對數[5]

• Array：構造一個Array對象[5]

• CallByName: get or set a property, or invoke a method at run time using a string name.[5]

• 控制流：Choose:類似於C語言的select語句、If相當於IF-ELSE語句、Switch[5]

• Command：獲取命令行參數[5]

• CreateObject：創建ActiveX對象

• CurDir：返回指定驅動器的當前工作路徑[5]

• 由基本數學函數導出的函數：Sec、Cosec、Cotangent、Cotan、Arcsin、Arccos、Arcsec、Arccosec、Arccotan、HSin、HCos、HTan、HSec、HCosec、HCotan、HArcsin、HArccos、HArctan、HArcsec、HArccosec、HArccotan、LogN

• DoEvents：暫時把CPU控制權交回給系統[5]

• Environ：返回環境變數的值[5]

• 文件操作：[5]

• Dir：返回滿足條件的所有文件、目錄的名字

• EOF

• FileAttr

• FileDateTime

• FileLen

• FreeFile Function

• GetAttr：返迴文件、目錄的屬性值

• Input：讀取文件

• Loc：文件指針位置

• LOF：文件打開時的指針位置

• Seek：文件指針定位

• Spc：使用Print做position output

• Tab：用於Print函數

• Error:錯誤號對應的錯誤消息[5]

• Windows Registry中的數據：GetAllSettings、SaveSetting、DeleteSetting、GetSetting[5]

• GetObject：ActiveX組建的引用[5]

• IMEStatus：返回當前Input Method Editor (IME)[5]

• Macintosh平台：MacID、MacScript[5]

• 金融函數：[5]

• DDB：使用double-declining balance計算貶值

• FV:計算固定利率的年金

• IPmt：計算利率

• IRR：計算利率

• MIRR：計算利率

• NPer：計算周期數

• NPV：計算net present value

• Pmt：計算支付數

• PPmt：計算本金支付數

• PV：計算present value

• Rate：利息率

• SLN：straight-line depreciation

• SYD：計算sum-of-years' digits depreciation

• Partition：返回字元串，表示一個數值名字落在各個range內。常用於SQL select語句[5]

• QBColor：顏色值[5]

• RGB：顏色值[5]

• TypeName：得到變數的類型名[5]

• VarType：得到變數的類型數[5]

⑼ excel vba命令怎麼弄

1、range("f2).resize(range("f50000").end(xlup).row-1,1)
2、ISNUMBER(值)
3、沒明白
4、if ISNUMBER(值)=false then
msgbox "不是數字"
endif