Вопрос № 150323: Подскажите, пожалуйста, как C помощью Microsoft Word подсчитать (и написать) количество всех букв «а» (русских или английских) в тексте?...
Вопрос № 150331: Здравствуйте, уважаемые эксперты! Вопрос по Excel. В листе есть столбец с числами. Мне нужно число "разобрать по составу" : какие цифры используются и их количество (или просто отсортировать цифры в числе). Например, в числе 17300...Вопрос
№ 150349: При распознавании текста ABBYY FineReader 8.0 и передачи в Word 2007 в последнем отображаются только прямоугольнички вместо текста. Смена кодировки Word не помогает. Что делать?...
Вопрос № 150.323
Подскажите, пожалуйста, как C помощью Microsoft Word подсчитать (и написать) количество всех букв «а» (русских или английских) в тексте?
Отправлен: 12.11.2008, 14:40
Вопрос задал: Evolut1on (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Кокин Антон Вадимович
Здравствуйте, Evolut1on! Попробуйте такой макрос (в приложении).
Приложение:
Ответ отправил: Кокин Антон Вадимович (статус: 7-й класс)
Ответ отправлен: 12.11.2008, 17:18
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 235278 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Отвечает: Moryarty
Здравствуйте, Evolut1on! Для того чтобы посчитать количество всех букв «а», например русских. Вам надо сделать следующие. В Microsoft Word нажать CTRL+F. На вкладке НАЙТИ ввести нужную букву, которую собираетесь посчитать. Далее поставить галочку напротив Выделить все элементы, найденные в: Основной документ. И нажать Найти все. Появится сообщение Найдено элементов: /количество/
--------- Я знаю достаточно, чтобы осознать, сколь многого я не знаю...
Ответ отправил: Moryarty (статус: 10-й класс)
Ответ отправлен: 12.11.2008, 20:16
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 235302 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Оценка за ответ: 5 Комментарий оценки: Спасибо. Супер ответ.
Вопрос № 150.331
Здравствуйте, уважаемые эксперты!
Вопрос по Excel. В листе есть столбец с числами. Мне нужно число "разобрать по составу" : какие цифры используются и их количество (или просто отсортировать цифры в числе). Например, в числе 17300 одна единица и три ноля, результат должен быть примерно таким: 00137.
В принципе, колонку можно переформатировать вручную, задав тип значения "строка" - так мне кажется проще. Тип значения ячейки не принципиален, можно его изменять как заблагорассудится,
"лишь бы работало". Подскажите, пожалуйста, какой функцией воспользоваться, или может, если готовой нет, напишите скрипт.
Отвечает: megaloman
Здравствуйте, Владимир Лазурко! С помощью стандартных функций как сделать Вашу задачу я не сообразил. Поэтому написал функцию (см. в приложении). Аргумент -численный. На всякий случай объясню, как описАть функцию (для оффиса 2003 и ранее, с 2007 не знаком) Сервис-Макрос-Редактор Visual Basic -Insert-Module -Вставьте туда текст функции. Используйте её как стандартную. В том числе можете ссылаться и на ячейку с числом. Естественно, уровень безопасности Excel должен позволять работать макросам. Рекомендую
Сервис-Макрос-Безопасность -Средняя Если придумаю более элегантный алгоритм-напишу. Кстати, если у Вас всё же в аргументе не число, функция рассортирует символы аргумента по возрастанию значения их кодов Очевидно, при таком подходе в случае десятичной дроби получим в ответе и разделитель целой-дробной части. Если всё же надо отсечь всё, и оставить только цифры, надо написать еще один If вместо строки Cipher = Cipher & SS(i): K = Asc(SS(i))
If 48 <= K And K <= 57 Then Cipher = Cipher & SS(i) Т.е. можете закомментировать одну строку и раскомментировать две следующие
Приложение:
--------- Нет времени на медленные танцы
Ответ отправил: megaloman (статус: Практикант)
Ответ отправлен: 12.11.2008, 18:32
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 235288 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Оценка за ответ: 5 Комментарий оценки: Отлично! Спасибо! В принципе, код символа 0 меньше кода символа 1 и т.д...
Отвечает: Moryarty
Здравствуйте, Владимир Лазурко! Можно это сделать и при помощи стандартных функций, макросом правда проще. Принцип следующий: Предположим, что числа находятся в столбце A. Тогда в ячейке A2 будет находиться число. В ячейку B2 забиваем формулу =ДЛСТР(A2), она нам покажет количество цифр в числе. Далее протягиваем эту формулу по всему столбцу в соотв. с количеством чисел в столбце A. В ячейку С1 пишим формулу =МАКС(B:B), определяем максимальное количество цифр в числе. Затем в ячейку D1 пишим
1 и протягиваем по строке до числа равному числу в ячейке C1 (зажав CTRL). В ячейку D2 пишим формулу =ПСТР($A2;D$1;1) и протягиваем ее сначала по строке в соотв. с количеством цифр, а затем по столбцу в соотв. с количеством чисел. Тем самым мы разложим число на цифр. Затем полученные ячейки копируем и вставляем на другой лист через спецвставку значений. Далее остается отсортировать каждую строку по возрастанию. Данные -> Сортировка... -> Параметры... -> Сортирова
ть столбцы диапазона. Сложно, но без VBA.
--------- Я знаю достаточно, чтобы осознать, сколь многого я не знаю...
Ответ отправил: Moryarty (статус: 10-й класс)
Ответ отправлен: 14.11.2008, 23:59
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 235541 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Оценка за ответ: 5 Комментарий оценки: Спасибо, интересное решение.. Долго, если ручками делать.
Вопрос № 150.349
При распознавании текста ABBYY FineReader 8.0 и передачи в Word 2007 в последнем отображаются только прямоугольнички вместо текста. Смена кодировки Word не помогает. Что делать?
Отправлен: 12.11.2008, 19:31
Вопрос задал: Qwett
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: deepTeNk
Здравствуйте, Qwett!
Об этой особенности ABBYY Fine Reader 8.0 известно давно.
Т.к. ABBYY Fine Reader 8.0 является лицензируемым коммерческим ПО - проблемы сохранения кириллицы в MS WORD появляются только при нелегальном использовании программы. (т.е. при использовании серийников, кряков и т.д., обсуждение которых запрещено на портале)
Единственная возможность решить вашу проблему легально - это приобрести программу. Сейчас можно приобрести ABBYY FineReader 9.0 (ABBYY
Fine Reader версии 8.0 уже не продают) - "Домашняя версия" - 1490 рублей --------- Теория - это когда вы знаете всё, но ничего не работает. Практика - это когда всё работает, но никто не знает почему. Мы совмещаем теорию и практику - все работает!
Ответ отправил: deepTeNk (статус: Академик) Белоруссия, Витебск Тел.: +375299347804 Организация: "Локальная сеть "deep" Адрес: г.Витебск, пр-кт Белобородова 1/2 WWW:"Локальная сеть "deep" ICQ: 339081522 ---- Ответ отправлен: 12.11.2008, 19:51
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 235299 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Отвечает: Cахаров Николай Константинович
Здравствуйте, Qwett! я согласен с deepTeNk ,но можно для этого установить ABBYY FineReader 7.0 там с русским все нормально.у меня,например стоит 2 ABBYY FineReader.ABBYY FineReader 8.0 для французского и других языков,а ABBYY FineReader 7.0 для русского.
* Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи.
(полный список тарифов)
** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
*** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.
