问问题描述
答精选答案

任意单元格,那只能用宏了,做一个自定义函数。如果固定的在B列,计算A列算式,就没必要了,可以用宏表函数。cal自定义函数的代码如下Function cal(单元格 As Range)Application.VolatileDim temp As String, adds As Stringadds = 单元格.Address(0, 0)If Left(单元格(1).Text, 1) = "{" And Right(单元格(1).Text, 1) = "}
" Thentemp = VBA.Replace(VBA.Replace(单元格(1).Text, "{", ""), "}", ""
)Elsetemp = 单元格(1).TextEnd Iftemp = VBA.Replace(Replace(temp, "row()", "row(" + adds + ")"), "column()", "column(" + adds + ")"
)cal = Application.Evaluate(temp)End Function
本文来自作者[简易心理学]投稿,不代表公众科技网立场,如若转载,请注明出处:https://www.cpst.net.cn/jingxuan/2842007.html
评论列表(4条)
我是公众科技网的签约作者“简易心理学”!
希望本篇文章《excel表格一个单元格式怎么设置宏就能自动计算出和》能对你有所帮助!
本站[公众科技网]内容主要涵盖:教育咨询,知识百科
本文概览:任意单元格,那只能用宏了,做一个自定义函数。如果固定的在B列,计算A列算式,就没必要了,可以用宏表函数。cal自定义函数的代码如下Function cal(单元格 As Range)Application.VolatileDim temp As String, adds As Stringadds = 单元格.Address(0, 0)If Left(单元格(1).Text, 1) = "{" And Right(单元格(1).Text, 1) = "}" Thentemp = VBA