Страницы: 1
RSS
Сравнение строк в таблице с данными вводимыми через форму
 
Здравствуйте.
Есть форма ввода данных в таблицу.
Как перед добавлением проверить введены ли уже эти данные в таблицу?
Проверка на все поля кроме (CheckBox1, TextBox4, TextBox5). В случае полного совпадения вывести сообщение, форму не закрывать, данные не добавлять в таблицу, выделить строку с найденными значениями.
Спасибо.
Изменено: comment.imho - 19.02.2022 14:17:13 (Снят пароль с листа)
 
Здравствуйте. Вы бы хоть пароль с листа сняли. Ok
Изменено: Ёк-Мок - 19.02.2022 17:45:33
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
Ёк-Мок, прошу прощения. Совсем забыл про него.
 
Вариант с доп.скрытым столбцом "N"

off При обработке "щелчка" на чек-боксе 1 файл глючит. Замените "CheckBox1.Value" на "True"
Код
'При нажатии чекбокса открываем TextBox6
    Sub CheckBox1_Click()
        TextBox6.Text = ""
        'TextBox6.Visible = CheckBox1.Value
        TextBox6.Visible = True
        CheckBox1.Visible = False
        TextBox6.SetFocus
    End Sub
Какой смысл в данном случае присваивать значению видимости текст-бокса 6 значение скрываемого чек-бокса 1 - когда чек-бокс 1 скрыт, то "чекнуть" повторно его уже не получится и, соответственно, значение видимости текст-бокса 6 никогда не станет "False". Файл заменил.
Изменено: Ёк-Мок - 19.02.2022 18:33:47
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
 
Ёк-Мок, Спасибо за решение. Правда это работает только для вновь создаваемых записей, но не для уже существующих. Но это решаемо.
Изменено: comment.imho - 20.02.2022 11:05:25
 
>>> это работает только для вновь создаваемых записей
Само собой, ведь в скрытом столбце "N" нет данных по ранее записанным строкам
>>> это решаемо
Да, придется их создать для предложенного варианта решения
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
Страницы: 1
Наверх