Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
При открытии книги открыть окно с двумя кнопками
 
#1
18.01.2019 08:44:46
Добрый день уважаемые форумчане, Извиняюсь заранее если вдруг подобное обсуждалось, но я ничего подобного не нашел. Помогите положить начало моему проект. ситуация такая хотелось бы сделать таким образом, чтобы при открытии книги Выскакивало окно где есть две кнопки ВХОД ВЫХОД после выбора открывается другое окно  где поле для ввода ФИО из существующего списка, после указания ФИО в соседнее поле вставлялась текущая дата и время, а после нажатия на кнопку Зарегестрировать ФИО, дата и признак вход или выход сохранялась в отдельный лист. Заранее Огромное спасибо!
 
 
 
#2
18.01.2019 08:59:53
Цитата
Совсем новичок написал: Помогите положить начало моему проект
Цитата
Совсем новичок написал: ри открытии книги Выскакивало окно где есть две кнопки ВХОД ВЫХОД
Для начала - см.файл.
Согласие есть продукт при полном непротивлении сторон
 
 
 
#3
18.01.2019 09:04:03
Посмотрел)))) Вход Выход, вот только как это заставить работать, или я что то не доглядел
Изменено: Совсем новичок - 18.01.2019 09:04:32
 
 
 
#4
18.01.2019 09:18:07
Так это, как Вы и просили, для 'начала' :) . Дальше сами. Читайте литературу, пробуйте что нибудь делать, что не получается - спрашивайте. А сейчас  Ваша тема похожа на законченное ТЗ на разработку готового проекта. Такие вопросы решают в ЭТОЙ ветке форума
Согласие есть продукт при полном непротивлении сторон
 
 
 
#5
18.01.2019 09:27:55
С удовольствием, что я сейчас и делаю)))... Действительно похоже, тогда скажу с чем у меня не получается, это с макросом который бы позволял сохранять как значение в отдельный лист  
 
 
 
#6
18.01.2019 10:32:10
Цитата
Совсем новичок написал:тогда скажу с чем у меня не получается
покажите что именно не получается.
"Все гениальное просто, а все простое гениально!!!"
 
 
 
#7
18.01.2019 12:24:15
как вариант
 
 
 
#8
18.01.2019 13:11:29
Дико извиняюсь но  вот тут
Код
With Sheets("результат")
        [C4] = Me.TextBox1
        [C5] = Me.TextBox2
End With

не хватает точек перед квадратными скобками  нужно вот так
Код
With Sheets("результат")
        .[C4] = Me.TextBox1
        .[C5] = Me.TextBox2
End With

Иначе в конструкции With ..... End With нет смысла.
"Все гениальное просто, а все простое гениально!!!"
 
 
 
#9
18.01.2019 14:48:54
Nordheim, благодарю за подсказку. Исправлюсь. :cry:  
 
 
 
#10
19.01.2019 02:07:47
Цитата
Совсем новичок написал:  тогда скажу с чем у меня не получается,
В другой теме.
 
 
 
Страницы: 1
Наверх