ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как ставит дату в екесл
16 сообщений из 16, страница 1 из 1
как ставит дату в екесл
    #36355928
Жоро
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Жоро
Гость
Привет, я хачу щоб когда напишу щото в А1 ексел у меня поставил дата в А2
Спасиба
...
Рейтинг: 0 / 0
09.12.2009, 11:02
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36355967
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vikttur
Участник
Как пример без VBA - с помощью итеративных вычислений.
...
Рейтинг: 0 / 0
09.12.2009, 11:13
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36356928
Жоро
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Жоро
Гость
що мене ставил дату с пц
...
Рейтинг: 0 / 0
09.12.2009, 16:01
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357049
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vikttur
Участник
Жорощо мене ставил дату с пц
Жоро, Вы стараетесь писать по-русски - похвально.
Что вы хотели сказать последней фразой?
...
Рейтинг: 0 / 0
09.12.2009, 16:30
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357200
Жоро
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Жоро
Гость
Я прошу прощения я не русский,пoетаму так пишу. Я хочу що Excel установит дату (сегодня) в А2, когда есть что-то написано в А1
...
Рейтинг: 0 / 0
09.12.2009, 17:06
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357242
Жоро
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Жоро
Гость
:)
...
Рейтинг: 0 / 0
09.12.2009, 17:15
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357260
Жоро
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Жоро
Гость
Жоро,
...
Рейтинг: 0 / 0
09.12.2009, 17:18
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357284
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Так эта дата завтра должна быть вчера, а не сегодня
Т.е. понятным языком - дата должна записываться макросом, а не формулой.
Есть решение, сейчас не найду, попозже...
...
Рейтинг: 0 / 0
09.12.2009, 17:24
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357305
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
А, вот нашёл - макрос на этот лист, рассчитан, что после ввода данных нажимается ENTER:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveSheet.Index =  1  Then
If ActiveCell.Column =  1  Then
i = ActiveCell.Row -  1 
Cells(i,  8 ).Value = Now()
End If
End If
End Sub
Формат даты можно поменять в коде или просто задать формат этим ячейкам.
...
Рейтинг: 0 / 0
09.12.2009, 17:30
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357590
Жоро
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Жоро
Гость
сделал макро и запустил его тепер не знаю що делать ?

If ActiveSheet.Index = 1 Then
If ActiveCell.Column = 1 Then
i = ActiveCell.Row - 1
Cells(i, 8).Value = Now()
End If
End If
End Sub
...
Рейтинг: 0 / 0
09.12.2009, 19:02
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36357937
Фотография W_I_N_T_E_R
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
W_I_N_T_E_R
Участник
Не моё.
...
Рейтинг: 0 / 0
09.12.2009, 23:33
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36358226
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vikttur
Участник
Hugo121дата должна записываться макросом, а не формулой.
Не обязательно. Дата должна фиксироваться, а это возможно и с помощью VBA, и с помощью формул (использование итераций - показано выше). Другое дело, что при использовании итеративных вычислений нужно быть внимательным:
- можно пропустить ненужную циклическую ссылку;
- при открытии двух книг (одна - с итерациями, вторая - без них) настройка итеративных вычислений будет та, которая была у первой открытой книги, и при сохранении перед закрытием в обоих может сохранится эта настройка.
Да и VBA в данном случае применять лучше. Но, так как с этим делом не дружу, предлагаю то, что знаю
...
Рейтинг: 0 / 0
10.12.2009, 09:17
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36358262
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Жоросделал макро и запустил его тепер не знаю що делать ?

Не надо запускать, он сам срабатывает при изменении значений в ячейках. Лучше бери код от
W_I_N_T_E_R , я его себе тоже в запасники положил, пригодится. Только замени 2 на 8 и подкорректируй Range("A1:A100")) :
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count >  1  Then Exit Sub
        If Not Intersect(Target, Range("A1:A100")) Is Nothing Then
            With Target( 1 ,  8 )
                .Value = Now
                .EntireColumn.AutoFit
            End With
        End If
End Sub

vikttur - с помощью итеративных вычислений - что-то я не понял - там же в А2 всё время текущая дата, только маскируется условным форматированием (Ctrl+A показывает, даже если А1 пустая)? Или у меня эксель не так работает?
...
Рейтинг: 0 / 0
10.12.2009, 09:35
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36358309
Фотография vikttur
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vikttur
Участник
Hugo121, да, в А2 дата меняется, но она "невидима" и не "проявляется" пока пуста А1. После заполнения А1 дата становится видимой и закрепляется (попробуйте после этого изменить системную дату - значение А2 не изменится, удалите значение А1 - в А2 новая дата и невидима).
Минус такого решения - постоянный пересчет ячеек с датой. Если нужно, формулу можно несколько усложнить и выводить в ячейку дату только после заполнения А1.
Вообще, итерации - вещь интересная. Можно делать счетчики, регистры из нескольких ячеек, триггеры и прочие штуки. Это же решаемо и макросами, но есть же организации, где нельзя понижать уровень безопасности Excel.
...
Рейтинг: 0 / 0
10.12.2009, 09:55
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36358329
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Понятно, спасибо за информацию, поизучаю.
нельзя понижать уровень безопасности Excel - иногда наверное можно выкрутиться, открывая файл через WSH (*.vbs) - все макросы работают несмотря на уровень безопасности...
...
Рейтинг: 0 / 0
10.12.2009, 10:03
| Ответить | Цитировать | Написать  
как ставит дату в екесл
    #36358357
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hugo121
Гость
Всё равно не пойму:
Код: plaintext
1.
2.
3.
4.
5.
6.
Sub tt()
x = [a2]
Cells( 1 ,  5 ).Value = Cells( 2 ,  1 ).Value
MsgBox x
End Sub
В А1 пусто, а дата есть и в ячейке, и в сообщении...
...
Рейтинг: 0 / 0
10.12.2009, 10:14
| Ответить | Цитировать | Написать  
16 сообщений из 16, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / как ставит дату в екесл
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=36357242&tid=2178721]:
 0ms
get settings:
 10ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 69ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 50ms
get tp. blocked users:
 1ms
others: 252ms
total:  415ms
созд. / загр.: 415ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]