vba函數參考手冊(vba do while循環語句舉例)

大家好,今天來為大家解答vba函數參考手冊這個問題的一些問題點,包括vba do while循環語句舉例也一樣很多人還不知道,因此呢,今天就來為大家分析分析,現在讓我們...
大家好,今天來為大家解答vba函數參考手冊這個問題的一些問題點,包括vba do while循環語句舉例也一樣很多人還不知道,因此呢,今天就來為大家分析分析,現在讓我們一起來看看吧!如果解決了您的問題,還望您關注下本站哦,謝謝~
vba sub函數參數
sub是子程序沒有返回值,無需定義返回值類型。Sub過程有兩種方法:
以下兩個語句都調用了名為MyProc的Sub過程。
CallMyProc(FirstArgument,SecondArgument)
MyProcFirstArgument,SecondArgument
注意當使用Call語法時,參數必須在括號內。若省略Call關鍵字,則也必須省略參數兩邊的括號。
excel vba 常用函數
1、VBA肯定能調用工作表函數,調用方法也是很簡單,只需在函數名稱前面加上:Application.WorksheetFunction.函數名(參數)。
其參數的使用規則與在工作表中使用要求完全一致。除了能調用工作表函數,VBA自身內置也有很多函數可以使用。因為是VBA自身內置的函數,所以在使用時,在前面可以加上:VBA.函數名,也或者直接調用寫函數名。經常有人可能用不同版本的辦公程序打開有代碼的工作簿,結果就有可能會出現如“找不到工程或庫”的提示。怎么辦呢?如果是因為VBA自身內置函數的原因,則可以在前加上“VBA.”就行了。
當然,也可在VBE界面中菜單【工具】->【引用】打開引用對話框,查找帶勾項中含“丟失…”、“找不到…”、“MISSING…”的條目,并取消勾選,確定,基本就可以了。現在總結下常用的VBA自身內置函數如下(中間文字過長,或以跳轉到最下面看看“其他常用函數”,很有用的哦。):
2、測試類函數:
IsNumeric(x)-是否為數字,返回Boolean結果。
IsDate(x)-是否是日期,返回Boolean結果。
IsEmpty(x)-是否為Empty,返回Boolean結果。
IsArray(x)-指出變量是否為一個數組。
IsError(expression)-指出表達式是否為一個錯誤值。
IsNull(expression)-指出表達式是否不包含任何有效數據(Null)。
IsObject(identifier)-指出標識符是否表示對象變量。
3、數學函數:
Sin(X)、Cos(X)、Tan(X)、Atan(x)-三角函數,單位為弧度。
Log(x)、Exp(x)-返回x的自然對數,指數。
Abs(x)-返回x的絕對值。
Int(number)、Fix(number)-都返回參數的整數部分,區別:Int將-8.4轉換成-9,而Fix將-8.4轉換成-8。
Sgn(number)-返回一個Variant(Integer),指出參數的正負號。
Sqr(number)-返回一個Double,指定參數的平方根。VarType(varname)-返回一個Integer,指出變量的子類型。
Rnd(x)-返回0-1之間的單精度數據,x為隨機種子。
Round(x,y)-把x四舍五入得到保留y位小數的值。
4、字符串函數:
Trim(string)、Ltrim(string)、Rtrim(string)-去掉string左右兩端空白,左邊的空白,右邊的空白。
Len(string)-計算string長度
Replace(expression,find,replace)-替換字符串。
Left(string,x)、Right(string,x)、Mid(string,start,x)-取string左/右/指定段x個字符組成的字符串Ucase(string)、
Lcase(string)-轉換字符串為大、小寫Space(x)-返回x個空白的字符串
Asc(string)-返回一個integer,代表字符串中首字母的字符代碼
Chr(charcode)-返回string,其中包含有與指定的字符代碼相關的字符
InStr()-返回一個字符串在另外一個字符串中的位置,返回值為Variant(Long)型。
5、轉換函數:
CBool(expression)-轉換為Boolean型
CByte(expression)-轉換為Byte型
CCur(expression)-轉換為Currency型
CDate(expression)-轉換為Date型
CDbl(expression)-轉換為Double型
CDec(expression)-轉換為Decemal型
CInt(expression)-轉換為Integer型
CLng(expression)-轉換為Long型
CSng(expression)-轉換為Single型
CStr(expression)-轉換為String型
CVar(expression)-轉換為Variant型
Val(string)-轉換為數據型
Str(number)-轉換為String
5、時間函數:
Now、Date、Time-返回一個Variant(Date),根據計算機系統設置的日期和時間來指定日期和時間。
Timer-返回一個Single,代表從午夜開始到現在經過的秒數。
TimeSerial(hour,minute,second)-返回一個Variant(Date),包含具有具體時、分、秒的時間。
DateDiff(interval,date1,date2[,firstdayofweek[,firstweekofyear]])-返回Variant(Long)的值,表示兩個指定日期間的時間間隔數目。
Second(time)-返回一個Variant(Integer),其值為0到59之間的整數,表示一分鐘之中的某個秒。
Minute(time)-返回一個Variant(Integer),其值為0到59之間的整數,表示一小時中的某分鐘。
Hour(time)-返回一個Variant(Integer),其值為0到23之間的整數,表示一天之中的某一鐘點。
Day(date)-返回一個Variant(Integer),其值為1到31之間的整數,表示一個月中的某一日
Month(date)-返回一個Variant(Integer),其值為1到12之間的整數,表示一年中的某月。
Year(date)-返回Variant(Integer),包含表示年份的整數。
Weekday(date,[firstdayofweek])-返回一個Variant(Integer),包含一個整數,代表某個日期是星期幾。
其它常用函數:
Shell-運行一個可執行的程序。
InputBox-這個太熟悉了,簡單輸入對話框。這個需要注意與Application.InputBox(更強大,內置容錯處理,選擇取消后返回false)區分,而這個函數不含有容錯處理,而且選擇取消后返回空串(零個字節的字符串)。
MsgBox-這個更不用說了,簡單信息顯示對話框,其實也是一種簡單的輸入手段。
Join-連接數組成字符串。
Split-拆分字符串成數組。
RGB-返回指定R、G、B分量的顏色數值。
Dir-查找文件或者文件夾。
IIF(expression,truePart,falsePart)-IF語句的“簡化版本”(比喻,當然并不一樣);expression為true的話返回truePart,否則返回falseParth。Choose(index,choice1,...choiceN)-選擇指定Index的表達式,Index可選范圍是1到選項的總數。
Switch(exp1,value1,exp2,value2,...expN,valueN)-從左至右計算每個exp的值,返回首先為true的表達式對應的value部分。如果所有的exp值都不為true,則返回Null。注意雖然只返回一個部分,但是這里所有的表達式exp1到expN都是要被計算的,實際使用中要注意這個副作用。
vba怎么寫代碼函數公式
把提取字符的公式寫入sheet2單元格Subaa()Sheet2.Range("A1").Formula="=left(sheet1!A1,5)"EndSub直接把結果寫入sheet2單元格subaa()sheet2.range("A1").value=left(sheet1.range("A1").value,5)endsub
vba怎樣計算表格中原有數據
vba的countif函數使用:
許多EXCEL問題都涉及數據計數,對于一些簡單的計數,通常使用COUNT函數或COUNTA函數就可以解決。然而,在實際的業務處理當中,往往存在諸多條件的限制,僅僅使用簡單的統計函數是無法滿足人們的實際需求的,例如多條件計數、統計不重復個數等。
例如,在一個EXCEL表格中,D列是考生的數學考試成績,我們想統計數學成績及格的人數。可以使用“=COUNTIF(D:D,">=60")”來實現。
本例中,COUNTIF函數可以對區域中滿足單個條件的單元格區域進行計數。語法如下:
COUNTIF(參數一,參數二),其中參數一為需要計算其中滿足條件的單元格數目的單元格區域,參數二是用于定義將對哪些單元格進行計數的數字、表達式、單元格引用或文本字符串。
COUNTIF函數的常見用法如下:(假如數據所在單元格區域命名為“Data”)
公式說明:
=COUNTIF(Data,"=")返回真空單元格個數(真空單元格是指什么都沒有的單元格)
=COUNTIF(Data,"")返回真空+假真空單元格個數(假真空是指0字符的空文本)
=COUNTIF(Data,"<>")
返回非真空單元格個數
=COUNTIF(Data,"*")
返回文本型單元格個數
=COUNTIF(Data,"<9.99E+307")
返回數值型單元格個數
=COUNTIF(Data,"<>""")返回區域內所有單元格個數
=COUNTIF(Data,"<0")返回偶包含負值的單元格個數
=COUNTIF(Data,"<>0")返回真不等于零的單元格個個數
=COUNTIF(Data,60)
返回值等于60的單元格個數
=COUNTIF(Data,">60")返回值大于60的單元格個數
=COUNTIF(Data,"<60")返回值小于60的單元格個數
=COUNTIF(Data,">=60")
返回值大于等于60的單元格個數
=COUNTIF(Data,"<=60")
返回值小于等于60的單元格個數
=COUNTIF(Data,A1)
返回值與A1單元格內容相同的單元格個數
=COUNTIF(Data,">"&A1)返回值大于A1單元格內容的單元格個數
=COUNTIF(Data,"<"&A1)返回值小于A1單元格內容的單元格個數
=COUNTIF(Data,"???")
返回字符等于3的單元格個數
=COUNTIF(Data,"YDL")
返回值等于YDL的單元格個數
=COUNTIF(Data,"YDL?")
返回以字母YDL開頭且字符數等于4的單元格個數
=COUNTIF(Data,"YDL*")
返回以字母YDL開頭的文本單元格的個數
=COUNTIF(Data,"?YDL*")
返回第2,3,4字符為YDL的單元格個數
=COUNTIF(Data,"*YDL*")
返回含的YDL字符的單元格個數
=COUNTIF(Data,"*"&A1&"*")
返回包含A1單元格內容的文本單元格個數
=COUNTIF(Data,TODAY())返回值等于當前日期的單元格個數
=COUNTIF(Data,">"&AVERAGE(Data))返回大于均值的單元格個數
=SUM(COUNTIF(Data,">"&{10,15})*{1,-1})
返回大于10小于等于15的單元格個數
=SUM(COUNTIF(Data,{TRUE,FALSE}))
返回包含邏輯值的單元格個數
特別指出的是,在EXCEL2010中,新增了一個多條件計數函數,那就是“COUNTIFS”,假如在一個EXCEL表格中,D3:D50單元格的內容是職工的年齡,E3:E50單元格的內容是是否有房,F3:F50單元格的內容是是否有車,那么統計職工中35歲以上有房有車的人數應該用如下公式:
COUNTIFS(D3:D50,">35",E3:E50,"是",F3:F50,"是")。
vbafunction函數的用法
在VBA編程中,自定義函數可以通過編寫Function過程實現。函數可以完成很多復雜的計算,例如求和、平均值、最大值、最小值等。與Excel內置函數類似,自定義函數可以通過函數名和參數來調用。函數名和參數需要在括號內,參數之間用逗號隔開。下面是一個簡單的自定義函數示例:
```
Functionsum(aAsInteger,bAsInteger)AsInteger
sum=a+b
EndFunction
```
上述示例中,定義了一個名為sum的函數,該函數有兩個參數a和b,函數的作用是求兩個數的和。在調用該函數時,需要傳入兩個參數的值,并將函數的返回值賦給一個變量。例如:
```
DimresultAsInteger
result=sum(1,2)
```
上述代碼中,調用了sum函數,并將1和2作為參數傳入,將函數的返回值賦給result變量。
自定義函數的代碼可以保存在模塊中,可以在該模塊中編寫多個自定義函數。在調用自定義函數時,需要在代碼中引用該函數所在的模塊。如果需要在所有工作簿中運行自定義函數,可以將自定義函數代碼保存為加載宏,并將該宏保持運用。
vba條件函數有哪些
用VBA應該都是用方法的吧?函數基本是在EXCEL本身用的。VBA的選擇有以下兩種: IF本身只有兩種選擇,如果是真則1,是假則2,若要實現第三種選擇,必須要嵌套。 多分支選擇一般都選用SelectCase。如果是三種的話,兩種方法都差不多,都可以考慮。
關于本次vba函數參考手冊和vba do while循環語句舉例的問題分享到這里就結束了,如果解決了您的問題,我們非常高興。
本文鏈接:http://www.resource-tj.com/qianduan/2709.html