Помощник
|
Массовая замена данных в Excel, Нужно заменить буквально несколько строк |
Зотов
|
Сообщение
#1
|
||
|
|
||
|
|||
Belos |
23.10.2014, 12:40;
Ответить: Belos
Сообщение
#2
|
|
попробуйте через тотал
alt+f7 -> поиск + текст -> файлы на панель -> CTRL+A -> CTRL+M -> Поиск и замена. |
|
|
Зотов
|
Сообщение
#3
|
|
alt+f7 -> поиск + текст -> файлы на панель -> Вот это сработало, а дальше нет Итого в 188 файлах нужно заменить номер старой карточки на номер новой. -------------------- |
|
|
Belos |
23.10.2014, 14:50;
Ответить: Belos
Сообщение
#4
|
|
ctrl+a - это выделение всех файлов, можете выделить через insert
|
|
|
Зотов
|
Сообщение
#5
|
|
Belos, выделение работает. Только причём тут групповое переименование?
-------------------- |
|
|
Belos |
23.10.2014, 15:20;
Ответить: Belos
Сообщение
#6
|
|
все при том ))
дальше CTRL+M -> Поиск и замена просто в начале, когда делаете поиск, ставить галку "с текстом", в том поле пишите искомый текст, выделяете все файлы что нашли, при нажатии CTRL+M, появится меню, где будет "поиск и замена" Сообщение отредактировал Belos - 23.10.2014, 15:25 |
|
|
Зотов
|
Сообщение
#7
|
|
где будет "поиск и замена" Не работает. Имхо, здесь "поиск и замена" всё-таки к переименованию относится. -------------------- |
|
|
Belos |
23.10.2014, 15:46;
Ответить: Belos
Сообщение
#8
|
|
точно. посмотрите что-то из этого powergrep или totalreplacer
|
|
|
Tollun |
23.10.2014, 19:54;
Ответить: Tollun
Сообщение
#9
|
|
Можно с помощью макроса, но я хз как в под-папки заглянуть
а если всё в заданной папке, то задачу выполнит. Код Sub ReplaceText()
Dim c As Range For Each c In ActiveSheet.UsedRange c = Replace(c, "Что заменить", "На что заменить") Next End Sub Sub Main() Dim strDirPath, strMaskSearch, strFileName As String Dim wb As Workbook strDirPath = "C:/123/" ' Папка поиска strMaskSearch = "*.xls*" ' Маска поиска strFileName = Dir(strDirPath + strMaskSearch) Do While strFileName <> "" Set wb = Workbooks.Open(strDirPath + strFileName) ReplaceText wb.Close True strFileName = Dir Loop End Sub Сообщение отредактировал Tollun - 23.10.2014, 19:57 |
|
|
Зотов
|
Сообщение
#10
|
|
|
а если всё в заданной папке, то задачу выполнит. К сожалению, в подпапках.
-------------------- |
|
|
||
|
Похожие темы
Тема | Ответов | Автор | Просмотров | Последний ответ | |
---|---|---|---|---|---|
Интеграция спортивных данных API. Коэффициенты БК, Live результаты | 15 | yaroslav89 | 6869 | 8.4.2024, 17:17 автор: spoyer_ru |
|
ГОРЯЧИЕ FOREX|CRYPTO ЛИДЫ. БАЗЫ ДАННЫХ [Чарджбек|Рекавери|Возврат] |
9 | Leado | 3913 | 9.2.2024, 16:04 автор: baza0013 |
|
ВКонтакте: полный комплекс услуг (массовая рассылка по стенам групп и в ЛС), парсинг, лайки, инвайты Гарантия самой низкой цены |
4 | MaxChemist | 1922 | 1.1.2023, 13:23 автор: MaxChemist |
|
Базы данных, различной тематики, выкладываем тут. Делимся, обмениваемся, заказываем, парсим. |
12 | InfoObmen | 15262 | 4.9.2022, 2:32 автор: Галецкая |
|
Сбор Данных Услуг И Специалистов Яндекс.Услуги | 2 | zkalinin | 2379 | 26.5.2022, 17:10 автор: zkalinin |
Текстовая версия | Сейчас: 25.4.2024, 8:23 |