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个参数是要转换的度量单位。