EXCEL セルの表示形式について

こんにちは！ ＞入力簡略の為ハイフンを自動で表示できないものかと と ＞表示形式で処理したい！ というコトを考慮すると、入力したセルそのものがそのようになって欲しい！というコトですね？ VBAになってしまいますが一例です。 セル範囲が限定できませんのでA列すべてを対象としてみました。 画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面のカーソルが点滅しているところに ↓のコードをコピー＆ペースト　→　Excel画面に戻り、A列でデータ入力してみてください。 Private Sub Worksheet_Change(ByVal Target As Range) 'この行から Dim k As Long, str As String '▼A列限定 If Intersect(Target, Range("A:A")) Is Nothing Or Target.Count > 1 Then Exit Sub With Target If Len(.Value) = 3 Then If StrConv(.Value, vbNarrow) Like "*" & "[0-9]" & "*" Then If StrConv(.Value, vbNarrow) Like "*" & "[a-z A-Z]" & "*" Then str = Left(.Value, 1) & "-" & Mid(.Value, 2, 1) & "-" & Right(.Value, 1) .Value = str End If End If End If End With End Sub 'この行まで ※　3文字でアルファベットと数字が存在するデータが入力された場合だけ反応します。 どちらか一方だけ（アルファベットのみや数字のみ）の場合は反応しません。m(_ _)m