Excel vba
文章平均质量分 87
jzkwf705
这个作者很懒,什么都没留下…
展开
-
EXCEL VBA 自定义函数 招标代理费计算
依据《国家发展计划委员会文件计价格[2002]1980号》计算招标代理费的自定义函数Option ExplicitFunction 招标代理费(服务类型 As String, 中标金额 As Double) As Double Dim brr If 服务类型 = "货物" Then '货物 brr = [{1.50,1.10,0.80,...原创 2020-04-01 16:53:44 · 1252 阅读 · 0 评论 -
excel vba 自定义函数FUNCTION,天津造价咨询费测算自定义函数。
利用VBA,根据 136号文计算造价咨询费编制自定义函数。20080615_津价房地2008[136]号_关于工程造价咨询服务项目及价格的通知。原创 2020-03-10 13:08:34 · 713 阅读 · 0 评论 -
excel vba customui基本使用方法
cusutomui用于给写好的vba功能在选项卡里加按钮,加好按钮后再在vba里进行回调,其基本参数如下。<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui"><!--命名空间。xml需要区分大小写--> <ribbon startFromScratch="false">...原创 2020-03-10 05:40:37 · 4130 阅读 · 5 评论 -
excel vba 字典使用方法学习
字典的索引(keys)不能重复,常用字典来去重,字典是一个二维数组,其中keys不重复,每个keys对应一个值(item),值可以重复。vba中常用字典代替vlookup。'字典学习 '声明本模块中默认的比较方式,只能是text或者binary;如果不声明的的话,默认为二进制比较,但是对VBA字典中的比较方式没有影响。。'Option Compare Text '文本比较,不区分大小...原创 2020-03-09 11:26:24 · 6010 阅读 · 1 评论 -
excel vba replace函数的使用方法
Repalace函数是vba中常用的字符替换函数,本文介绍了replace的基本使用方法,6个参数的意思。Sub replacetest()Dim str As StringDim str2 As Stringstr = "ababab"'vba.Replace("在哪儿找","找什么(需要被替换掉的部分)","换成什么","从第几个字符开始找","替换几次","匹配方式")'一共六...原创 2020-03-01 14:09:32 · 53103 阅读 · 4 评论 -
excel vba 使用Format函数,在命名时在文件名中添加时间
'保存工作簿时,如何后一个名称不和前一个名称重复?'有很多种方法,通常会以时间命名,比如我们手机里的照片的名称一般都会有时间,很多地方都是。'我们也可以这样命名,具体方法如下。Sub 保存工作簿时命名() ThisWorkbook.SaveAs ThisWorkbook.Path & "\另存为工作簿" & Format(Now, "yyyymmddhhmmss")...原创 2020-03-01 10:20:57 · 4185 阅读 · 0 评论 -
excel vba saveas 另存为使用方法
excel vba 保存代码Sub 保存工作簿() ThisWorkbook.Save '.save相当于按保存按钮;无参数 ThisWorkbook.SaveAs "另存为工作簿" '把当前工作簿另存为一份新的工作簿 ThisWorkbook.SaveCopyAs "另存一份副本" '另存一份副本为新工作簿,而不关闭当前工作簿。只有一个参数,就是新的文件名。 ...原创 2020-02-29 21:16:37 · 22097 阅读 · 0 评论