vbscript vba excel公式相关

Posted 2021-05-21

[1]求和，相关：
INDIRECT(ADDRESS(ROW(),COLUMN()-1))
SUM(INDIRECT("E4:e"&ROW()-1))


'从第二行开始算
r_sum_b1 = 2
.Formula = "=SUM(INDIRECT(SUBSTITUTE(ADDRESS(1,COLUMN(),4,1),1," & Chr(34) & "" & Chr(34) & ")&" & Chr(34) & r_sum_b1 & ":" & Chr(34) & "&SUBSTITUTE(ADDRESS(1,COLUMN(),4,1),1," & Chr(34) & "" & Chr(34) & ")&ROW()-1))"




[1]方法：
    用“"”，替换为“" & chr(34) & "”。

[1]日期
[2]获得当月的天数
=DAY(EOMONTH(TODAY(),0))
取某个月的最后一天。
其他方法：
=DAY(DATE(YEAR(TODAY()),MONTH(TODAY())+1,))
取当年当月加1（即下月）的0日，这样就是本月的最后一天，然后用DAY取出。
（=DAY(EDATE(TODAY(),1)-DAY(TODAY()))
也是日期加一个月再减去本月当前天数，形成下月的0日即本月最后一日。）

[2]日期差
=DATEDIF(A2,B2,"d")

=IFERROR(365-DATEDIF(E42,TODAY(),"d"),DATEDIF(TODAY(),E42,"d"))

月份差：
=DATEDIF(A2,B2,"m")

[1]生成随机字母
=INDEX({"A","B","C","D","E"},RANDBETWEEN(1,5))

[1]带、的单行，转多行
点击“数据”--“分列”，选择分隔符中的其他，并且输入“、”，完成分列后，选择数据并复制，在选择性粘贴中点击“转置”即可。

[1]Trim函数，删除字符串首尾的空白，保留字符串内部作为词与词之间分隔的空格。

[1]快速移动数据
如选中多行，按住Shift，鼠标拖动。



[1]用数透，批量创建指定名称的sheet
http://tech.wmzhe.com/article/8322.html	如何批量创建指定名称的Sheet表格？这招管用_完美教程资讯