Поиск и замена текста - VBA
Формулировка задачи:
Подскажите пожалуйста, как правильно прописать код, поиска текста, затем его замена фиксированным текстом с добавлением информации из ячейки с предыдущего столбца но этой же строки?
выдает ошибку
Решение задачи: «Поиск и замена текста»
textual
Листинг программы
Private Sub Test2v2() Dim iSource As Range, iCell As Range Set iSource = Worksheets(3).Range("B:B") Set iCell = iSource.Find("нашел", , xlValues, xlPart) Do Until iCell Is Nothing iCell = iCell(1, 0) & "условие" Set iCell = iSource.FindNext Loop End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д