Не запускается Replace

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Не запускается Replace - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Не запускается Replace (Макросы/Sub)

Не запускается Replace

DExplorer

Дата: Воскресенье, 30.05.2021, 02:34 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Подскажите пожалуйста, почему не работает Replace, и как сделать чтобы работал?

[vba]

Код

Sub fish()
    Dim str1 As String
    str1 = "one fish, two fish, three fish, four fish"
    str1 = Replace(str1, "fish", "cat", Count:=2)
End Sub

[/vba]

При запуске появляется сообщение: Compile error: wrong number of arguments or invalid property assignment.

Сообщение отредактировал DExplorer - Воскресенье, 30.05.2021, 02:35

Ответить

Апострофф

Дата: Воскресенье, 30.05.2021, 07:33 | Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 458

Репутация: 126 ±

Замечаний: 0% ±

Excel 1997

DExplorer, у меня работает почему-то?
Напишите VBA.Replace вместо Replace или выкиньте из Excel лишние библиотеки, а своим функциям давайте уникальные имена.
Скорее всего где-то у вас описана самопальная Replace.

Ответить

DExplorer

Дата: Воскресенье, 30.05.2021, 13:58 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 9

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Апострофф,
Зачёт!
VBA.Replace сработало. Получается, где-то в текущей книге у меня есть функция/или процедура "Replace", поэтому VB ругался?

Сообщение отредактировал DExplorer - Воскресенье, 30.05.2021, 14:00

Ответить

Не запускается Replace (Макросы/Sub)

Страница 1 из 1
1