你掌握如何使用公式替代VBA吗?
今日就给各位来详细介绍方面的专业知识,期待能够对大伙儿有用。
(这里已加上微信小程序,请到今日今日头条手机客户端查询)会计工作中,你是不是碰到愁眉不展不知道如何解决的难题呢?
VIP学生的难题,期待将A列的数据信息先后放到每一个电子表格的B2,不用一个个黏贴。
这类难题,卢子的第一反应便是用VBA。
Sub 先后黏贴()
Dim i%
For i = 2 To Sheets.Count
Sheets(i).[b2]= Sheet1.Range("A" & i)
Next
End Sub
但是在我动手能力写VBA以前,打开了她的报表,看到了一条好公式,仅仅差一点点她就写成功了。依靠INDEX SHEET的融合,仅仅主要参数未写好。
而SHEET可能90%的人都感覺很生疏,未用过。这个是最新版本的涵数,卢子之前了解,可是基本上没可用在具体难题上边。
这一系列产品一共有两个涵数,SHEET和SHEETS。
SHEET的含意是指这一电子表格是第几个,例如你一直在第2个表键入公式,就回到2,不用一切主要参数。
=SHEET()
SHEETS的含意是指这一工作簿一共有多少个电子表格,例如现在有12个电子表格,也是不用主要参数。
=SHEETS()
见到这儿,你能发觉SHEET就类似VBA中的自变量i,而SHEETS就类似Sheets.Count。
详细介绍完使用方法,那么就步入主题。
倘若要先后引入A列的內容,可以用INDEX ROW。
=INDEX(A:A,ROW(A2))
而如今如果在每一个表的B2引入A列的內容,就可以用SHEET替代ROW,全是得到数字2、3、4……
如今要在表2到最后一个表键入同一个公式,能够选定表2,按着Shift键选定最后一个,那样就即将键入公式的全部表选定,键入一个公式就相当于全部表都键入公式。
=INDEX(Sheet1!A:A,SHEET())
处理完,忽然想到了2年前读过的一篇文章:日表格总计的通用性公式
里边重要內容我发上来,可以用SHEET替代原先必须将日期写在电子表格A2的难题。
怎么设置“本月总计”这一公式?
一个月有多少天,就写多少个公式,那样实际操作尽管能够保证,但不智能化。
实际上,这类还可以用一个通用性公式拿下。挑选2日,按着Shift键,挑选最后一天的报表,在表格中键入公式,往下拉,那样就可以。
=E4 OFFSET(INDIRECT((DAY($A$2)-1)&"日!F3"),ROW(A1),0)
之上公式是依靠A2是规范日期的特性获取日,用SHEET就不用管A2是啥內容了。
=E4 OFFSET(INDIRECT((SHEET()-1)&"日!F3"),ROW(A1),0)
每一个人都会有自身的念头,平时多沟通交流,或许就能从沟通交流初中到更快的公式。
【褔利時间到】
又来送福利啦!
【现钱金融机构日做账】
【主要经营的业务收益统计表】
馨提醒:若想要大量财务会计领域第一手免费资讯或答疑解惑,关心私信我哦!