Excel自动得出结果(数字前后可以添加文字备注)功能实现步骤:1、打开excel,按住alt+F11,出现MicrosoftVBA编辑窗口;2、选择MicrosoftVBA窗口菜单栏的“插入”->“插入模块”,在弹出的空白窗口输入以下红色字体的代码:Function得出结果(cAsRange)p=c.TextForj=1ToLen(p)F:If (Mid(p,j,1)="[")Then Fori =j+ 1ToLen(p) If(Mid(p,i,1)= "]")Then j= i+1ExitFor End If Next End IfIf(Mid(p,j, 1) ="[")ThenGoToFEndIfr=r +Mid(p, j,1)NextIf (r<>"")Then得出结果=Application.Evaluate("(" & r& ")")Else 得出结果 =0EndIfEndFunction3、点保存按钮保存文件后,关闭Microsoft VisualBasic编辑窗口退回到excel的sheet1工作
表
关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf
;4、选择要作为计算式的单元格和要得出结果的单元格,譬如A1为计算式所在单元格,B1为要得出结果的单元格,在A1输入“[高度]2*4[长度]”,在B1输入“=得出结果(A1)”回车后即可以得出结果8。************************************************************************************************整理by黑陨石(QQ:346337215 E-Mail:HYPERLINK"mailto:")江苏★zhgd(22019256)22:53:42 假设C列为输入的没有等号公式(假设C1为“A1+B1”),而相邻的D列是你需要存放公式计算结果的地方(即D1显示A1和B1单元格相加的结果)。ﻫ 1. 选中D1,然后打开“插入”菜单选择“名称”命令中的“定义”子命令,出现“定义名称”对话框。 2.在“在当前工作表中的名称”输入栏中输入定义的名称“ResultofFomula”,在下方的“引用位置”编辑栏中输入“=EVALUATE(Sheet1!C1)”,单击[确认]按钮退出。ﻫ 3.在D1中输入“=ResultofFomula”,然后选中按住右下角的填充柄向下拉动填充即可。ﻫ 提示:EVALUATE????是Eexcel4.0版的宏表函数,Excel2000和Excel2002中还支持,但只可用于名称定义中。ﻫﻫ 4.填充后要按[F9]进行重算,如果C列的公式有改动,也需要及时按[F9]进行重算。