Всем привет, помогите написать макрос в следующем ввиде. Пользователь заходит и видет кнопку которая выдает ему следующую форму скрин 1. Куда он вносит данные о вещи и дате (желательно открытие календаря при выборе даты) и в эту ячейку вносятся данные о введенном количестве в таблицу на скрине2
Всем привет, помогите написать макрос в следующем ввиде. Пользователь заходит и видет кнопку которая выдает ему следующую форму скрин 1. Куда он вносит данные о вещи и дате (желательно открытие календаря при выборе даты) и в эту ячейку вносятся данные о введенном количестве в таблицу на скрине2Point
Sub кнопочка_() Dim i&, d As Range, n As Range Set n = BD.Columns(2).Find([.formField1.value]) If Not n Is Nothing Then
Set d = BD(2).Find([.formField2.value]) If Not d Is Nothing Then BD.Cells(n.Row, d.Column) = [.formField3.value] Else MsgBox "???? " & [C3] & " ?? ??????? ? ???? ??????.", vbExclamation End If Else MsgBox "???????????? " & [C2] & " ?? ??????? ? ???? ??????.", vbExclamation End If End Sub
По прошлым темам, такой код сделал, никогда не работал с кнопочными формами и не знаю как обозначить поиск в строке ввода формы
Sub кнопочка_() Dim i&, d As Range, n As Range Set n = BD.Columns(2).Find([.formField1.value]) If Not n Is Nothing Then
Set d = BD(2).Find([.formField2.value]) If Not d Is Nothing Then BD.Cells(n.Row, d.Column) = [.formField3.value] Else MsgBox "???? " & [C3] & " ?? ??????? ? ???? ??????.", vbExclamation End If Else MsgBox "???????????? " & [C2] & " ?? ??????? ? ???? ??????.", vbExclamation End If End Sub
По прошлым темам, такой код сделал, никогда не работал с кнопочными формами и не знаю как обозначить поиск в строке ввода формыPoint
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
