Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как распознать математические символы в Word макросом (пример файла) / 7 сообщений из 7, страница 1 из 1
05.10.2013, 17:15
    #38417743
dmitry1000
dmitry1000
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как распознать математические символы в Word макросом (пример файла)
Здравствуйте,

полцарства за коня, если кто-то распознает эти 2 символа в VBA - см. файл пример
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2013, 17:16
    #38417744
dmitry1000
dmitry1000
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как распознать математические символы в Word макросом (пример файла)
в смысле отличит один от другого
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2013, 19:07
    #38417782
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как распознать математические символы в Word макросом (пример файла)
не сдаюсь пока, но в ступоре
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2013, 19:18
    #38417784
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как распознать математические символы в Word макросом (пример файла)
Вообще на самом деле это символ с кодом &HA3 шрифт Symbol
Копирование в Эксель это отчетливо показывает.
Могу написать макрос, который отличает их через Эксель - где мои полцарства?

Однако объектная модель ворда упорно считает его символом ASCII с десятичным кодом 40 и шрифтом Times New Roman

Как этого удалось достичь?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2013, 20:03
    #38417811
dmitry1000
dmitry1000
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как распознать математические символы в Word макросом (пример файла)
Вообщем, после того как я сломал себе мозг и замучил google это решилось так:

Код: vbnet
1.
2.
3.
4.
5.
    Dim oDlg As Dialog
    Dim iFnt As String
    ActiveDocument.Characters(i).Select
    Set oDlg = Dialogs(wdDialogInsertSymbol)
    iFnt = Dialogs(wdDialogInsertSymbol).charnum


для скобки и знака возвращается разное значение... А дальше уже дело техники.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.10.2013, 20:07
    #38417816
dmitry1000
dmitry1000
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как распознать математические символы в Word макросом (пример файла)
даже лишнее написал
Set oDlg = Dialogs(wdDialogInsertSymbol)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.10.2013, 23:52
    #38419553
Сын вождя
Сын вождя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как распознать математические символы в Word макросом (пример файла)
Старый глюк. Три года назад закидывал пример на другой форум. Думаю, учиться работать с этими символами нет смысла, лучше найти способ зачистить от этого срзу весь документ, пересохранением каким.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как распознать математические символы в Word макросом (пример файла) / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 432ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2174491]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 29ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 44ms
get tp. blocked users:
 2ms
others: 317ms
total:  432ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]