bengdeng bengdeng
关注数: 8 粉丝数: 178 发帖数: 3,009 关注贴吧数: 5
bengdeng真情告白 其实上网来看贴吧,似乎成了我的习惯。其实上网就来贴吧,似乎也成了一大爱好。其实对贴吧的不足,也找出了一堆的理由:不能上传实例,不能修改贴子,不便管理……但贴吧还是贴吧,叫人不满,却又让人挥之不去。其实很早就有想法,不再当这个吧主,但前天(9月2日)看到吧主的位置一空,心里却无名的空。(公告]关于部分吧主被撤消权限的说明,请大家相互转告) http://post.baidu.com/f?z=37284820&ct=335544320&lm=0&sc=0&rn=50&tn=baiduPostBrowser&word=%CC%F9%B0%C9%CD%B6%CB%DF&pn=0其实很早也有想自己建个论坛的想法,但现在好的同类论坛,人气十足的论坛却又是不少,正如EdgeOfCity 就说了两个www.officefans.netwww.excelhome.net也正如EdgeOfCity 说的:那里活跃着一大批Excel及Office的高手,大家有空也可以去看看,说真的,我好多东西也是在网上学的,上面两个地方也是学习的好地方,当然,在百度贴吧里学的更多,学到的是大家对Excel的想法,学到的是以更大的眼光、更宽的思路去用Excel。但,学海无涯,不走出去看看外面的世界,就不知道什么叫精彩,就会如井底之蛙,而且最重要的一点,也是真真正正不当吧主的一点是,现在的Excel和之前比,现在仅仅是爱好,而以前是靠这个吃饭的。一个人的精力是很有限的,而学东西最好是要有气氛——在这个贴吧有,我可以保证,贴吧里给大家的是纯正的学习Excel的空间,但还要有人气,这点是我无法做到,也是在贴吧里无法真正解决的。贴吧发展和目前贴吧热门吧可以看出——好的贴吧只有两种,聊天类(即文字类),另一种是图片类,因此在我看来,软件与编程类目前最有人气和内容的只有两个photoshop吧和QQ吧,特别是前者,可以充分利用好贴吧目前不多的功能,而能达到很好的交流与学习的效果!再此我只能对大家说一声感谢,感谢大家过去近一年里对Excel吧的支持!注:贴吧我会来,但应该不会再是吧主(二天来我已申请三次了,都没回复,心凉凉的)QQ号码不会变,362361359,但这几个月都会挂机,直到16级,再此也谢谢有几位朋友说要创建群送我!最后,也欢迎到bengdeng吧聊天!
Excel工作表不常用函数精选与实际应用 Excel中有很多函数,你都去看过了吗?说真的,我自己都没好好的全部的看过一次!今天无意中在去年电脑报合订本中,看了几个Excel函数的介绍与实例,感到自己对工作表函数的了解,只是在最常用的几个函数中!比如SUM(求和),IF(判断)等,因此我决心好好地看一下Excel的帮助(我自己老是叫人家看帮助*^_^*),然后将一些不常用,但又很实用的函数介绍给大家,希望大家喜欢!也欢迎大家看看帮助,将精彩的应用跟贴留言!郑重声明!回付此帖,一定要有函数的介绍,介绍完了之后才可以有其它的内容,否则——删!!!!希望能把此贴打造为Excel吧中的精品贴!(目前我想Excel吧中,还没有大家都认为是精品的贴子吧)!下面介绍第一个(是一对)函数:LARGE与SMALL。*************以下复制于Excel的帮助*************LARGE返回数据集里第 k 个最大值。使用此函数可以根据相对标准来选择数值。语法 LARGE(array,k)Array:为需要从中选择第 k 个最大值的数组或数据区域。K:为返回值在数组或数据单元格区域里的位置(从大到小排)。说明 1、如果数组为空,函数 LARGE 返回错误值 #NUM!。2、如果 k < 0 或 k 大于数据点的数目,函数 LARGE 返回错误值 #NUM!。 3、如果区域中数据点的数目为 n,则函数 LARGE(array,1) 返回最大值,函数 LARGE(array,n) 返回最小值。语法 LARGE(array,k)Array:为需要从中选择第 k 个最大值的数组或数据区域。K:为返回值在数组或数据单元格区域里的位置(从大到小排)。说明 1、如果数组为空,函数 LARGE 返回错误值 #NUM!。2、如果 k < 0 或 k 大于数据点的数目,函数 LARGE 返回错误值 #NUM!。 3、如果区域中数据点的数目为 n,则函数 LARGE(array,1) 返回最大值,函数 LARGE(array,n) 返回最小值。***************************************SMALL返回数据集中第 k 个最小值。使用此函数可以返回数据集中特定位置上的数值。语法SMALL(array,k)Array:为需要找到第 k 个最小值的数组或数字型数据区域。K:为返回的数据在数组或数据区域里的位置(从小到大)。说明 1、如果 array 为空,函数 SMALL 返回错误值 #NUM!。2、如果 k < 0 或 k 超过了数据点数,函数 SMALL 返回错误值 #NUM!。3、如果 n 为数组中的数据点数,则 SMALL(array,1) 等于最小数值,SMALL(array,n) 等于最大数值。*************以上复制于Excel的帮助*************实际应用的实例:求学生成绩中的前3名的成绩和后3名成绩。文档说明:A1:A100存放100位学生的成绩;在B1:B3中录入1,2,3;在C1中设定公式=LARGE(A1:A100,B1)(第一名的成绩),然后填充到C2和C3格;在D1中设定公式=SMALL(A1:A100,B1)(倒数第一名的成绩),然后填充到D2和D3格。变通与扩展:1、当寻找到成绩后可用Match函数寻找成绩所在的位置。2、当找到位置后还可以用OFFSET偏移,找到其它相应的内容,如姓名。难点与未解决的问题:1、当有成绩相同的情况发生时......无能为力*^_^*。(待续)
取得文件的扩展名 http://oursoft.nease.net/cn_article/OTHER/231.HTMFunction GetExtension(Filename As String)Dim PthPos, ExtPos As IntegerFor i = Len(Filename) To 1 Step -1 ' Go from the Length of the filename, to the first character by 1.If Mid(Filename, i, 1) = "." Then ' If the current position is '.' then...ExtPos = i ' ...Change the ExtPos to the number.For j = Len(Filename) To 1 Step -1 ' Do the Same...If Mid(Filename, j, 1) = "\" Then ' ...but for '\'.PthPos = j ' Change the PthPos to the number.Exit For ' Since we found it, don't search any more.End IfNext jExit For ' Since we found it, don't search any more.End IfNext iIf PthPos > ExtPos ThenExit Function ' No extension.ElseIf ExtPos = 0 Then Exit Function ' If there is not extension, then exit sub.GetExtension = Mid(Filename, ExtPos + 1, Len(Filename) - ExtPos) 'Messagebox the ExtensionEnd IfEnd Function使用:FileExt = GetExtension("c:\windows\vb\vb.exe")'我知道的其它两种方法:'第一种:Function GetFileExt(Filename As String)Dim TMP1, TMP2TMP1 = Split(Filename, ".")If UBound(TMP1) <> 0 Then TMP2 = Split(TMP1(UBound(TMP1)), "\") If UBound(TMP2) = 0 Then GetFileExt = TMP1(UBound(TMP1)) End IfEnd IfEnd Function使用:FileExt = GetFileExt("c:\windows\vb\vb.exe")'第二种:Set fso = CreateObject("Scripting.FileSystemObject")FileExt = fso.GetExtensionName("c:\windows\vb\vb.exe")'相关说明 :Split 函数 描述返回基于 0 的一维数组,其中包含指定数目的子字符串。语法Split(expression[, delimiter[, count[, start]]])Split 函数的语法有以下参数:参数 描述 expression 必选。字符串表达式,包含子字符串和分隔符。如果 expression 为零长度字符串,Split 返回空数组,即不包含元素和数据的数组。 delimiter 可选。用于标识子字符串界限的字符。如果省略,使用空格 ("") 作为分隔符。如果 delimiter 为零长度字符串,则返回包含整个 expression 字符串的单元素数组。 count 可选。被返回的子字符串数目,-1 指示返回所有子字符串。 compare 可选。指示在计算子字符串时使用的比较类型的数值。有关数值,请参阅“设置”部分。 设置compare 参数可以有以下值:常数 值 描述 vbBinaryCompare 0 执行二进制比较。 vbTextCompare 1 执行文本比较。 GetExtensionName 方法 描述返回字符串,该字符串包含路径最后一个组成部分的扩展名。语法object.GetExtensionName(path) GetExtensionName 方法的语法有以下部分: 部分 描述 object 必选。应为 FileSystemObject 的名称。 path 必选。指定路径,用于返回其组成部分的扩展名。 说明对于网络驱动器,根目录 (\) 也认为是一个组成部分。如果路径组成部分与 path 参数不匹配,则 GetExtensionName 方法返回零长度字符串 ("")。
首页 1 2 下一页