• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Mid関数を使って置換)

Mid関数を使って文字列置換

このQ&Aのポイント
  • Mid関数を使って指定された文字数の置換を行う方法について教えてください。
  • byte数を指定して文字列の置換を行いたい場合、どのような方法を取ればよいでしょうか?
  • 全角、半角の混在した文字列を対象に置換を行う場合、どのようなコードを使用すれば良いでしょうか?

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

これでどうでしょうか Sub test() Dim str As String str = "123456789" str = StrConv(str, vbFromUnicode) MidB(str, 3, 2) = StrConv("AA", vbFromUnicode) str = StrConv(str, vbUnicode) Debug.Print str End Sub

investyou
質問者

お礼

回答ありがとうございます。 そうか何も一度に記述する必要ないですね。納得です。 このまま関数にまとめて使わせていただきます。

関連するQ&A