Вставка даты в поле с последующим копированием даты

Добрый день.
Возник вопрос? Созданы поля формы в два столбика и шесть строк. В первых полях этих двух столбиков вписаны даты 24.04.24 и 25.04.24. Можно ли сделать так, то бы при наведении мыши на нижние поля, заполнились
данные даты введённой в первых двух полях, но не во всех строках, а только например в первых трёх, а в остальных 4,5,6 строке можно было вводить другие даты. Это типа как в эксель - вбиваешь дату в одну ячейку, нажимаешь внизу ячейки
мышкой и ведёшь в низ, первая ячейка копирует дату во все нижние ячейки, только здесь надо в форме сделать такое.
Если можно, то я буду премного благодарен.

0

АЕ,

Сообщение от АЕ Я про события толковал. А из буфера обмена или из глобальной переменной все равно. Но человеку со справкой тяжело понять видимо.

Человека который всё знал и всё умел на свете нет. Всю жизнь человек учится и постигает всё новое и новое.
Если я Вас спросил бы сколько у вальдшнепа яиц в кладке, уверен вы бы полезли сразу в интернет, но я бы Вас человеком со справкой не назвал, невозможно во всём быть профи, поэтому я и спрашиваю у людей кто в этом силён.
Так что на другие темы кроме программирования можно было бы поговорить с Вами, и я уверен что во многих других вопросах Вас можно было бы человеком со справкой назвать. Это к тому, что ещё не одного человека на форуме я не оскорбил в отличие от Вас. Повторяю все люди всю жизнь учатся.

0

Сообщение от alexsei18 Повторяю все люди всю жизнь учатся.

Согласен. Я научился отличать балабола от нуждающегося в помощи. Вот вы вроде хвастаетесь про яйца? А благодарностей вам за это не насыпали. А почему? Не задумывались? Я ведь многим помогаю. Почему с вами не так?
Более того, критику мою раздуваете в тему (видимо это близко и понятно к сущности вашего бытия), а советы игнорируете (видимо это не понятно к восприятию). Впрочем, прошу простить меня покорно. Честь имею.

Добавлено через 12 минут

Сообщение от alexsei18 Если я Вас спросил бы сколько у вальдшнепа яиц в кладке,

Охотился на них. Очень умные. Но когда у них кладки запрещено. Это я и без интернета знаю.

0

АЕ,

Сообщение от АЕ А благодарностей вам за это не насыпали.

Ну откуда Вы можете знать отсыпают мне за это благодарности или нет?

Сообщение от АЕ критику мою раздуваете в тему

Я думаю это не критика не зная человека называть его человеком со справкой, и балаболом.
Наверное это ВЕРХ воспитания. По поводу помощи если не хотите Вас никто не заставляет. Честь имею.

0

На пространные философствования усилий не жалко.
А на спасибо и мало-мальскую реакцию на решение - почему-то нет.

Дело хозяйское, конечно.

1

Capi, Пост15.17 спасибо сказано.
Если на до ещё сказать, то лично Вам я премного благодарен.
С уважением ко всем кто отозвался и прислал мне ответы на мою просьбу.

0

Сообщение от alexsei18 По поводу помощи если не хотите Вас никто не заставляет.

Сообщение от АЕ используйте буфер обмена и к примеру прибавление к значению из буфера обмена единицы на двойной клик и вставка.

"Я про события толковал. А из буфера обмена или из глобальной переменной все равно."
Это мои цитаты. Если не воспринимаете их как помощь, то это дело Ваше. Вас тоже никто не заставляет пытаться понять прочитанное.

0

А че вы ни кто не посоветуете уже вторую страницу, что бы ТС в свойстве поля с датой написал в значении по умолчанию
= Date()
Будет проставляться текущая дата, когда в любое другое поле записи будет введен хоть один символ.
Наверняка именно это и нужно ТСу.

1

Сообщение от alexsei18 Это как в эксель вводишь число в ячейку

Так в Эксель только и есть ячейки. Может вам туда. Или вы нашли ячейки в Акцессе? Тогда дайте мне определение ячейки!

0

Сообщение от VinniPuh Будет проставляться текущая дата, когда в любое другое поле записи будет введен хоть один символ.

Нет там никаких записей.

Сообщение от Capi У ТС нет следующей записи, есть свободная форма с нарисованной из кубиков (полей) "матрицей".

И даты нужны всякие-разные, а не только текущая.

0

Сообщение от alexsei18 ... заполняю поле А1 какой то датой, в поля А2,А3,А4, програмно вписываю код VBA, и у меня значение из поля А1 копируется в поля А2,А3,А4. После чего в поле А5 вписываю другую дату, а в поле А6 другую.

Пример ниже. Особо не тестировал, но вроде работает.

Миниатюры

   

Вложения

DatabaseTest_MSA2007_v01.zip (54.6 Кб, 21 просмотров)

1

alvk,

Сообщение от alvk Так в Эксель только и есть ячейки.

Эксель я привёл в качестве примера что мне бы хотелось приблизительно, (так же и форму я прислал без записей что бы визуально видеть), что бы поля с введённой в первом поле датой заполнялись дальше наведением на них мышкой и нажатием клавиши мыши (то есть можно было бы из 12 полей одной датой заполнить например четыре поля и не по порядку а как мне надо, и остальные поля заполнялись бы так же - в одно пустое поле вводил бы другую запись, а потом мышкой подводил на пустые поля тыкал клавишей и вставлялось бы введённое число - дата). Конечно можно выделять F2, потом Ctrl +C+V, но это лишние секунды, а когда вводить информации много уже секунды превращаются в минуты. Язык VBA специально и вставлен в MS Acess что бы кроме штатных команд человек под себя мог оптимизировать программу, а оптимизация, это как я считаю объединение многих команд в одну, упрощение работы а это ведёт к снижению времени ввода данных в программе и т. д.. Ведь для чего сделаны разворачивающие списки? (для снижения времени ввода данных) Можно ведь открыть одну таблицу - скопировать данные , открыть другую и вставить данные - но это время!!!! Любая идея в начале кажется сумасшедшей, но когда она воплощается в жизнь люди ей пользуются и благодарят. Но моя идея скорее всего не выполнима???????? Будем выделять F2, и копировать Ctrl +C+V Спасибо всем кто принимал участие и постарался как то помочь, премного благодарен.

0

Сообщение от alexsei18 так же и форму я прислал без записей что бы визуально видеть

То есть, Вы всех дурачили, головы морочили?

А на самом деле там записи будут?

Тут ответ элементарный: DefaultValue.

Добавлено через 1 минуту

Сообщение от alexsei18 Но моя идея скорее всего не выполнима????????

А Вы посильнее шифруйтесь в вопросах, тогда и a+b станет невыполнимым.

0

Сообщение от alexsei18 что бы визуально видеть

Чего? А визуально слышать вы тоже умеете?

Сообщение от alexsei18 что бы поля с введённой в первом поле датой заполнялись дальше наведением на них мышкой и нажатием клавиши мыши

Вы излагаете свои варианты выполнения задачи, а нужно рассказать задачу саму. Откуда 12 полей, для чего они, почему заполняются вразнобой и т.д.

0

Eugene-LS, Спасибо огромное!!!!
Всё как я хотел. Премного благодарен Вам. Не первый раз помогаете.
Ещё раз огромное спасибо.
Мог бы ещё благодарностей поставить - поставил бы.

0

Сообщение от alvk ...а нужно рассказать задачу саму...

Полностью согласен с данным оратором.
Что бы помочь, нужно знать задачу и видеть максимально приближённый к реальности пример с внятными и осмысленными данными, а не от балды, типа таких как -
аааааа
бббббб
ввввв
222222222
Правильно сказано свыше,

Сообщение от Capi ...А Вы посильнее шифруйтесь в вопросах, тогда и a+b станет невыполнимым...

Если таиться и скрывать истинный замысел, то тогда точно помощь не придет или придется усиленно переделывать под свой пример, но не у всех это получается.
И не многим помощникам по 100 раз переделывать захочется.
Можно остаться на бобах у разбитого корыта.

0

А <ctrl> + <2> нажимать не пробовали (форма, как я понял табличная). К чему все Ваши(экселевские) "изощрения"-или боитесь что юзер "перетрудится"?
Вряд ли это будет быстрее

Сообщение от alexsei18 Будем выделять F2, и копировать Ctrl +C+V

Ведь Вам придется заполнять все эти записи(маловероятно что таблица содержит 1 поле,хотя так бывает) И какой смысл создать N новых записей, а затем вернуться к их заполнению. Я уж молчу о том что в записях могут быть обязательные поля

0

SDKU, Всё что сделал Eugene-LS в 30 посте меня полностью устраивает, это то что я хотел, ему ещё раз огромное спасибо, и спасибо всем кто участвовал в решении моего вопроса.

0

Eugene-LS, Уважаемый Eugene-LS, получилось так, что понадобилось ещё два таких же столбца
C и D. Мучался добавить в код, ничего не получается, ещё не достиг такого уровня, а создать базу надо.
Если не трудно можно ли дописать код в Вашу базу в посте 30, под ещё два столбца.
Буду премного благодарен.

Добавлено через 5 часов 32 минуты
И ещё один вопрос к знающим.
Вставляю данный код VBA в одну форму работает нормально,
открываю другую форму - вставляю в неё код выдаёт ошибку
"Method or data member not found"
и встает на строке "Private Sub CtrlMouseMove(sCtrlLet$, iCtrlNo%, iButton As Integer, X As Single, Y As Single)"
Что то я не так делаю.

0

Сообщение от alexsei18 ...но не во всех строках, а только например в первых трёх, а в остальных 4,5,6 строке можно было вводить другие даты

Стесняюсь спросить: а откуда взялись 4,5 и 6 строка\запись если в форме 2 столбца(так написано в ТЗ) с пустыми полями
Кончайте "изобретать" велосипед и пытаться превратить БД в эл.таблицу, а просто сделайте как Вам советуют в сообщении 18
Другое дело если бы вопрос звучал так:как вставить N записей с пустыми полями,кроме поля дата значение которой в каждой записи должно увеличиваться на 1 день

0

SDKU, Спасибо что ответили. Со вторым вопросом я разобрался.
По поводу первого вопроса я не изобретаю велосипед, а стараюсь упростить заполнение
данной формы по времени, что бы например вписал одну дату, провёл мышкой по трём полям
и она вставилась, потом вставил другую дату и провел по остальным полям и они тоже заполнились. Клавиатурой
копировать и вставлять не каждый умеет, и уровень владения ПК у тех кто заполняет разный. Кроме того в день такую форму будут заполнять человек 30
каждый по раз 200 - 250, вот и посчитайте если время заполнения каждой формы займёт на секунд 15 меньше
то в целом выходит порядочно, а если ещё и другие операции оптимизировать, то заполняющие формы работники большое спасибо скажут. Спасибо что отозвались.

0