Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Замена слов при помощи макроса. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Замена слов при помощи макроса. (Макросы/Sub)
Замена слов при помощи макроса.
Chelovekov Дата: Вторник, 26.01.2021, 14:39 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 210
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Здравствуйте. Прошу, Вас помог написать макрос для замены слов в ячейках.
Пример прилагаю.
Спасибо
К сообщению приложен файл: 4068589.xlsx(8.4 Kb)
 
Ответить
СообщениеЗдравствуйте. Прошу, Вас помог написать макрос для замены слов в ячейках.
Пример прилагаю.
Спасибо

Автор - Chelovekov
Дата добавления - 26.01.2021 в 14:39
RAN Дата: Вторник, 26.01.2021, 14:52 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 5422
Репутация: 1084 ±
Замечаний: 0% ±

2010
[vba]
Код
Sub Мяу()
    Dim cl As Range
    For Each cl In Selection
        If InStr(cl, Cells(1, 4).Value) Then
            cl.Value = CDate(Cells(2, 4).Value + TimeValue(Split(cl, " ")(1)))
        End If
    Next
End Sub
[/vba]


Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение[vba]
Код
Sub Мяу()
    Dim cl As Range
    For Each cl In Selection
        If InStr(cl, Cells(1, 4).Value) Then
            cl.Value = CDate(Cells(2, 4).Value + TimeValue(Split(cl, " ")(1)))
        End If
    Next
End Sub
[/vba]

Автор - RAN
Дата добавления - 26.01.2021 в 14:52
Chelovekov Дата: Вторник, 26.01.2021, 14:57 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 210
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
А можно, Вас, попросить, вставить этот код в пример.
Спасибо.
 
Ответить
СообщениеА можно, Вас, попросить, вставить этот код в пример.
Спасибо.

Автор - Chelovekov
Дата добавления - 26.01.2021 в 14:57
Serge_007 Дата: Среда, 27.01.2021, 10:37 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 13925
Репутация: 2318 ±
Замечаний: ±

Excel 2010
Chelovekov, см вложение
К сообщению приложен файл: 20210127_Chelov.xls(34.5 Kb)


Яндекс-деньги:41001419691823 | WMR:126292472390
 
Ответить
СообщениеChelovekov, см вложение

Автор - Serge_007
Дата добавления - 27.01.2021 в 10:37
Chelovekov Дата: Среда, 27.01.2021, 15:37 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 210
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Огромное всем спасибо. Просто не понял как использовать .
 
Ответить
СообщениеОгромное всем спасибо. Просто не понял как использовать .

Автор - Chelovekov
Дата добавления - 27.01.2021 в 15:37
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Замена слов при помощи макроса. (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования Jobsora jooble
© 2010-2021 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!