Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.84/32: Рейтинг темы: голосов - 32, средняя оценка - 4.84
0 / 0 / 0
Регистрация: 11.11.2013
Сообщений: 5
1

Макрос в ворде-что вставлено в слова

11.11.2013, 17:06. Показов 6221. Ответов 7
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте!
Подскажите, пожалуйста, возможно ли сделать следующее: имеем вордовский файл. (во вложении)
Этот файл был как-то обработан-скорее всего в некоторые слова было что-то вставлено. (может символ, а может и нет)
Вот пример из файла:

бо*‬льшее ко*‬личество*‬ агрессивно*‬й энергии имеется в данный мо*‬мент.

берем слово "большее" и ставим курсор после этого слова и начинаем стирать стрелочкой. После словочитания "бо" что находится, т.к. курсор что-то еще стирает и удаляет, но не видно что именно. Вот в этом и состоит вопрос, можно ли узнать, что туда было вставлено и как?

Еще пример: слово "ко*‬личество". После словочитания "ко" что-то есть.
Если в ворде в стилях нажать "отчистить формат", не помагает и не видно что было вставлено
Этот текст, даже если есть вставить в блокнот не теряет своего стиля и остается с этой вставкой.
Заранее спасибо!
Вложения
Тип файла: doc Пример.doc (25.0 Кб, 139 просмотров)
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.11.2013, 17:06
Ответы с готовыми решениями:

макрос в ворде
Нужен макрос который у выделенной картинки установит следующие значения обтекание текстом =...

Макрос в Ворде
Нужен код макроса VBA, преобразующий в документе все даты записанные в виде:...

удаление в ворде страницу используя макрос
Можно ли удалить страницу если на ней есть определенное число

Рисунок в ворде, макрос подвешивает ворд
Еще раз огромное всем спасибо за разъяснения. А вот еще вопрос.Есть таблица на пол-листика...

7
5562 / 1368 / 150
Регистрация: 08.02.2009
Сообщений: 4,109
Записей в блоге: 30
11.11.2013, 17:55 2
Цитата Сообщение от alex7722 Посмотреть сообщение
что вставлено в слова
Пара символов с кодом соответственно 8237 и 8236.

В блокното удаляется легко: эту пару выделить, скопировать (Ctrl-c), нажать Ctrl-h, вставить (Ctrl-v) и нажать "Заменить всё". Всё! Бяки пропали.
1
0 / 0 / 0
Регистрация: 11.11.2013
Сообщений: 5
11.11.2013, 21:37  [ТС] 3
Цитата Сообщение от Sasha_Smirnov Посмотреть сообщение
Пара символов с кодом соответственно 8237 и 8236.

В блокното удаляется легко: эту пару выделить, скопировать (Ctrl-c), нажать Ctrl-h, вставить (Ctrl-v) и нажать "Заменить всё". Всё! Бяки пропали.
Вот в этом-то и вопрос: какие это символы? Т.е. что туда было поставлено? Т.е. я хочу в новом файле в любое слово вставить эти символы, сначала в ручную, а потом сделать макрос. Заранее спасибо!

Добавлено через 3 часа 23 минуты
Вообще было бы идеально следующее: выявить систему символов, которые были проставлены и написать макрос, т.е. автоматизировать этот процесс, т.е. чтобы макрос сам проставлял эти символы в ворде. Стоимость?
0
Модератор
Эксперт MS Access
12080 / 4940 / 791
Регистрация: 07.08.2010
Сообщений: 14,497
Записей в блоге: 4
12.11.2013, 00:49 4
Но[8237][8236], чем бо[8237][8236]льшее ко[8237][8236]личество[8237][8236] агрессивно[8237][8236]й энергии имеется в данный мо[8237][8236]мент. Тем меньший стимул нужен для то[8237][8236]го[8237][8236], что[8237][8236]бы агрессия выплеснулась во[8237][8236]вне, т.е. агрессивно[8237][8236]е по[8237][8236]ведение мо[8237][8236]жет выплеснуться спо[8237][8236]нтанно[8237][8236].
Ло[8237][8236]ренц о[8237][8236]тмечал, что[8237][8236] кро[8237][8236]ме вро[8237][8236]жденно[8237][8236]го[8237][8236] инстинкта бо[8237][8236]рьбы все живые существа наделены во[8237][8236]змо[8237][8236]жно[8237][8236]стью по[8237][8236]давлять сво[8237][8236]и стремления, т.е. имеют сдерживающее начало[8237][8236], ко[8237][8236]то[8237][8236]ро[8237][8236]е препятствует нападению на представителей сво[8237][8236]его[8237][8236] вида. А люди, в сво[8237][8236]ю о[8237][8236]чередь, о[8237][8236]бладают бо[8237][8236]лее слабым сдерживающим начало[8237][8236]м, чем живо[8237][8236]тные.
О[8237][8236]тсюда, технический про[8237][8236]гресс (о[8237][8236]ружие массо[8237][8236]во[8237][8236]го[8237][8236] уничто[8237][8236]жения) мо[8237][8236]жет привести к уничто[8237][8236]жению чело[8237][8236]века как вида. О[8237][8236]слабление агрессии во[8237][8236]змо[8237][8236]жно[8237][8236] путем различных действий. Также Ло[8237][8236]ренц утверждал, что[8237][8236] любо[8237][8236]вь и дружеские о[8237][8236]тно[8237][8236]шения мо[8237][8236]гут о[8237][8236]казаться несо[8237][8236]вместимыми с выражением о[8237][8236]ткрыто[8237][8236]й агрессии и мо[8237][8236]гут бло[8237][8236]киро[8237][8236]вать ее про[8237][8236]явления.

Добавлено через 5 минут
8237--узкий пробел, применяемый в математических формулах

Добавлено через 28 минут
похоже, что 8236 --зеркальное отражение
1
5562 / 1368 / 150
Регистрация: 08.02.2009
Сообщений: 4,109
Записей в блоге: 30
12.11.2013, 02:20 5
Пока нашёл всяческие ухищрения по теме найти-заменить: Поиск и замена в Word 2003

Был ещё «обфускатор» текста, вставляющий незаметные пробелы. Но это не ко мне.

Добавлено через 32 минуты
Для удаления известных символов подойдёт код из темы Как удалить из текста переносы, расставленные вручную

Только удаляем не Chr(31), а сцепку из двух символов: ChrW(8237) & ChrW(8236).
0
tatitata
07.03.2014, 21:35 6
shanemac51, извините, пожалуйста, а как Вы это определили?
Мне тоже надо узнать что в тексте, не могу найти на просторах интернета ответ на этот вопрос..
Модератор
Эксперт MS Access
12080 / 4940 / 791
Регистрация: 07.08.2010
Сообщений: 14,497
Записей в блоге: 4
07.03.2014, 23:41 7
плохо искали
почитайте форум Антиплагиат
0
11517 / 3803 / 681
Регистрация: 13.02.2009
Сообщений: 11,221
08.03.2014, 00:50 8
а как Вы это определили
Visual Basic
1
2
3
4
5
6
7
Sub QWERT()
Dim i, S
S = ActiveDocument.Range.Text
For i = 1 To Len(S)
Debug.Print i, Mid(S, i, 1), AscW(Mid(S, i, 1))
Next i
End Sub
смотрим дебаггер:
1 Н 1053
2 о 1086
3 ? 8237
4 ? 8236
5 , 44
6 32
7 ч 1095
8 е 1077
9 м 1084
10 32
11 б 1073
12 о 1086
13 ? 8237
14 ? 8236
15 л 1083
16 ь 1100
17 ш 1096
18 е 1077
1
08.03.2014, 00:50
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.03.2014, 00:50
Помогаю со студенческими работами здесь

Как узнать какой кнопке привязан макрос в ворде
как изменить текст на зеленый в ворде макрос: Sub Макрос1() ' ' Макрос1 Макрос ' ' ...

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

Макрос в ворде для большого числа таблиц, основные команды
Есть документ ворд с огромным количеством таблиц. Какие команды использовать для выравния во всех...

Заменить ключевые слова в ворде
Есть документ ворд, через делфи нужно открыть этот файл и заменить 4 ключевых слова 1. #FIO#...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru