OfficeType

VBA~WorksheetFunction.ReplaceBメソッド~Excel

VBAで文字列の指定した開始位置から指定したバイト数を別の文字列に置換したい場合はWorksheetFunction.ReplaceBメソッドを使います。

書き方

WorksheetFunction.ReplaceB(文字列, 開始位置, バイト数, 置換文字列)

例として下の画像において下のコードを実行するとセルC2にセルA2の文字列の中で1バイト目を開始位置とし、セルB2の文字数×2バイト分を置換文字列に置換します。今回は先頭から4バイトを空白文字列に置換しました。

image-01

Sub test1()

Range("C2") = WorksheetFunction.ReplaceB(Range("A2"), 1, Range("B2") * 2, "")

End Sub

image-02