Поделиться через


Метод 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 и обратная связь.