Серый форум — VBA Word: Проверка ввода в Formfield под защитой

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (o5andrey) — Sun, 01 Mar 2020 05:10:20 +0000

Сердечно благодарю, работает.

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (alexii) — Sat, 29 Feb 2020 14:25:01 +0000

o5andrey, давайте попробуем для Вашего случая:

o5andrey пишет:

Для того чтобы она повторялась (чтобы потом разрезав получить две копии) я после такой формы вставляю ещё перекрёстную ссылку на всю форму целиком.

Заменим строку:

With ThisDocument.FormFields.Item(Selection.Bookmarks.Item(1).Name)

на:

With ThisDocument.FormFields.Item(Selection.Bookmarks.Item(Selection.Bookmarks.Count).Name)

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (o5andrey) — Sat, 29 Feb 2020 09:12:46 +0000

Спасибо за помощь, мне бы до такого выкрутаса не додуматься: ThisDocument.FormFields.Item(Selection.Bookmarks.Item(1).Name)
Высокоуровневое программирование - что разгадывание ребусов.

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (o5andrey) — Sat, 29 Feb 2020 08:39:07 +0000

Я понял в чём дело в моём файле.
Моя форма представляет собой три таблицы на половину листа А4. Для того чтобы она повторялась (чтобы потом разрезав получить две копии) я после такой формы вставляю ещё перекрёстную ссылку на всю форму целиком. Как только я удалил эту закладку на всё целиком - проверка заработала.
Вы не подскажете мне как сделать копию формы иным способом?

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (o5andrey) — Sat, 29 Feb 2020 05:57:59 +0000

Действительно работает.
А почему в моём файле не работает? (поля "цех" и "тип датчика" в начале)
https://dropmefiles.com/eJzXK

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (alexii) — Fri, 28 Feb 2020 17:53:11 +0000

o5andrey пишет:

Опять "говорит" "Запрашиваемый номер семейства не существует" (5941)

+ открыть спойлер

FormFields.doc.7z

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (o5andrey) — Fri, 28 Feb 2020 02:47:05 +0000

Опять "говорит" "Запрашиваемый номер семейства не существует" (5941)
Без защиты тоже не хочет...
(закладки у меня есть)

Re: VBA Word: Проверка ввода в Formfield под защитой

null@example.com (alexii) — Thu, 27 Feb 2020 18:19:26 +0000

o5andrey пишет:

(Задача - сделать проверку введённых данных. Ну вернее просто убрать переносы строки, если пользователь их поставил, и заменить точки на запятые.)

Например, так:

Option Explicit

Sub Sample()
    With ThisDocument.FormFields.Item(Selection.Bookmarks.Item(1).Name)
        If .Type = wdFieldFormTextInput Then
            .Result = Replace(Replace(.Result, ".", ","), vbCr, "")
        End If
    End With
End Sub

Само собой, все поля должны иметь закладки (по умолчанию оные есть).

VBA Word: Проверка ввода в Formfield под защитой

null@example.com (o5andrey) — Thu, 27 Feb 2020 07:07:50 +0000

Здравствуйте.
Хочу в защищённом документе-форме при выходе из конкретного поля узнать его имя
'(пример из справки)
If Selection.FormFields.Count >= 1 Then
MsgBox Selection.FormFields(1).Name
End If
Я понял что под защитой это работать не может... не знаю как выкрутиться.
Может Вы знаете как узнать идентификатор отредактированного поля через макрос выхода/входа?
Когда пробовал временно снимать защиту, он (Word) тоже "отказался"...
(Задача - сделать проверку введённых данных. Ну вернее просто убрать переносы строки, если пользователь их поставил, и заменить точки на запятые.)