Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Автоматическое выставление даты при заполнение поля - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Автоматическое выставление даты при заполнение поля
Гость Дата: Среда, 02.11.2011, 16:52 | Сообщение № 1
Группа: Гости
Вот что интересно, можно ли сделать в exel так, что при заполнении одной ячейки (все равно чем, числа, текст) в другой будет автоматически выставляться дата когда было выполнено заполнение первой ячейки? Спасибо за помощь.
 
Ответить
СообщениеВот что интересно, можно ли сделать в exel так, что при заполнении одной ячейки (все равно чем, числа, текст) в другой будет автоматически выставляться дата когда было выполнено заполнение первой ячейки? Спасибо за помощь.

Автор - Гость
Дата добавления - 02.11.2011 в 16:52
Serge_007 Дата: Среда, 02.11.2011, 17:09 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Только вчера было, на дружественном форуме.


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеТолько вчера было, на дружественном форуме.

Автор - Serge_007
Дата добавления - 02.11.2011 в 17:09
Hugo Дата: Среда, 02.11.2011, 17:10 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3690
Репутация: 790 ±
Замечаний: 0% ±

365
Можно.
Нашёл пример чуть более навороченный:

Code
'вставляет и дату и имя юзера:    
Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Cells.Count > 1 Then Exit Sub
     If Not Intersect(Target, Range("A2:A100")) Is Nothing Then
         With Target(1, 2)
             .Value = Now
             .EntireColumn.AutoFit
         End With
         With Target(1, 3)
             .Value = Application.UserName
             .EntireColumn.AutoFit
         End With
     End If
End Sub


Код в модуль листа, меняйте значения в A2:A100.


webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеМожно.
Нашёл пример чуть более навороченный:

Code
'вставляет и дату и имя юзера:    
Private Sub Worksheet_Change(ByVal Target As Range)
     If Target.Cells.Count > 1 Then Exit Sub
     If Not Intersect(Target, Range("A2:A100")) Is Nothing Then
         With Target(1, 2)
             .Value = Now
             .EntireColumn.AutoFit
         End With
         With Target(1, 3)
             .Value = Application.UserName
             .EntireColumn.AutoFit
         End With
     End If
End Sub


Код в модуль листа, меняйте значения в A2:A100.

Автор - Hugo
Дата добавления - 02.11.2011 в 17:10
light26 Дата: Четверг, 03.11.2011, 10:51 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Хм, а если нужно решить проблему формулой?
Нельзя использовать что-то типа =ЕСЛИ(А1="*";СЕГОДНЯ();"") ? Или дата будет меняться?


Я не волшебник. Я только учусь
 
Ответить
СообщениеХм, а если нужно решить проблему формулой?
Нельзя использовать что-то типа =ЕСЛИ(А1="*";СЕГОДНЯ();"") ? Или дата будет меняться?

Автор - light26
Дата добавления - 03.11.2011 в 10:51
Serge_007 Дата: Четверг, 03.11.2011, 10:56 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (light26)
Или дата будет меняться?

А попробовать? wink

Quote (light26)
А1="*"

Вадим, что ты этим собрался делать?
Искать звездочку?


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (light26)
Или дата будет меняться?

А попробовать? wink

Quote (light26)
А1="*"

Вадим, что ты этим собрался делать?
Искать звездочку?

Автор - Serge_007
Дата добавления - 03.11.2011 в 10:56
light26 Дата: Четверг, 03.11.2011, 10:57 | Сообщение № 6
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Блин, попробовал сейчас сам эту формулу - не работает. Дата отображается только если ввести символ *.
Я всегда считал, что этот символ служит как определение "любое значение".
Ну, в принципе, это не суть важно. Сама процесс вычислений по этой логике возможен?


Я не волшебник. Я только учусь
 
Ответить
СообщениеБлин, попробовал сейчас сам эту формулу - не работает. Дата отображается только если ввести символ *.
Я всегда считал, что этот символ служит как определение "любое значение".
Ну, в принципе, это не суть важно. Сама процесс вычислений по этой логике возможен?

Автор - light26
Дата добавления - 03.11.2011 в 10:57
Serge_007 Дата: Четверг, 03.11.2011, 11:00 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (light26)
Сама процесс вычислений по этой логике возможен?

Нет.
Функция СЕГОДНЯ() волатильна, т.е. она меняет своё значение при любом изменении на листе.


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (light26)
Сама процесс вычислений по этой логике возможен?

Нет.
Функция СЕГОДНЯ() волатильна, т.е. она меняет своё значение при любом изменении на листе.

Автор - Serge_007
Дата добавления - 03.11.2011 в 11:00
light26 Дата: Четверг, 03.11.2011, 11:07 | Сообщение № 8
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Quote (Serge_007)
А попробовать?

Ну, если использовать =ТДАТА, то ячейка с формулой должна работать как обычные часы с календарем, правильно? Разумеется при значении ИСТИНА. Этого не происходит. Следовательно и =СЕГОДНЯ будет отображать только дату внесенных изменений. Остался вопрос: что использовать вместо "*"?


Я не волшебник. Я только учусь
 
Ответить
Сообщение
Quote (Serge_007)
А попробовать?

Ну, если использовать =ТДАТА, то ячейка с формулой должна работать как обычные часы с календарем, правильно? Разумеется при значении ИСТИНА. Этого не происходит. Следовательно и =СЕГОДНЯ будет отображать только дату внесенных изменений. Остался вопрос: что использовать вместо "*"?

Автор - light26
Дата добавления - 03.11.2011 в 11:07
light26 Дата: Четверг, 03.11.2011, 11:08 | Сообщение № 9
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Quote (Serge_007)
Функция СЕГОДНЯ() волатильна, т.е. она меняет своё значение при любом изменении на листе.

Слюшай, абидна, да )


Я не волшебник. Я только учусь
 
Ответить
Сообщение
Quote (Serge_007)
Функция СЕГОДНЯ() волатильна, т.е. она меняет своё значение при любом изменении на листе.

Слюшай, абидна, да )

Автор - light26
Дата добавления - 03.11.2011 в 11:08
light26 Дата: Четверг, 03.11.2011, 11:10 | Сообщение № 10
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
А средствами формул волатильность =СЕГОДНЯ никак нельзя убрать?


Я не волшебник. Я только учусь
 
Ответить
СообщениеА средствами формул волатильность =СЕГОДНЯ никак нельзя убрать?

Автор - light26
Дата добавления - 03.11.2011 в 11:10
Serge_007 Дата: Четверг, 03.11.2011, 11:12 | Сообщение № 11
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (light26)
ячейка с формулой должна работать как обычные часы с календарем, правильно?

Не правильно. Читай что я пишу:
Quote (Serge_007)
она меняет своё значение при любом изменении на листе
, а не каждую секунду.

Quote (light26)
что использовать вместо "*"?

<>""

Quote (light26)
средствами формул волатильность =СЕГОДНЯ никак нельзя убрать?

Нет, это прописано в коде функции.

ЗЫ Да и зачем такая функция СЕГОДНЯ() нужна, если завтра она будет показывать вчера?


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (light26)
ячейка с формулой должна работать как обычные часы с календарем, правильно?

Не правильно. Читай что я пишу:
Quote (Serge_007)
она меняет своё значение при любом изменении на листе
, а не каждую секунду.

Quote (light26)
что использовать вместо "*"?

<>""

Quote (light26)
средствами формул волатильность =СЕГОДНЯ никак нельзя убрать?

Нет, это прописано в коде функции.

ЗЫ Да и зачем такая функция СЕГОДНЯ() нужна, если завтра она будет показывать вчера?

Автор - Serge_007
Дата добавления - 03.11.2011 в 11:12
light26 Дата: Четверг, 03.11.2011, 11:12 | Сообщение № 12
Группа: Друзья
Ранг: Старожил
Сообщений: 1351
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Quote (Serge_007)
Вадим, что ты этим собрался делать?
Искать звездочку?

Quote (light26)
Я всегда считал, что этот символ служит как определение "любое значение".


Я не волшебник. Я только учусь
 
Ответить
Сообщение
Quote (Serge_007)
Вадим, что ты этим собрался делать?
Искать звездочку?

Quote (light26)
Я всегда считал, что этот символ служит как определение "любое значение".

Автор - light26
Дата добавления - 03.11.2011 в 11:12
Serge_007 Дата: Четверг, 03.11.2011, 11:15 | Сообщение № 13
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (light26)
Я всегда считал, что этот символ служит как определение "любое значение".

Правильно. А двойные кавычки служат для обозначения текста. И ты из знака подстановки * ими делаешь текст "*".


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (light26)
Я всегда считал, что этот символ служит как определение "любое значение".

Правильно. А двойные кавычки служат для обозначения текста. И ты из знака подстановки * ими делаешь текст "*".

Автор - Serge_007
Дата добавления - 03.11.2011 в 11:15
Michael_S Дата: Четверг, 03.11.2011, 17:49 | Сообщение № 14
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
Quote (light26)
А средствами формул волатильность =СЕГОДНЯ никак нельзя убрать?

В принципе можно, если использовать итеративные вычисления. Но не очень удобно.
 
Ответить
Сообщение
Quote (light26)
А средствами формул волатильность =СЕГОДНЯ никак нельзя убрать?

В принципе можно, если использовать итеративные вычисления. Но не очень удобно.

Автор - Michael_S
Дата добавления - 03.11.2011 в 17:49
0mega Дата: Четверг, 03.11.2011, 19:34 | Сообщение № 15
Группа: Проверенные
Ранг: Ветеран
Сообщений: 627
Репутация: 34 ±
Замечаний: 0% ±

поскольку я с макросами на "Вы" и через "Пожалуйста", то постоянно пользуюсь этими двумя шпаргалками


Сообщение отредактировал 0mega - Четверг, 03.11.2011, 19:43
 
Ответить
Сообщениепоскольку я с макросами на "Вы" и через "Пожалуйста", то постоянно пользуюсь этими двумя шпаргалками

Автор - 0mega
Дата добавления - 03.11.2011 в 19:34
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!