百摩网
当前位置: 首页 生活百科

excel公式自动计算数值(Excel根据公式说明计算数值)

时间:2023-05-12 作者: 小编 阅读量: 2 栏目名: 生活百科

但是还有更加方便的做法,就是只需修改说明单元格内的公式,数值就根据该公式相应改变。壹例如:A1单元格显示数值6,其公式为2*3,其公式说明在B1单元格内展示。最后需要注意的是,在使用了模块之后,Excel必须启用宏。

有时候,在报表中需要对一个数值的计算公式进行说明,以展示该数据是如何得来的。当然可以先设置数据的公式,然后在粘贴到说明单元格内。但是还有更加方便的做法,就是只需修改说明单元格内的公式,数值就根据该公式相应改变。

例如:

A1单元格显示数值6,其公式为2*3,其公式说明在B1单元格内展示。那么如何使得A1单元格内的数值根据B1单元格内书写的公式说明变化呢?不用在A1重新设置公式。

1、首先选中A1单元格,必须要选中。

2、依次点击菜单“公式”、“定义名称”。

3、在弹出的窗口中“名称”和“引用位置”内输入以下内容,然后“确定”。

“名称”这里输入的是JS,也可以输入别的名称,只是需要记住,以便后面引用。

“引用位置”只能手工输入,单元格位置中没有“$”符号。

4、在A1单元格中输入“=JS”,这里相当于我们定义了一个以JS为名称的函数。

虽然在第3步,我们只输入了B1,但是该公式是可以往下拖动的,加减乘除毫无问题。A2对应B2,A3对应B3。

但是如果在C1输入“=JS”则会等于D1中公式的值。这就是一开始选中A1单元格的重要性。

但是我们的报表常常像下面这样,在C列金额均等于B2单元格的单价乘以B列相应的数量。公式这时用字母表示更清晰。

你会发现用刚才的办法,先选中C5单元格,定义一个名称依然有效。

当然我们也发现了前面做法的缺陷就是有对应位置的关系,比如刚才的C1单元格输入“=JS”时就不会等于B1单元格所列公式的值。

那么,能不能像真正的函数一样,我应用哪个单元格就计算该单元格公式的值呢?显然,也是可以的。

1、首先“Alt F11”,调用代码编辑窗口。然后右键点击VBAProject,选择插入“模块”。

2、双击新建的模块(列如模块1),在右边的窗口中输入以下内容:

Function JSSS(A)

A=A

JSSS = Evaluate(A)

End Function

如下图:中“JSSS”就是我们真正自定义的函数了,可以像其他Excel函数一样使用。其中"A=A”是千万不能省略的。

3、B11单元格中输入公式“=JSSS(D5)”,其中D5可以像其他函数一样点击D5单元格来引用,因为JSSS现在真的就是一个函数了。

然而还有的时候,我们会这样来写一个数值的计算说明,公式中会带有计量单位。

计算公式是:(71.1*5 100*10-100)*5/7,其中包含了括号、加减乘除。

这个稍微复杂一点,但是依然可以简单搞定。

我们可以用“Alt F11”调出代码窗口,在新插入的模块或原有的模块中写入下面的代码:

Function ZJS(A)

Dim b, mhk, mh

Dim dy, dys

Set dy = CreateObject("vbscript.regexp")

With dy

.Global = True

.IgnoreCase = True

.Pattern = "(\d|[* -.()()]|[/]\d)"

End With

Set mh = dy.Execute(A)

For Each mhk In mh

dys = dys & mhk

Next

ZJS = Evaluate(dys)

End Function

如图:

其中ZJS就是我们定义函数的名称。

在B1单元格输入公式“=ZJS(A1)”就会得到A1中数值运算的结果。


最后需要注意的是,在使用了模块之后,Excel必须启用宏。


    推荐阅读
  • 认罪认罚具结书不起诉有案底吗(认罪认罚从宽后的不起诉)

    案发后,两人均表示认罪认罚,主动退缴出全部涉案款。综合考虑之后,检察官拟对二人作出不起诉决定。易某某索性破罐子破摔,自己无所谓承不承担刑事责任。潘阿姨报案后,警方找到当地居委会通知其配合调查,符某某主动至当地派出所投案自首,后上海警方将其从海南带回。检察官审理案件后认为,鉴于犯罪情节轻微且认罪认罚,系初犯、偶犯,悔罪态度较好,决定对符某某不起诉。

  • 网球用英语怎么说(网球用英语表达)

    网球用英语表示是:tennis例句:,今天小编就来说说关于网球用英语怎么说?下面更多详细答案一起来看看吧!网球用英语怎么说网球用英语表示是:tennis例句:Youmustreserveyourstrengthforthetennisfinal.你必须为网球决赛保存力量。我的梦想是成为一名网球运动员。

  • 显示器显示TESTGOOD是什么意思(显示器显示TESTGOOD怎么回事)

    接下来我们就一起去研究一下吧!显示器显示TESTGOOD是什么意思显示器显示“TESTGOOD”说明显示测试正常。若出现不显示的故障,和显示器无关,应是其他方面的原因,比如:显示卡与显示器信号线接触不良或者不兼容;显卡与主板接触不良或主板插槽有问题;显卡驱动程序丢失。

  • 在哪里可以查询车辆是否是事故车(怎样查询车辆事故记录查询)

    了解车辆的历史车况信息,所有数据一查便知,足不出户即可查询。因此,买二手车注意事项也不少。所以除了这个以外,买二手车注意事项中更为重要的是看车子的性能。

  • 玛莎拉蒂mc20首发限量版(售价两百万出头)

    然而,玛莎拉蒂MC20的到来让兰博基尼小牛等车型感受到了“中年危机”,官方售价211.13万元,搭载3.0TV6发动机,竟拥有2.9秒破百的动力水平,降低了“3秒超跑俱乐部”的入会门槛。目前,玛莎拉蒂MC20的提车周期为6个月左右,作为一款售价211.13万元的超级跑车,这个售价相对其它超级跑车而言并不贵,它的到来可以看做是玛莎拉蒂重返超跑市场的倾力之作。

  • 我的成长路上作文500字(成长路上烦恼多作文500字)

    《成长路上烦恼多》作文500字烦恼像坚硬的巨石,切不断,锤不碎。《成长路上烦恼多》作文500字成长,就好比我人生中的一艘小船,行驶在波面上。《成长路上烦恼多》作文500字在成长的道路上,鄙人有许许多多的烦恼。《成长路上烦恼多》作文500字正在我们成长的过程中,总会经历许许多多的事情,有快乐的,有悲伤的,有喜悦的……但同时烦恼也是必不可少的。所以我下定了决心,从现在开始,我发誓要戒除肉瘾,多吃青菜。

  • 东莞汽车总站关闭后长途客车分流(注意即日起东莞多个火车站暂停办理客运业务)

    我们一起去了解并探讨一下这个问题吧!东莞汽车总站关闭后长途客车分流记者从东莞市轨道交通局获悉,为进一步做好疫情防控工作,即日起,东莞多个火车站暂停办理客运业务,穗深城际全线、莞惠城际全线暂停办理客运业务,并根据疫情动态调整时间。3月16日至3月31日,莞惠城际全线暂停办理客运业务。具体恢复日期根据疫情防控情况另行通告。欧雅琴欧雅琴南方报业传媒集团南方客户端来源:南方-创造更多价值

  • 东奥会yyds什么意思(东奥会yyds是什么意思)

    下面希望有你要的答案,我们一起来看看吧!东奥会yyds什么意思东奥会yyds什么意思:yyds的意思是永远滴神。常被粉丝用来赞赏自己的爱豆,或是被游戏玩家用来赞赏游戏角色、游戏主播等。yyds是网络流行语,取自“永远滴神”的拼音首字母缩写。

  • 脸部暗黄能变白简单方法(皮肤暗黄怎么调理能变白)

    脸部暗黄能变白简单方法准备一小杯鲜奶,夏天可以把鲜奶放到冰箱里,敷的时候会冰爽舒服。先用毛巾热敷脸三分钟,然后用化妆棉吸满鲜奶,敷在脸上十五分钟,取下,用清水将脸上的牛奶洗净。此方法可以使肤色白净均匀。将苹果去皮捣烂后均匀涂抹于脸部,干性皮肤可加适量鲜奶或植物油,油性皮肤可加适量蛋清,十五分钟洗净即可。隔天一次,坚持可使皮肤细滑白腻,还可消除雀斑等症状。

  • 红双喜花怎么养家庭养法(双喜藤的养殖方法)

    同时种植双喜藤的时候要选择平整的地方,不要产生积水。