乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > excel中自动进行单位换算-excel换算单位,怎么用表格换算件数

excel中自动进行单位换算-excel换算单位,怎么用表格换算件数

作者:乔山办公网日期:

返回目录:excel表格制作


   1.在下面这个表格有,分别有单价,数量,单位,应付金额等列。

  2.那么我们应当怎样计算应付金额,应付金额等于数量乘以单价的积,在应付金额列输入“=”号。

  3.然后鼠标单选数量这一列,

  4.接着单选单价这一列,按回车键,应付金额便自动运算出来了。

  5.同样会有好多不同的产品,和不同的应付款项,我们就单击第一个运算出来的金额,在选框右下角会出现一个+号,鼠标单击不放,一直往下拖,一直到你想要的位置,下面所有的行,都会以单价乘以数量的公式计算出来了。

  6.用鼠标选取应付金额的这一列 数字,点击自动求和,便可以得出应付总额了。

  7.如下图,这是得出的总合计。



一次性转化为厘米,再大的神也做不到。

先将"无存"修改为"五寸";
再分列,将长与厚分别存于两列中;
再将"长"与"厚"替换为空;
再将汉字一二三等分别替换为数字1、2、3等;
再用函数公式left mid find isnumber 组合提取数字;
最后将数字换成带小数的单位数值,换算成厘米
'假设A1~D1分别为米、分米、厘米、毫米,需要换算的单元格位置分别是A2、B2、C2、D2
'按Alt+F11打开脚本编辑,点击左侧工作表名称,然后在右侧窗口粘贴如下代码:
Private Sub Worksheet_SelectionChange(ByVal Target As Range): On Error Resume Next
If Target.Count = 1 And Target.Column = 1 And Cells(2, 1) <> 0 Then Cells(2, 2) = Cells(2, 1) * 10: Cells(2, 3) = Cells(2, 1) * 100: Cells(2, 4) = Cells(2, 1) * 1000
If Target.Count = 1 And Target.Column = 2 And Cells(2, 2) <> 0 Then Cells(2, 1) = Cells(2, 2) * 0.1: Cells(2, 3) = Cells(2, 2) * 10: Cells(2, 4) = Cells(2, 2) * 100
If Target.Count = 1 And Target.Column = 3 And Cells(2, 3) <> 0 Then Cells(2, 1) = Cells(2, 3) * 0.01: Cells(2, 2) = Cells(2, 3) * 0.1: Cells(2, 4) = Cells(2, 3) * 10
If Target.Count = 1 And Target.Column = 4 And Cells(2, 4) <> 0 Then Cells(2, 1) = Cells(2, 4) * 0.001: Cells(2, 2) = Cells(2, 4) * 0.01: Cells(2, 3) = Cells(2, 4) * 0.1
If Cells(2, 2) <> "" And Application.IsNumber(Cells(2, 2)) = False Then Range("A2:D2").ClearContents: MsgBox " 你所输入的不是有效数字,请重新输入!e68a84e8a2ade799bee5baa6e997aee7ad94337 "
End Sub
'说明:输入数字敲回车键或者点击鼠标后,光标所停放的单元格应该在当前列中

Excel有一个专门进行不同度量系统的换算的函数:CONVERT CONVERT(number,from_unit,to_unit) 第1个参数是需要转换的数值,zd第2个参数是原度量单位,第3个参数是要转换的度量单位。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网