EXCELVBA函数参考手册

合集下载

excel vba 文本函数

excel vba 文本函数

excel vba 文本函数Excel VBA 文本函数可以用来处理文本字符串,包括字符格式、串联、替换、查找、提取等功能。

常用的文本函数包括:1. Len 函数:用于返回字符串的长度2. Left 函数:用于返回字符串的左侧字符子串3. Right 函数:用于返回字符串的右侧字符子串4. Mid 函数:用于返回字符串的中间字符子串5. InStr 函数:用于查找字符串中第一个与指定字符串匹配的位置6. Replace 函数:用于替换字符串中的指定子串7. Trim 函数:用于去掉字符串两端的空格8. LTrim 函数:用于去掉字符串左侧的空格9. RTrim 函数:用于去掉字符串右侧的空格10. Split 函数:用于将指定字符串根据指定分隔符分成多个子串,并返回一个数组。

例如:Dim str as Stringstr = "Hello World"MsgBox Len(str) '返回字符串长度为 11MsgBox Left(str, 5) '返回字符串左侧子串 "Hello"MsgBox Right(str, 5) '返回字符串右侧子串 "World"MsgBox Mid(str, 3, 5) '返回字符串中间子串 "llo W"MsgBox InStr(str, "World") '返回字符串中 "World" 的位置为 7 MsgBox Replace(str, "World", "VBA") '返回替换后的字符串"Hello VBA"MsgBox Trim(" Hello ") '返回去掉两端空格的字符串 "Hello" MsgBox LTrim(" Hello ") '返回去掉左侧空格的字符串 "Hello "MsgBox RTrim(" Hello ") '返回去掉右侧空格的字符串 " Hello" Dim arr() as Stringarr = Split("1,2,3,4,5", ",")MsgBox arr(2) '返回数组的第三个元素 "3"。

Excel_VBA_函数使用

Excel_VBA_函数使用

Excel_VBA_函数使用函数的使用技巧1 调用工作表函数求和在对工作表的单元格区域进行求和计算时,使用工作表Sum函数比使用VBA代码遍历单元格进行累加求和效率要高得多,代码如下所示。

#001 Sub rngSum()#002 Dim rng As Range#003 Dim d As Double#004 Set rng = Range("A1:F7")#005 d = Application.WorksheetFunction.Sum(rng)#006 MsgBox rng.Address(0, 0) & "单元格的和为" & d#007 End Sub代码解析:rngSum过程调用工作表Sum函数对工作表的单元格区域进行求和计算。

在VBA中调用工作表函数需要在工作表函数前加上WorksheetFunction属性。

应用于Application对象的WorksheetFunction属性返回WorksheetFunction对象,作为VBA 中调用工作表函数的容器,在实际应用中可省略Application对象识别符。

技巧2 查找最大、最小值在VBA中没有置的函数可以进行最大、最小值的查找,借助工作表Max、Min函数可以快速地在工作表区域中查找最大、最小值,如下面的代码所示。

#001 Sub seeks()#002 Dim rng As Range#003 Dim myRng As Range#004 Dim k1 As Integer, k2 As Integer#005 Dim max As Double, min As Double#006 Set myRng = Sheet1.Range("A1:F30")#007 For Each rng In myRng#008 If rng.Value = WorksheetFunction.max(myRng) Then#009 rng.Interior.ColorIndex = 3#010 k1 = k1 + 1#011 max = rng.Value#012 ElseIf rng.Value = WorksheetFunction.min(myRng) Then#013 rng.Interior.ColorIndex = 5#014 k2 = k2 + 1#015 min = rng.Value#016 Else#017 rng.Interior.ColorIndex = 0#018 End If#019 Next#020 MsgBox "最大值是:" & max & "共有" & k1 & "个" _#021 & Chr(13) & "最小值是:" & min & "共有" & k2 & "个"#022 End Sub代码解析:seeks过程在工作表单元格区域中查找最大、最小值,并将其所在的单元格底色分别设置为红色和蓝色。

VBA常用函数汇总及使用方法

VBA常用函数汇总及使用方法

VBA常用函数汇总及使用方法在Excel宏的编程过程中,VBA(Virtual Basic for Applications)是一门非常重要的编程语言。

作为VBA的一部分,函数在编写宏时发挥着重要的作用。

它们可以简化编程过程、提高效率,同时还可以处理和操作各种数据类型。

本文将为您介绍一些常用的VBA函数及其使用方法,帮助您更好地进行Excel宏的编程。

一、常用函数和使用方法1. Len函数Len函数用于返回字符串的长度。

在使用Len函数时,需要将待计算长度的字符串放入括号中,并将函数返回的值赋给一个变量。

示例代码:```Dim str as StringDim length as Integerstr = "Hello World"length = Len(str)MsgBox "字符串的长度为:" & length```2. Left函数和Right函数Left函数和Right函数分别用于返回字符串的左侧和右侧指定个数的字符。

这两个函数需要两个参数,第一个参数是待处理的字符串,第二个参数是要返回的字符数。

示例代码:```Dim str as StringDim leftStr as StringDim rightStr as Stringstr = "Hello World"leftStr = Left(str, 5)rightStr = Right(str, 5)MsgBox "左侧5个字符为:" & leftStrMsgBox "右侧5个字符为:" & rightStr```3. Mid函数Mid函数用于返回字符串中指定位置开始的指定字符数的字符串。

这个函数有三个参数,分别是待处理的字符串、开始位置和要返回的字符数。

示例代码:```Dim str as StringDim subStr as Stringstr = "Hello World"subStr = Mid(str, 7, 5)MsgBox "子字符串为:" & subStr```4. UCase函数和LCase函数UCase函数用于将字符串转换为大写,LCase函数用于将字符串转换为小写。

excel中161个VBA_自定义函数(超级实用)(精)

excel中161个VBA_自定义函数(超级实用)(精)

目录 '1.函数作用:返回 Column 英文字 (9)'2.函数作用:查询某一值第num 次出现的值................9 '3.函数作用:返回当个人工资薪金所得为2000元(起征点为850元时的应纳个人所得税税额.............................10 '4.函数作用:从形如"123545ABCDE"的字符串中取出数字....11 '5.函数作用:从形如"ABCD12455EDF"的字符串中取出数字...11 '6.函数作用:按SplitType 取得RangeName 串值中的起始位置12 '7.函数作用:将金额数字转成中文大写....................13 '8.函数作用:计算某种税金..............................18 '9.函数作用:人民币大、小写转换........................19 '10.函数作用:查汉字区位码.............................20 '11.函数作用:把公元年转为农历.........................21 '12.函数作用:返回指定列数的列标.......................42 '13.函数作用:用指定字符替换某字符.....................43 '14.函数作用:从右边开始查找指定字符在字符串中的位置...43 '15.函数作用:从右边开始查找指定字符在字符串中的位置...44 '16.函数作用:计算工龄.................................44 '17.函数作用:计算日期差,除去星期六、星期日.. (45)'18.函数作用:将英文字反转的自定函数 (46)'19.函数作用:计算个人所得税...........................46 '20.函数作用:一个能计算是否有重复单元的函数...........47 '21.数字金额转中文大写................................48 '22.函数作用:将数字转成英文...........................49 '23.函数作用:人民币大小写转换.........................52 '24.函数作用:获取区域颜色值...........................53 '25.函数作用:获取活动工作表名.........................53 '26.函数作用:获取最后一行行数. (54)'27.函数作用:判断是否连接在线.........................54 '28.函数作用:币种转换.................................54 '29.函数作用:检验工作表是否有可打印内容...............55 '30. 函数作用:查找一字符串(withinstr在另一字符串中(findstr1中某一次(startnum出现时的位置,返回零表示没找到。

VBAExcel常用自定义函数

VBAExcel常用自定义函数

VBAExcel常⽤⾃定义函数1. 将互换 Excel 列号(数字/字母)Public Function excelColumn_numLetter_interchange(numOrLetter) As String Dim i, j, idx As Integer Dim letterArray letterArray = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z") If IsNumeric(numOrLetter) Then If numOrLetter > 702 Then MsgBox "只允许输⼊⼩于“703”的数字。

" Exit Function End If If numOrLetter > 26 Then idx = 26 For i = 0 To 25 For j = 0 To 25 idx = idx + 1 If idx = numOrLetter Then excelColumn_numLetter_interchange = letterArray(i) & letterArray(j) Exit For End If Next j Next i Else excelColumn_numLetter_interchange = letterArray(numOrLetter - 1) End If Else numOrLetter = UCase(numOrLetter) '转换为⼤写 If Len(numOrLetter) > 1 And Len(numOrLetter) < 3 Then idx = 26 For i = 0 To 25 For j = 0 To 25 idx = idx + 1 If letterArray(i) & letterArray(j) = numOrLetter Then excelColumn_numLetter_interchange = idx Exit For End If Next j Next i ElseIf Len(numOrLetter) = 1 Then For i = 0 To 25 If letterArray(i) = numOrLetter Then excelColumn_numLetter_interchange = i + 1 Exit For End If Next i Else MsgBox "最多只允许输⼊2个“字母”。

ExcelVBA常用函数的语法与应用参考

ExcelVBA常用函数的语法与应用参考

VBA 函数参照1.日期与时间函数序号函数名功能1 Date 无参数 , 返回包含系统日期2 DateAdd 返回包含一个日期的Variant(Date) ,这一日期还加上了一段时间间隔3 DateDiff 返回 Variant(Long) 的值,表示两个指定日时期的时间间隔数目4 DatePart 返回一个包含已知日期的指准时间部分的Variant(Integer)5 DateSerial 返回包含指定的年、月、日的Variant(Date)6 DateValue 返回一个 Variant(Date)7 Day 返回一个 Variant(Integer) ,其值为 1~31 之间的整数,表示一个月中的某一日8 Hour 返回一个 Variant(Integer) ,其值为 0~23 之间的整数,表示一天之中的某一钟点9 Minute 返回一个 Variant(Integer) ,其值为 0~59 之间的整数,表示一小时中的某分钟10 Month 返回一个 Variant(Integer) ,其值为 1~12 之间的整数,表示一年中的某月11 MonthName 返回一个表示指定月份的字符串12 Now 返回一个 Variant(Date), 依据计算机系统设置的日期和时间来指定日期和时间13 Time 返回一个指明目前系统时间的Variant(Date)14 Timer 返回一个 Single,代表从子夜开始到此刻经过的秒数15 TimeSerial 返回一个 Variant(Date) ,包含其有其体时、分、秒的时间16 TimeValue 返回一个包含时间的Variant(Date)17 Second 返回一个 Variant(Integer) ,其值为 0~59 之间的整数,表示一分钟之中的某个秒18 Weekday 返回一个 .Variant(Integer) ,包含一个整数,代表某个日期是礼拜几19WeekdayName* 返回一个字符串,表示一礼拜中的某天20Year返回Variant(Integer),包含表示年份的整数2.字符串函数序号函数名功能1) Asc 返回一个 Integer,代表字符串中首字母的字符代码2) Chr 返回 String ,此中包含有与指定的字符代码有关的字符3) InStr 指定一字符串在另一字符串中最初出现的地点示例: InStr (1, "abc", "b") = 14) InStrRev* 返回一个字符串在另一个字符串中出现的地点,从字符串的末端算起5) LCase 返展转成小写的 String6)UCase返回Variant(String),此中包含转成大写的字符串7) Left 返回 Variant(String) ,此中包含字符串中从左侧算起指定数目的字体8) Len 返回 Long ,此中包含字符串内字符的数目或储存变量所需的字节数9)LTrin返回Variant(String),去除指定字符串的前导空格10)Mid返回Variant(String),此中包含字符串中指定数目的字符返回一个字符串,该字符串中指定的子字符串已被替代成另一子字符串,并且替代发生的次数也是指定的。

VBA使用Excel工作表函数

在VBA如何使用Excel工作表函数发布: | 作者: Microsoft | 来源: Microsoft | 查看: 5743次摘自EXCEL帮助在 Visual Basic 中使用 Microsoft Excel 工作表函数在 Visual Basic 语句中可以使用大多数 Microsoft Excel 工作表函数。

若要查看可以使用的工作表函数列表,请参阅可用于 Visual Basic 的工作表函数列表。

注释一些工作表函数在 Visual Basic 中是不实用的。

例如:Concatenate 函数就不实用,因为在 Visual Basic 中可使用 & 运算符来连接多个文本值。

从 Visual Basic 中调用工作表函数在 Visual Basic 中,通过 WorksheetFunction 对象可使用 Microsoft Excel 工作表函数。

以下 Sub 过程使用 Min 工作表函数来决定在某个单元格区域中的最小值。

首先,将变量 myRange 声明为 Range 对象,然后将其设置为 Sheet1 上的 A1:C10 单元格区域。

指定另一个变量 answer 为对 myRange 应用 Min 函数的结果。

最后,answer 的值就被显示在消息框中。

Sub UseFunction()Dim myRange As RangeSet myRange = Worksheets("Sheet1").Range("A1:C10")answer = Application.WorksheetFunction.Min(myRange)MsgBox answerEnd Sub如果您使用的工作表函数需要一个单元格区域引用作为参数,则必须指定一个 Range 对象。

例如:您可以用 Match 工作表函数搜索单元格区域。

可以在工作表单元格中输入公式,如“=MATCH(9,A1:A10,0)”。

EXCELVBA帮助手册Word版

Excel2003VBA 帮助文档目录一些对象的应用方法 (4)Add 方法 (5)Add方法(Dictionary) (6)Add 方法(Folders) (6)Assert 方法 (7)BuildPath 方法 (8)Clear 方法 (8)Close 方法 (9)Copy 方法 (10)CopyFile 方法 (10)CopyFolder 方法 (11)CreateFolder 方法 (12)CreateTextFile 方法 (13)Delete 方法 (14)DeleteFile 方法 (14)DeleteFolder 方法 (15)DriveExists 方法 (15)Exists 方法 (16)FileExists 方法 (16)FolderExists 方法 (17)GetAbsolutePathName 方法 (17)GetBaseName 方法 (18)GetExtensionName 方法 (18)GetFile 方法 (19)GetFileName 方法 (19)GetFolder 方法 (20)GetParentFolderName 方法 (20)GetSpecialFolder 方法 (21)GetTempName 方法 (22)Hide 方法 (22)Item 方法 (23)Items 方法 (24)Keys方法 (24)Move 方法 (25)Move 方法(UseForm) (25)1、应用于 (25)2、请参阅 (25)MoveFile 方法 (25)MoveFolder 方法 (26)OpenAsTextStream 方法 (27)OpenTextFile 方法 (28)Print 方法 (30)PrintForm 方法 (31)Raise 方法 (31)Read 方法 (33)ReadAll 方法 (33)ReadLine 方法 (34)Remove 方法 (34)Remove 方法(FileSystemObject 对象) (35)RemoveAll 方法 (35)Show 方法 (36)Skip 方法 (37)SkipLine 方法 (37)WhatsThisMode 方法 (38)Write 方法 (38)WriteBlankLines 方法 (39)WriteLine 方法 (39)一些对象的应用方法1、Collection 对象⑴ADD 方法、⑵Item 方法、⑶Remove 方法2、Debug 对象⑴Assert 方法、⑵Print 方法3、Dictionary对象⑴Add方法(Dictionary)、⑵Exists 方法、⑶Items 方法、⑷Keys方法、⑸Remove 方法、⑹Remove 方法(FileSystemObject 对象)、⑺RemoveAll 方法、4、Err 对象⑴Clear 方法、⑵Raise 方法5、File 对象、Folder 对象⑴Copy 方法、⑵Delete 方法、⑶CreateTextFile 方法(Folder 对象)、⑷Move 方法、⑸OpenAsTextStream 方法(File 对象)6、Folders集合⑴Add 方法(Folders)7、FileSystemObject 对象⑴BuildPath 方法、⑵CopyFile 方法、⑶CopyFolder 方法、⑷CreateFolder 方法、⑸CreateTextFile 方法、⑹DeleteFile 方法、⑺DeleteFolder 方法、⑻DriveExists 方法、⑼FileExists 方法、⑽GetAbsolutePathName 方法、⑾GetBaseName 方法、⑿GetExtensionName 方法、⒀GetFile 方法、⒁GetFileName 方法、⒂GetFolder 方法、⒃GetParentFolderName 方法、⒄GetSpecialFolder 方法、⒅GetTempName 方法、⒆MoveFile 方法、⒇MoveFolder 方法、(21)OpenTextFile 方法8、UserForm 对象,UserForms 集合对象⑴Hide 方法、⑵PrintForm 方法、⑶Show 方法、⑷WhatsThisMode 方法9、TextStream 对象⑴Close 方法、⑵Read 方法、⑶ReadAll 方法、⑷ReadLine 方法、⑸Skip 方法、⑹SkipLine 方法、⑺Write 方法、⑻WriteBlankLines 方法、⑼WriteLine 方法Add 方法添加一个成员到Collection对象。

EXCEL_VBA_完全手册

第1学时Visual Basic forApplication是什么欢迎使用E x c e l和Visual Basic for Application开发应用程序!作为已经能够熟练使用E x c e l 的用户,你一定对E x c e l强大的功能感到满意。

现在,你将逐步提高到更高的水平。

即使你以前从来没有编写过程序,也能够使用Visual Basic for Application开发出解决方案。

Vi s u a l Basic for Application是现在可用的最容易学习、最容易使用同时也是最复杂的应用程序自动化语言(过去常常称为宏语言)之一。

在这个学时中,通过熟悉宏录制器,将开始学习有关的基础知识。

本学时的重点包括:• Visual Basic for Application是什么• Excel环境中基于应用程序的自动化的优点• 录制一个简单的宏• 执行宏• 编辑宏• 宏录制器的局限性1.1 Visual Basic for Application是什么直到9 0年代早期,使应用程序自动化还是充满挑战性的领域。

对每个需要自动化的应用程序,人们不得不学习一种不同的自动化语言。

例如,可以使用E x c e l的宏语言使E x c e l自动化,使用Word Basic使Microsoft Wo r d自动化,等等。

M i c r o s o f t决定让它开发出来的应用程序共享一种通用的自动化语言—Visual Basic for Application(V B A),而不是使用不同的自动化语言。

可以认为Visual Basic for Application是非常流行的应用程序开发语言—Visual Basic的子集。

实际上,V B A是“寄生于”Visual Basic应用程序的版本。

V B A与Visual Basic的区别包括如下几个方面:• Visual Basic是设计用于创建标准的应用程序,而V B A是用于使已有的应用程序自动化。

VBA中常见的函数与方法速查手册

VBA中常见的函数与方法速查手册VBA(Visual Basic for Applications)是一种用于编写Microsoft Office套件中宏和自定义函数的编程语言。

作为Microsoft Office产品的一部分,VBA具有强大的功能和灵活性,可以帮助用户自动化处理数据、生成报表、操作图形等。

在VBA中,函数和方法是最基础且最常用的工具。

本文将为您提供VBA中常见的函数与方法速查手册,以便您熟练运用VBA进行自动化编程。

一、常见的函数1. Msgbox函数Msgbox函数用于在窗口中显示一条消息,并返回一个按键值。

语法:Msgbox(prompt[, buttons] [, title] [, helpfile, context])示例:Msgbox "Hello, World!",vbInformation+vbOKCancel,"提示"2. InputBox函数InputBox函数用于在窗口中显示一个对话框,提示用户输入一个值。

语法:InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])示例:Value = Inputbox("请输入一个数字:")3. Len函数Len函数用于返回字符串的长度。

语法:Len(string)示例:Len("Hello, World!") ' 返回结果为134. Left函数Left函数用于返回字符串左边指定个数的字符。

语法:Left(string, length)示例:Left("Hello, World!", 5) ' 返回结果为"Hello"5. Right函数Right函数用于返回字符串右边指定个数的字符。

语法:Right(string, length)示例:Right("Hello, World!", 6) ' 返回结果为"World!"6. Mid函数Mid函数用于返回字符串中指定位置的字符。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
Inverse Cosecant (反余割)
Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1))
Inverse Cotangent (反余切)
Arccotan(X) = Atn(X) + 2 * Atn(1)
Hyperbolic Sine (双曲正弦)
HArctan(X) = Log((1 + X) / (1 - X)) / 2
Inverse Hypecsec(X) = Log((Sqr(-X * X + 1) + 1) / X)
Inverse Hyperbolic Cosecant
HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) + 1) / X)
Inverse Hyperbolic Sine(反双曲正弦)
HArcsin(X) = Log(X + Sqr(X * X + 1))
Inverse Hyperbolic Cosine(反双曲余弦)
HArccos(X) = Log(X + Sqr(X * X - 1))
Inverse Hyperbolic Tangent(反双曲正切)
Dim MyWeek, MyDay
MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
'返回值假设下界的设置为1(使用Option Base
'语句)。
MyDay = MyWeek(2) 'MyDay的值为"Tue"。
MyDay = MyWeek(4) 'MyDay的值为"Thu"。
所需的arglist参数是一个用逗号隔开的值表,这些值用于给Variant所包含的数组的各元素赋值。如果不提供参数,则创建一个长度为 0 的数组。
说明
用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中,第一条语句创建一个Variant的变量A。第二条语句将一个数组赋给变量A。最后一条语句将该数组的第二个元素的值赋给另一个变量。
Hyperbolic Secant (双曲正割)
HSec(X) = 2 / (Exp(X) + Exp(-X))
Hyperbolic Cosecant(双曲余割)
HCosec(X) = 2 / (Exp(X) - Exp(-X))
Hyperbolic Cotangent(双曲余切)
HCotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X))
Dim A As Variant
A = Array(10,20,30)
B = A(2)
使用Array函数创建的数组的下界受Option Base语句指定的下界的决定, 除非Array是由类型库(例如VBA.Array )名称限定。如果是由类型库名称限定,则Array不受Option Base的影响。
Asc函数
返回一个 Integer,代表字符串中首字母的字符代码。
语法
Asc(string)
必要的string参数可以是任何有效的字符串表达式。如果string中没有包含任何字符,则会产生运行时错误。
导出的数学函数
以下为非基本数学函数的列表,皆可由基本数学函数导出:
函数
由基本函数导出之公式
Secant(正割)
Sec(X) = 1 /Cos(X)
Cosecant(余割)
Cosec(X) = 1 / Sin(X)
Cotangent(余切)
Cotan(X) = 1 / Tan(X)
Inverse Sine (反正弦)
Inverse Hyperbolic Cotangent (反双曲余切)
HArccotan(X) = Log((X + 1) / (X - 1)) / 2
以 N 为底的对数
LogN(X) = Log(X) / Log(N)
Array函数
返回一个包含数组的 Variant。
语法
Array(arglist)
说明
一个数的绝对值是将正负号去掉以后的值。例如,ABS(-1)和ABS(1)都返回1。
Abs函数示例
本示例使用Abs函数计算数的绝对值。
Dim MyNumber
MyNumber = Abs(50.3)'返回50.3。
MyNumber = Abs(-50.3)'返回50.3。
请参阅:
Sgn函数、数学函数中的Abs函数、Atn函数、Cos函数、Exp函数、Fix函数、Int函数、Log函数、Rnd函数、Sgn函数、Sin函数、Sqr函数、Tan函数、导出的数学函数:
Excel VBA学习资料






摘自Excel2003VBA帮助
2006年12月29日
Abs函数
返回参数的绝对值,其类型和参数相同。
语法
Abs(number)
必要的number参数是任何有效的数值表达式,如果number包含 Null,则返回Null,如果number是未初始化的变量,则返回 0。
注意没有作为数组声明的Variant也可以表示数组。除了长度固定的字符串以及用户定义类型之外,Variant变量可以表示任何类型的数组。尽管一个包含数组的Variant和一个元素为Variant类型的数组在概念上有所不同,但对数组元素的访问方式是相同的。
Array函数示例
该示例使用Array函数来返回一个包含Variant的数组。
HSin(X) = (Exp(X) - Exp(-X)) / 2
Hyperbolic Cosine (双曲余弦)
HCos(X) = (Exp(X) + Exp(-X)) / 2
Hyperbolic Tangent (双曲正切)
HTan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))
Arcsin(X) = Atn(X / Sqr(-X * X + 1))
Inverse Cosine (反余弦)
Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Inverse Secant (反正割)
Arcsec(X) = Atn(X / Sqr(X * X - 1)) + Sgn((X) - 1) * (2 * Atn(1))
相关文档
最新文档