近似した文字列を置換するエクセル関数またはVBAについて

ご教授をお願いいたします。
excelにて"あいうえお""かきくけこ"など列に異なる文字列を入力しています。新たに"123あいうえお""345かきくけこ”など頭に書き加えたものに置換する方法を教えて頂けましたらとのご相談です。
よろしくお願いいたします。

No.1 ベストアンサー 回答者： ShowMeHow 回答日時： 2024/01/30 08:31

VBAでreplace 関数を使う。

対象文字列＝replace (対象文字列、"あいうえお","123あいうえお"）
みたいに

この回答へのお礼

ShowMeHow様
早々のご対応ありがとうございます。対象文字列は100種ほど有りまして一括変換をしたいと考えてのご相談でした。地道に変換作業をするしかないのでしょうかぁ。

お礼日時：2024/01/30 08:49

No.4 回答者： 初心者ですが何か。 回答日時： 2024/02/01 11:35

受け取り方が違ってたらごめんなさい。

・元々は、

＞"あいうえお""かきくけこ"など

と入力されているセルに 123 345 と再入力をした時、セルの値が

＞"123あいうえお""345かきくけこ”など

になればいい。
既出みたいですが連結させればいいでしょう。
ただその際には元のデータが必要なので、
https://koukimra.com/archives/1945
が参考になるのでは？

もう少し具体的に書かれていれば良いのですが、
例えばＡ列をと言うのなら

＞If Intersect(Target, Range("変更管理")) Is Nothing Then Exit Sub

を共に

If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub

として、Worksheet_Change　の方に

＞MsgBox Target.Address & " の値が変更されました" & vbCrLf & _
＞ "元の値 : " & VAL

の代わりに

Target.Value = Target.Value & VAL

とするとか？
未検証でごめんなさい。

この回答へのお礼

お礼日時：2024/02/01 14:21

No.3 回答者： tatsumaru77 回答日時： 2024/01/30 17:48

セルの値＝前に付加する文字　＆ セルの値

で良いかと思います。
具体的なコードを提示してほしい場合は、シートの具体的なレイアウト及び前に付加したい具体的な文字列を提示してください。

この回答へのお礼

ご連絡ありがとうございました。
一行毎に作業し解決しました。

お礼日時：2024/02/01 14:22

No.2 回答者： ShowMeHow 回答日時： 2024/01/30 09:28

はっきりしたパターンを、プログラムで認識できなければ一つずつということになります。

この回答へのお礼

ありがとうございます。一行ずつ作業しました。

お礼日時：2024/02/01 14:23