Excelで社会保障番号（SSN）の最後の4桁のみを表示するにはどうすればよいですか？

社会保障番号のプライバシーを守るために、多くのExcelユーザーはExcelでSSNの最後の4桁のみを表示しようとします。この記事では、ExcelでSSNのすべての数字を隠し、最後の4桁のみを表示する方法を紹介します。

数式を使用してSSNの最後の4桁のみを表示する
VBAコードを使用してSSNの最後の4桁のみを表示する
Kutools for Excelを使用してSSNの最後の4桁以外のすべての数字を削除する

数式を使用してSSNの最後の4桁のみを表示する

次の数式は、ExcelでSSNの最後の4桁のみを表示するのに役立ちます。以下の手順に従ってください。

1. 空のセルを選択し、数式バーに =RIGHT(A2,4)という数式を入力してから、Enterキーを押します。スクリーンショットをご覧ください：

注: 数式内のA2は、社会保障番号が含まれているセルです。

2. 最初の結果セルを選択したまま、フィルハンドルを下にドラッグして、次のスクリーンショットに示すようにすべての結果を取得します。

VBAコードを使用してSSNの最後の4桁のみを表示する

次のVBAコードは、社会保障番号を入力する際に最後の4桁のみを自動的に表示するのに役立ちます。以下の手順に従ってください。

1. 社会保障番号の最後の4桁のみを表示したいワークシートで、シートタブを右クリックし、右クリックメニューから「コードの表示」を選択します。スクリーンショットをご覧ください：

2. Microsoft Visual Basic for Applicationsウィンドウで、次のVBAコードをコードウィンドウにコピーします。

VBAコード：Excelで社会保障番号の最後の4桁のみを表示する

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim I As Long
    Dim xVal As String
    On Error Resume Next
    If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    For I = 1 To Target.Count
        If Len(Target(I).Text) >= 4 Then
            Target(I).Value = Right(Target(I).Value, 4)
        End If
    Next
    Application.EnableEvents = True
End Sub

注: コード内のA:Aは、社会保障番号を入力する列です。必要に応じて変更してください。

3. Alt + Qキーを押して、Microsoft Visual Basic for Applicationsウィンドウを終了します。

これで、列Aのセルに社会保障番号を入力すると、最後の4桁以外のすべての数字が自動的に非表示になります。

Kutools for Excelを使用してSSNの最後の4桁以外のすべての数字を削除する

Kutools for Excelの「特定の位置の文字を削除」機能を使用して、社会保障番号の最後の4桁以外のすべての数字を削除できます。以下の手順に従ってください。

1. 社会保障番号が含まれているすべてのセルを選択し、次に Kutools > テキスト > 特定の位置の文字を削除 をクリックします。

2. 「特定の位置の文字を削除」ダイアログボックスで、「位置」セクションで「左から開始」オプションを選択し、「数字」ボックスで左側から削除する数字の数を指定します（ここでは7を入力しました）、そして「OK」ボタンをクリックします。スクリーンショットをご覧ください：

これで、選択されたセルの最後の4桁以外のすべての数字が削除されます。