Метод WorksheetFunction.Replace (Excel)
Заменяет часть текстовой строки на основе указанного количества символов другой текстовой строкой.
expression. Replace (Arg1, Arg2, Arg3, Arg4)
Выражение Переменная, представляющая объект WorksheetFunction .
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Arg1 | Обязательный | String | Текст, в котором требуется заменить некоторые символы. |
Arg2 | Обязательный | Double | Позиция символа в Arg1 , который требуется заменить на Arg4. |
Arg3 | Обязательный | Double | Количество символов в Arg1 , которое требуется заменить методом Replaceна Arg4. |
Arg4 | Обязательный | String | Текст, заменяющий символы в Arg1. |
Строковое значение, представляющее новую строку после замены.
В этом примере abcdef заменяется ac-ef и уведомляет пользователя во время этого процесса.
Sub UseReplace()
Dim strCurrent As String
Dim strReplaced As String
strCurrent = "abcdef"
' Notify user and display current string.
MsgBox "The current string is: " & strCurrent
' Replace "cd" with "-".
strReplaced = Application.WorksheetFunction.Replace _
(Arg1:=strCurrent, Arg2:=3, _
Arg3:=2, Arg4:="-")
' Notify user and display replaced string.
MsgBox "The replaced string is: " & strReplaced
End Sub
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.