Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Заменяет часть текстовой строки на основе указанного количества символов другой текстовой строкой.
Синтаксис
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 и обратная связь.