まずユーザ定義を全て標準に戻し、"さん"を無くします。
A列にデータが入ってるとしたら
B列に「=A1&"さん"」と入力してB列のデータをA列に値貼付け
B列を削除すると置き換えが出来ます。
もし「橋本」ではなく「橋本さん」と入力されているセルがあると
「橋本さんさん」となってしまうので"さん"をSUBSTITUTE関数かCtrl+Hで置換えて下さい。
すいません、その方法はもう試してみたのですが、うまくいきませんでした。やはりセルの中身が元のままです。
セルから表示形式が適用された値を取り出す関数が思いつきませんでした。
VBAなら簡単にできるのにと思ったので、ならばユーザー定義で作ってしまえということで。
こんな関数を標準モジュールにコピペしてください。
Function SONOMAMA(r As Range) As String SONOMAMA = r.Text End Function
使うときは、対象セルを引数にすれば、表示されたそのままの値を取得できます。
=SONOMAMA(A1)
数式ではなく値だけが欲しい場合は、更に上記の数式のセルをコピーして形式を選択して貼り付け→値でいいです。
直接取り出す関数がある場合は蛇足なので無視してください。
このマクロを動かしてみてください
2007ですがテスト済みです
Sub test()
Dim c As Range
Dim karistr As String
For Each c In ActiveSheet.UsedRange
karistr = c.Text
c.NumberFormatLocal = "G/標準"
c.Value = karistr
Next c
End Sub
ここを参考にさせていただきました
まずユーザ定義を全て標準に戻し、"さん"を無くします。
A列にデータが入ってるとしたら
B列に「=A1&"さん"」と入力してB列のデータをA列に値貼付け
B列を削除すると置き換えが出来ます。
もし「橋本」ではなく「橋本さん」と入力されているセルがあると
「橋本さんさん」となってしまうので"さん"をSUBSTITUTE関数かCtrl+Hで置換えて下さい。
すいません、その方法はもう試してみたのですが、うまくいきませんでした。やはりセルの中身が元のままです。