文字列の文字を削除するVBA

Question

私はすべての " - "を取り除くために、ExcelのスプレッドシートでクライアントのSSN番号をフォーマットする方法を考えようとしてきました。

例：123-45-6789すべての私の他のソースが失敗していると私は私を助けたことをここに何かを見つけることができませんでした123456789

に変わります。

編集：私は列全体で動作するようにこれを必要とします

Answer 1

あなたはこの短いマクロを処理して、実行したいセルを選択します。

Sub Ken() 
    Dim r As Range, v As String 

    For Each r In Intersect(Selection, ActiveSheet.UsedRange) 
     v = r.Text 
     If v <> "" Then 
      r.NumberFormat = "@" 
      r.Value = Replace(v, "-", "") 
     End If 
    Next r 
End Sub