Excelで最初のゼロを次のコードから削除したいのですが、ゼロは同じパターンを持たないという問題があります。これを達成するために私は何ができますか?前Excelの最初のゼロを削除する
コード: 450D 320A 107B 23B
任意のアイデア: 0000450D 00320A 0000107B 023B
私は、コードはこのようになりたいですか? ありがとう!
Excelで最初のゼロを次のコードから削除したいのですが、ゼロは同じパターンを持たないという問題があります。これを達成するために私は何ができますか?前Excelの最初のゼロを削除する
コード: 450D 320A 107B 23B
任意のアイデア: 0000450D 00320A 0000107B 023B
私は、コードはこのようになりたいですか? ありがとう!
あなたはVBAを使用して満足している場合は、新しいモジュールにして、シートに以下のコードを挿入するには、単に文字を循環してから先行ゼロを除去します=ReplaceZeros(A1)
Public Function ReplaceZeros(varVal As String)
varLeading = True
For i = 1 To Len(varVal)
If Mid(varVal, i, 1) = "0" Then
If varLeading = False Then
varOutput = varOutput & Mid(varVal, i, 1)
End If
ElseIf Mid(varVal, i, 1) = " " Then
varLeading = True
varOutput = varOutput & Mid(varVal, i, 1)
Else
varLeading = False
varOutput = varOutput & Mid(varVal, i, 1)
End If
Next
ReplaceZeros = varOutput
End Function
このような関数を使用します文字列の先頭、または以下のスペース
はこれを試してみてください:
=MID(A1,FIND(LEFT(SUBSTITUTE(A1,0,"")),A1),255)