Модернизация функции Найти и Заменить в Ecxel

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
Avsha
Сообщения: 665
Зарегистрирован: 08 сен 2005, 13:47
Откуда: KZ

Часто пользуюсь функцией "Найти и Заменить" в Excel,
но вот ввод текста в поля "Что:" и "Заменить на:" меня несколько утруждает, хорошо что еще предыдущие значения остаются :?

Хотелось бы:
1. Выделить один кусок текста в ячейке, правая кнопка -
в контекстном меню выбрать пункт "... строка <Что>"

2. Выделить другой кусок текста в ячейке, правая кнопка -
в контекстном меню выбрать пункт "... строка <Заменить на>"

3. Ну а затем вызвать окно функции Найти и Заменить с готовыми строками подстановки.

Можно ли создать подобный инструмент, и прямо писать в поля функции "Заменить..." ?
pashulka
Сообщения: 831
Зарегистрирован: 24 ноя 2004, 03:46
Контактная информация:

Можно, в самом простом виде это может выглядеть так :

Код: Выделить всё

Application.Dialogs(xlDialogFormulaReplace).Show "Меня заменят", "Вот я и заменю"
Ответить