如何在Excel中的部件号之间删除0

时间:2018-06-06 14:07:30

标签: excel excel-vba excel-formula vba

我想在字母数字“Part Number”之间删除0。

零件编号预期输出 0-1379095-2 1379095-2 0-0042899-3 42899-3 0-0185309-1 185309-1

enter image description here

非常感谢任何帮助。

谢谢, 内甚

2 个答案:

答案 0 :(得分:3)

试试这个:

=SUBSTITUTE(I8,"-0","-")

修改

您的编辑提出了一个完全不同的问题。假设你展示的模式是一致的,你可以使用这个可怕的公式:

=CONCATENATE(VALUE(SUBSTITUTE(LEFT(I8,FIND("-",I8,FIND("-",I8)+1)-1),"-","")),RIGHT(I8,LEN(I8)-FIND("-",I8,FIND("-",I8)+1)+1))

或者您可以使用小型UDF:

Function GaneshFormat(ByVal sInput As String, ByVal sSeparator As String) As String
    Dim s() As String
    Dim i As Integer
    s = Split(sInput, sSeparator)
    For i = 1 To UBound(s)
        s(i - 1) = CLng(s(i))
    Next i
    ReDim Preserve s(UBound(s) - 1)
    GaneshFormat = Join(s, sSeparator)
End Function

您可以这样使用:

=GaneshFormat(I8,"-")

答案 1 :(得分:0)

=IF(LEFT($A2,5)="0-000",REPLACE($A2,1,5,""),IF(LEFT($A2,4)="0-00",REPLACE($A2,1,4,""),IF(LEFT($A2,3)="0-0",REPLACE($A2,1,3,""),IF(LEFT($A2,2)="0-",REPLACE($A2,1,2,""),IF(LEFT($A2,1)="0",REPLACE($A2,1,1,""),IFERROR(IF(FIND("-0",$A2,1)=2,REPLACE($A2,FIND("0",$A2,1),1,""),$A2),A2))))))