[[20140731064542]]　『エクセルの文字に特定の文字を追加したい』（タカシ）　ページの最後に飛ぶ

『エクセルの文字に特定の文字を追加したい』（タカシ）

エクセルの文字で左から5番目と左から7番目に#を入れたいのですが、良い関数などあるかご存じの方いたら教えてください。

文字を入れるセルなど決まっていなく、エクセルへコピーした瞬間に
5番目と7番目に#がつくようにしたいです。

＜使用 Excel：Excel2007、使用 OS：WindowsXP ＞

文字を入れるセルを制限しないと、不便だと思いますが？

 Private Sub Worksheet_Change(ByVal Target As Range)
    Dim R As Range

    For Each R In Target
        If 5 < Len(R.Value) Then
            If Mid(R.Value, 5, 1) <> "#" Then
                R.Value = Left(R.Value, 4) & "#" & Mid(R.Value, 5, 1) & "#" & Mid(R.Value, 6)
            End If
        End If
    Next
End Sub
（???） 2014/07/31(木) 08:40

コメント返信：

[ 一覧(最新更新順) ]

[[20140731064542]] 『エクセルの文字に特定の文字を追加したい』（タカシ） ページの最後に飛ぶ

[[20140731064542]]　『エクセルの文字に特定の文字を追加したい』（タカシ）　ページの最後に飛ぶ