Excelでコロン記号を追加してセル内のMACアドレスをフォーマットする

アルファベットと数字の文字列が並んだワークシートがあり、これらの文字列の各アルファベット・数値をコロンを挿入してMACアドレスに変換したいとします。以下のスクリーンショットに示すように、これを効率的に実現するにはどうすればよいでしょうか？このチュートリアルでは、この課題に対処するための簡単な方法を提供します。

数式を使用して数字やテキストをMACアドレスとしてフォーマットする
Kutools for Excelを使用して簡単に数字やテキストをMACアドレスとしてフォーマットする
VBAを使用して数字やテキストをMACアドレスとしてフォーマットする

数式を使用して数字やテキストをMACアドレスとしてフォーマットする

1. 空白のセルを選択し、次の数式を入力してから Enter キーを押して最初の結果を得ます。スクリーンショットをご覧ください：

   =LEFT(A2,2)&":"&MID(A2,3,2)&":"&MID(A2,5,2)&":"&MID(A2,7,2)&":"&MID(A2,9,2)&":"&RIGHT(A2,2)

   
   注: 数式の中では、A2はMAC形式にフォーマットされる文字列リストの最初のセルです。
2. 最初の結果セルを選択し、そのフィルハンドルを下にドラッグして残りのMACアドレスを取得します。スクリーンショットをご覧ください：
   

Kutools for Excelを使用して簡単に数字やテキストをMACアドレスとしてフォーマットする

前述の方法で提供された数式は、理解するのが少し難しいかもしれません。よりシンプルな解決策を探している場合、Kutools for Excelの「テキストの追加」機能が強く推奨されます。このユーティリティを使用すると、指定された位置にコロンを簡単に追加でき、それによりセル内の文字列を迅速にMACアドレスとしてフォーマットできます。以下の手順に従ってください。

1. MACアドレスとしてフォーマットする必要がある文字列が含まれているセルを選択します。
2. テキストボックスにコロンを入力します。
3. 次に 指定された位置 オプションを選択し、その後、コロンを追加したい場所を表す数字を入力します。
   ヒント: この場合、セル内の2つの数字ごとにコロンを追加する必要がありますので、2、4、6、8、10をカンマで区切って入力します。スクリーンショットをご覧ください：
4. OKボタンをクリックします。
   

結果

選択したセル内の文字列は、以下のスクリーンショットに示すようにMACアドレスとしてフォーマットされました。

VBAを使用して数字やテキストをMACアドレスとしてフォーマットする

また、VBAコードを使用してExcelで数字やテキストをMACアドレスとしてフォーマットすることもできます。次の手順に従ってください。

1. Alt + F11キーを同時に押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。
2. 開いた Microsoft Visual Basic for Applications ウィンドウで、「 挿入 > モジュール」をクリックします。そして、以下のVBAコードを新しいモジュールコードウィンドウにコピーします。
   
   VBAコード：セル内の数字をMACアドレスとしてフォーマットする

   Sub FormatMAC()
   'Updated by Extendoffice 20231103
       Dim I As Long
       Dim xRg As Range
       Dim xCell As Range
       Dim xVal As String
       Dim xStr As String
       On Error Resume Next
       Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", Selection.Address, , , , , 8)
       If xRg Is Nothing Then Exit Sub
       On Error GoTo 0
       For Each xCell In xRg
           xVal = xCell.Value
           If InStr(xVal, ":") > 0 Then
               xVal = Replace(xVal, ":", "")
           End If
           For I = 1 To Int(Len(xVal) / 2)
               xStr = xStr & Mid(xVal, 2 * I - 1, 2) & ":"
           Next
           xCell.Value = Left(xStr, Len(xStr) - 1) 'Remove the last ":"
           xStr = ""
       Next
   End Sub
   

3. 開かれたKutools for Excelダイアログボックスで、MACアドレスとしてフォーマットしたい文字列が含まれるセルを選択し、OKボタンをクリックします。
   

これで、選択したセルが以下のスクリーンショットに示すようにMACアドレスとしてフォーマットされていることが確認できます。

関連記事：

• Excelで選択したセルの中央にテキストを追加するにはどうすればよいですか？
• Excelでセル/テキストの末尾にコンマを追加するにはどうすればよいですか？
• Excelでセル内の各単語の前に文字を追加するにはどうすればよいですか？