OfficeType

VBA~WorksheetFunction.Replaceメソッド~Excel

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

書き方

WorksheetFunction.Replace(文字列, 開始位置, 文字数, 置換文字列)

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

image-01

Sub test1()

Range("C2") = WorksheetFunction.Replace(Range("A2"), 1, Range("B2"), "")

End Sub

image-02