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

Вход

Регистрация

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

 

= Мир MS Excel/Найти в ячейке, заменить на значение в соседней ячейке везде - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Найти в ячейке, заменить на значение в соседней ячейке везде
IvanPavlov Дата: Суббота, 26.05.2018, 14:14 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
В таблице с товарами нужно заменить номера категорий на названия категорий. Названия и номера категорий в колонках A и B.
Как должна выглядеть формула:
найти данные из ячейки B2 и заменить на всем листе на данные из ячейки A2?
К сообщению приложен файл: catalog_primer.xls (58.0 Kb)
 
Ответить
СообщениеВ таблице с товарами нужно заменить номера категорий на названия категорий. Названия и номера категорий в колонках A и B.
Как должна выглядеть формула:
найти данные из ячейки B2 и заменить на всем листе на данные из ячейки A2?

Автор - IvanPavlov
Дата добавления - 26.05.2018 в 14:14
abtextime Дата: Суббота, 26.05.2018, 14:36 | Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 828
Репутация: 117 ±
Замечаний: 0% ±

Excel 2010
Формула не может "заменять на всём листе"

а вот макрос может

[vba]
Код
Public Sub ABReplace()
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
    Range("C2:R10000").Replace What:=Cells(i, 2).Value, Replacement:=Cells(i, 1).Value, LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
Next i
End Sub
[/vba]
К сообщению приложен файл: catalog_primer-.xlsm (15.0 Kb)
 
Ответить
СообщениеФормула не может "заменять на всём листе"

а вот макрос может

[vba]
Код
Public Sub ABReplace()
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
    Range("C2:R10000").Replace What:=Cells(i, 2).Value, Replacement:=Cells(i, 1).Value, LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
Next i
End Sub
[/vba]

Автор - abtextime
Дата добавления - 26.05.2018 в 14:36
IvanPavlov Дата: Суббота, 26.05.2018, 20:24 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
abtextime, Большое спасибо! Работает, очень помогли!
 
Ответить
Сообщениеabtextime, Большое спасибо! Работает, очень помогли!

Автор - IvanPavlov
Дата добавления - 26.05.2018 в 20:24
  • Страница 1 из 1
  • 1
Поиск:

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