Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2010 - [решено] Как удалить все строки в Word 2010 по результатам работы "Поиск" и "Заменить"?

Ответить
Настройки темы
2010 - [решено] Как удалить все строки в Word 2010 по результатам работы "Поиск" и "Заменить"?

Аватара для flev45

Ветеран


Сообщения: 553
Благодарности: 9


Конфигурация

Профиль | Отправить PM | Цитировать


Изменения
Автор: flev45
Дата: 27-05-2019
Как удалить все строки в Word 2010 по результатам работы "Поиск" и "Заменить"?
Есть текст, часть которого прилагаю. 2 первые строки получил вручную.
Остальные строки текста (20-30 страниц), желательно получить используя функции "Поиск" и "Заменить".
Например, как удалить все строки с "жирным" текстом, в начале которого стоит "точка"?
Или отыскал все строки с "Laden der Transaktionsdetails". Как их все удалить, не вручную?
Спасибо.

Отправлено: 10:55, 15-05-2019

 

(*.*)


Сообщения: 36490
Благодарности: 6675

Профиль | Сайт | Отправить PM | Цитировать


Цитата flev45:
ПайПал в этих файлах даёт подробнейшую инфу, включая свои внутренние заморочки, которая мне не нужна. Я выделил весь текст с HTML и перенёс его в word... а там всё тоже быстро, с Вашей помощью »
Ваша возня даже рядом не стоит с CSV. Им можно хоть внешним скриптом манипулировать и получать на выходе xlsx. Поэтому заявления про лишние данные лишь продолжение неправильно поставленной задачи.

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

-------
Канал Windows 11, etc | Чат @winsiders


Отправлено: 16:14, 16-05-2019 | #21



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для flev45

Ветеран


Сообщения: 553
Благодарности: 9

Профиль | Отправить PM | Цитировать


Цитата Iska:
Ничто не мешает исключить эту информацию при импорте данных из .csv. Так Вы сделаете это один раз — и навсегда. »
То, что я сейчас, с Вашей помощью, уже сделал на 2/3 документов - это один раз и навсегда.
Больше мне эта инфа не понадобится, в будущем.
Если можете, то сделайте пожалуйста то, чем я могу удалить все эти абзацы.

Цитата Vadikan:
Ваша возня даже рядом не стоит с CSV. »
Что я могу поделать, PayPal почему-то не выдаёт мне CSV файлы за 2016 - 2017 годы. "календарный" выбор дат не работает... разбираться почему - больше уйдёт времени на переписку с ними и т.д... да ещё и не на русском.

Последний раз редактировалось flev45, 16-05-2019 в 16:23.


Отправлено: 16:17, 16-05-2019 | #22


(*.*)


Сообщения: 36490
Благодарности: 6675

Профиль | Сайт | Отправить PM | Цитировать


Цитата flev45:
PayPal почему-то не выдаёт мне CSV файлы за 2016 - 2017 годы. "календарный" выбор дат не работает. »
У меня даже в браузере на телефоне работает, просто надо обе даты ткнуть.

-------
Канал Windows 11, etc | Чат @winsiders


Отправлено: 16:32, 16-05-2019 | #23


Аватара для flev45

Ветеран


Сообщения: 553
Благодарности: 9

Профиль | Отправить PM | Цитировать


Цитата Vadikan:
У меня даже в браузере на телефоне работает, просто надо обе даты ткнуть. »
У меня немецкий ПайПал. О заморочках. По каждой покупке ПайПал выдаёт 3-4 дато-строки в файле:
мгновенная оплата, дата запроса денег со счёта, дата получения денег ПайПал... в 3 раза больше, чем мне надо.
Мне проще скопировать "конечную" инфу с сайта.

Отправлено: 16:44, 16-05-2019 | #24


(*.*)


Сообщения: 36490
Благодарности: 6675

Профиль | Сайт | Отправить PM | Цитировать


Цитата flev45:
выдаёт 3-4 дато-строки в файле: »
Это все фильтруется легко в графическом интерфейсе экселя, да хоть сводные таблицы стройте по нужным атрибутам. Заодно Эксель освоите немного.

Я вам про выбор решения и гибкие инструменты, которые вы легко можете использовать без посторонней помощи или с минимумом гугления. А вы мне про то, как просить помощь в форуме на каждый чих. Устраняюсь из темы.

-------
Канал Windows 11, etc | Чат @winsiders

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:20, 16-05-2019 | #25


Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата Vadikan:
Iska, я не уверен, что можно тянуть в excel из PayPal. »
Я именно про импорт экспортированного из PayPal .csv, как внешних данных (а не просто открывать .csv в Excel), дабы в следующий раз можно было подменить старый .csv новым и просто обновить данные в Рабочей книге. Так-то понятно, что напрямую можно работать токмо с открытыми Web-источниками.
Это сообщение посчитали полезным следующие участники:

Отправлено: 17:24, 16-05-2019 | #26


Аватара для flev45

Ветеран


Сообщения: 553
Благодарности: 9

Профиль | Отправить PM | Цитировать


Цитата Vadikan:
Я вам про выбор решения и гибкие инструменты, »
Вы совершенно правы, если...у меня там по-видимому заблокирована закачка файлов. Пишут до 12 файлов. Я до этого закачал кучу PDF... подсчитал, ровно 12 уже скачал. Не знаю, наверное лимит 12 шт. в месяц. Ну не могу я сейчас вернуться на месяц назад.

Отправлено: 17:53, 16-05-2019 | #27


Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


flev45, пробуйте:
Код: Выделить весь код
Option Explicit

Sub Sample()
    Dim objParagraph As Paragraph
    
    For Each objParagraph In ActiveDocument.Content.Paragraphs
        If InStr(1, objParagraph.Range.Text, "Laden der Transaktionsdetails", vbTextCompare) > 0 Then
            objParagraph.Range.Delete
        ElseIf objParagraph.Range.ListFormat.ListType = wdListOutlineNumbering Then
            objParagraph.Range.Delete
        End If
    Next objParagraph
End Sub
Это сообщение посчитали полезным следующие участники:

Отправлено: 18:08, 16-05-2019 | #28


Аватара для flev45

Ветеран


Сообщения: 553
Благодарности: 9

Профиль | Отправить PM | Цитировать


Уважаемый, огромное Вам спасибо за два очень важных макроса
У Вас личка переполнена, поэтому сюда: AutoCAD примерно 40 лет тому уже был. Я самолично инсталировал его на одну из первых ПК Apple (в виде большой тумбы с дисплеем), входящую в комплект поставки к управляющей ЭВМ... для конструкторов моего Института Робототехники. Представляете, уже тогда это всё было, включая первые, штучные, яблочные ПК
ПС: главное - Ваши макросы могут быть применены с любой "текстовкой", подставляй свою и пользуйся на здоровье

Последний раз редактировалось flev45, 16-05-2019 в 19:54.


Отправлено: 19:07, 16-05-2019 | #29


Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата flev45:
AutoCAD примерно 40 лет тому уже был. »
flev45, «примерно» — это уже честнее.

Цитата flev45:
Представляете, уже тогда это всё было, »
Ну, как бы мне незачем представлять, мне доводилось их «щупать» в своё время.

Цитата flev45:
включая первые, штучные, яблочные ПК »
Это никак не могли быть «первые», в лучшем случае это могли быть какие-нибудь поздние модели Apple II.

Отправлено: 20:07, 16-05-2019 | #30



Компьютерный форум OSzone.net » Сфера Microsoft » Microsoft Office (Word, Excel, Outlook и т.д.) » 2010 - [решено] Как удалить все строки в Word 2010 по результатам работы "Поиск" и "Заменить"?

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Интерфейс - [решено] Как удалить папку "Моя музыка","Мои Картинки", "Мое видео"? verdix Microsoft Windows 2000/XP 3 03-10-2009 23:46
Не получается найти все выпуски "Хакер"+"спец"+"железо" verdix Хочу все знать 5 29-11-2008 15:19
[решено] Как удалить два "неудаляемых" вируса, их "назначение", и принцип работы Drongo Хочу все знать 20 11-05-2008 01:14
Запретить/удалить пункт "Programs" ("Программы") из меню кнопки "Start" ("Пуск") submaster Microsoft Windows NT/2000/2003 5 13-09-2006 12:29




 
Переход