Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной / 7 сообщений из 7, страница 1 из 1
27.02.2013, 10:25
    #38167553
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной
Здравствуйте, если по строке кода
Код: vbnet
1.
2.
 'проверка орфографии слова
            If Application.CheckSpelling(Слово)= False Then


мы имеем False как узнать все предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной "Слово"
Спасибо
...
Рейтинг: 0 / 0
27.02.2013, 10:45
    #38167602
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной
Относительного слова находящегося в переменной — никак. Можно относительно слова в документе:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
For Each w In ThisDocument.Words
    If w.GetSpellingSuggestions().Count > 0 Then
        Debug.Print w; ":",
        For Each s In w.GetSpellingSuggestions()
            Debug.Print s,
        Next
        Debug.Print
    End If
Next
...
Рейтинг: 0 / 0
27.02.2013, 10:48
    #38167610
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной
Antonariy,
Относительного слова находящегося в переменной — никак - куда ни кинь всюду клин, ладно, спасибо долгоиграющий процесс закончится протестирую
...
Рейтинг: 0 / 0
28.02.2013, 08:18
    #38168991
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной
катастрофаAntonariy,
Относительного слова находящегося в переменной — никак - куда ни кинь всюду клин, ладно, спасибо долгоиграющий процесс закончится протестирую

вот так вот кажись работает
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Function SpellCheck(rng As Range) As Boolean
    SpellCheck = Application.CheckSpelling(rng)
End Function

Public Sub test()
    Dim r As Range
    Set r = ThisDocument.Range(0, 0)
    r = "слово"
    Debug.Print SpellCheck(r)
End Sub



ЗЫЖ идея взята отсюда ссылка
...
Рейтинг: 0 / 0
28.02.2013, 08:39
    #38169006
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной
HandKot, спасибо опробую
...
Рейтинг: 0 / 0
28.02.2013, 08:40
    #38169009
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной
катастрофаHandKot, спасибо опробую
я вот только не смотрел на документ, он собака (range) в документ слово вставляет :(
...
Рейтинг: 0 / 0
28.02.2013, 08:41
    #38169010
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной
хотя, если добавить
Код: vbnet
1.
r.Delete


то оно удаляетс...автоматика блин
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / предлагающееся Вордом слова без ошибки относительного слова находящегося в переменной / 7 сообщений из 7, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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