X   Сообщение сайта
(Сообщение закроется через 3 секунды)



 

Здравствуйте, гость ( Вход | Регистрация )

Открыть тему
Тема закрыта
> Массовая замена данных в Excel, Нужно заменить буквально несколько строк
Зотов
Зотов
Topic Starter сообщение 23.10.2014, 12:22; Ответить: Зотов
Сообщение #1


Копирайтер, стаж 7 лет
******

Группа: Active User
Сообщений: 1414
Регистрация: 11.4.2012
Из: Краснодарский край
Поблагодарили: 369 раз
Репутация:   40  


Всем привет! Есть у меня файл отчёта, в котором указаны реквизиты для оплаты (для каждого заказа создаётся отдельная папка, куда помещается отчёт). В каждом файле прописан номер банковской карты. Номер карты поменялся, из-за чего нужно поменять этот номер во всех папках. Как это реализовать?


--------------------
0
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Belos
Belos
сообщение 23.10.2014, 12:40; Ответить: Belos
Сообщение #2


Старожил
******

Группа: Active User
Сообщений: 2478
Регистрация: 11.11.2008
Из: Украина
Поблагодарили: 702 раза
Репутация:   96  


попробуйте через тотал

alt+f7 -> поиск + текст -> файлы на панель -> CTRL+A -> CTRL+M -> Поиск и замена.
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Зотов
Зотов
Topic Starter сообщение 23.10.2014, 13:09; Ответить: Зотов
Сообщение #3


Копирайтер, стаж 7 лет
******

Группа: Active User
Сообщений: 1414
Регистрация: 11.4.2012
Из: Краснодарский край
Поблагодарили: 369 раз
Репутация:   40  


Цитата(Belos @ 23.10.2014, 12:40) *
alt+f7 -> поиск + текст -> файлы на панель ->


Вот это сработало, а дальше нет :huh: Итого в 188 файлах нужно заменить номер старой карточки на номер новой.


--------------------
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Belos
Belos
сообщение 23.10.2014, 14:50; Ответить: Belos
Сообщение #4


Старожил
******

Группа: Active User
Сообщений: 2478
Регистрация: 11.11.2008
Из: Украина
Поблагодарили: 702 раза
Репутация:   96  


ctrl+a - это выделение всех файлов, можете выделить через insert
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Зотов
Зотов
Topic Starter сообщение 23.10.2014, 15:11; Ответить: Зотов
Сообщение #5


Копирайтер, стаж 7 лет
******

Группа: Active User
Сообщений: 1414
Регистрация: 11.4.2012
Из: Краснодарский край
Поблагодарили: 369 раз
Репутация:   40  


Belos, выделение работает. Только причём тут групповое переименование?


--------------------
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Belos
Belos
сообщение 23.10.2014, 15:20; Ответить: Belos
Сообщение #6


Старожил
******

Группа: Active User
Сообщений: 2478
Регистрация: 11.11.2008
Из: Украина
Поблагодарили: 702 раза
Репутация:   96  


все при том ))

дальше CTRL+M -> Поиск и замена

просто в начале, когда делаете поиск, ставить галку "с текстом", в том поле пишите искомый текст, выделяете все файлы что нашли, при нажатии CTRL+M, появится меню, где будет "поиск и замена"

Сообщение отредактировал Belos - 23.10.2014, 15:25
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Зотов
Зотов
Topic Starter сообщение 23.10.2014, 15:40; Ответить: Зотов
Сообщение #7


Копирайтер, стаж 7 лет
******

Группа: Active User
Сообщений: 1414
Регистрация: 11.4.2012
Из: Краснодарский край
Поблагодарили: 369 раз
Репутация:   40  


Цитата(Belos @ 23.10.2014, 15:20) *
где будет "поиск и замена"


Не работает. Имхо, здесь "поиск и замена" всё-таки к переименованию относится.


--------------------
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Belos
Belos
сообщение 23.10.2014, 15:46; Ответить: Belos
Сообщение #8


Старожил
******

Группа: Active User
Сообщений: 2478
Регистрация: 11.11.2008
Из: Украина
Поблагодарили: 702 раза
Репутация:   96  


точно. посмотрите что-то из этого powergrep или totalreplacer
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Tollun
Tollun
сообщение 23.10.2014, 19:54; Ответить: Tollun
Сообщение #9


Старожил
******

Группа: Active User
Сообщений: 1595
Регистрация: 1.10.2009
Из: Хабаровск
Поблагодарили: 394 раза
Репутация:   66  


Можно с помощью макроса, но я хз как в под-папки заглянуть
а если всё в заданной папке, то задачу выполнит.

Код
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


--------------------
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Зотов
Зотов
Topic Starter сообщение 23.10.2014, 23:10; Ответить: Зотов
Сообщение #10


Копирайтер, стаж 7 лет
******

Группа: Active User
Сообщений: 1414
Регистрация: 11.4.2012
Из: Краснодарский край
Поблагодарили: 369 раз
Репутация:   40  


Цитата(Tollun @ 23.10.2014, 19:54) *
а если всё в заданной папке, то задачу выполнит.


К сожалению, в подпапках.

Замечание модератора:
Эта тема была закрыта автоматически ввиду отсутствия активности в ней на протяжении 100+ дней.
Если Вы считаете ее актуальной и хотите оставить сообщение, то воспользуйтесь кнопкой
или обратитесь к любому из модераторов.


--------------------
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Открыть тему
Тема закрыта
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0


Свернуть

> Похожие темы

  Тема Ответов Автор Просмотров Последний ответ
Открытая тема (нет новых ответов) задача по Excel
простая, но срочная
4 tube 435 Вчера, 17:33
автор: kirch
Открытая тема (нет новых ответов) Нужен импорт данных в Вордпресс (плагин WP All Import)
Надо настроить импорт данных в Вордпресс через плагин Wp All Import
1 mirmix 459 16.5.2018, 18:50
автор: adnr78
Открытая тема (нет новых ответов) Киви просит обновление данных
17 Grestoun 3107 30.4.2018, 8:15
автор: EvilGomel
Открытая тема (нет новых ответов) Не убьет ли сайт замена одного раздела на другой?
5 Kiloan_Frost 884 15.4.2018, 15:36
автор: UFO
Открытая тема (нет новых ответов) Объёмы загружаемых данных для мобильных и для ПК не совпадают.
Объём данных загружаемых для мобильных устройств возрастает в 2 раза.
2 Курыкин 3215 11.3.2018, 17:11
автор: mkcontext


 



RSS Текстовая версия Сейчас: 21.5.2018, 6:01
Дизайн