Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 13.12.2006, 18:12   #1
Python
Пользователь
 
Регистрация: 25.11.2006
Сообщений: 46
По умолчанию Фиксация даты измения значения в ячейке

Есть ячейка А1, в которой периодически меняется значение.
Как сделать так чтобы, внося данные в А1 01.01.2007 - эта дата отображалась в А2. Потом, допустим, 03.01.2007 я меняю данные в ячейке А1 и хочу чтобы уже эта дата отображалась в А3 и т.д...
Тобишь я менял значение ячейки А1 пять раз, даты изменений должны отображаться в ячейках А2,А3,А4,А6,А6...
Задача актуальна хотя бы для 20 изменений...

Кто знает? Подскажите...
Спасибо.
Python вне форума
Старый 13.12.2006, 19:07   #2
infinitiv
Пользователь
 
Регистрация: 05.12.2006
Сообщений: 23
По умолчанию

Как вариант:
добавить на лист с целевой ячейкой макрос вида:
Код:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Cells(Target.CurrentRegion.Rows.Count + 1, 1) = Now
End Sub
Макрос проверяет, является ли изменившаяся ячейка ячейкой A1, и если этот так, то очередная ячейка столбца А:А заполняется текущей датой.
infinitiv вне форума
Старый 13.12.2006, 19:32   #3
Python
Пользователь
 
Регистрация: 25.11.2006
Сообщений: 46
По умолчанию

Супер, но задача более широка. Таких ячеек как а1 много (250), они расположены в одном столбце. И даты изменений должны отображаться напротив каждой.
Может это и легко, но не умею редактировать в Visual Basic. Help
Python вне форума
Старый 13.12.2006, 19:40   #4
infinitiv
Пользователь
 
Регистрация: 05.12.2006
Сообщений: 23
По умолчанию

Код:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then Cells(Target.Row, Application.WorksheetFunction.CountA(Rows(Target.Row)) + 1) = Now
End Sub
infinitiv вне форума
Старый 13.12.2006, 19:59   #5
Python
Пользователь
 
Регистрация: 25.11.2006
Сообщений: 46
По умолчанию

Спасибо большое, очень помогли!

Не могу справиться вот еще с какой задачей. Есть ячейка в которой должно подсчитываться к-во дат, которые отвечали бы критериям двух других ячеек (одна параметр "с", вторая параметр "по"). Тобишь чтобы в функции СЧЕТЕСЛИ, критерием выступали параметры ячеек.
Вложения
Тип файла: rar Книга1.rar (1.6 Кб, 29 просмотров)
Python вне форума
Старый 13.12.2006, 20:23   #6
infinitiv
Пользователь
 
Регистрация: 05.12.2006
Сообщений: 23
По умолчанию

=СЧЁТЕСЛИ(5:5;"<=" & B2)-СЧЁТЕСЛИ(5:5;"<" & B1)
то есть определяестя количество дат меньших, чем дата "по", включая дату "по", и вычитается количество дат меньших чем дата "с", без даты "с".
infinitiv вне форума
Старый 13.12.2006, 20:33   #7
Python
Пользователь
 
Регистрация: 25.11.2006
Сообщений: 46
По умолчанию Файл

файл..........
Вложения
Тип файла: rar 111.rar (68.0 Кб, 38 просмотров)
Python вне форума
Старый 13.12.2006, 20:47   #8
infinitiv
Пользователь
 
Регистрация: 05.12.2006
Сообщений: 23
По умолчанию

Опишите суть задачи целиком и как можно подробнее, тогда дам готовое решение (правда уже видимо завтра).
infinitiv вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Рисуем в ячейке DBGrig _SERGEYX_ Компоненты Delphi 10 02.06.2008 13:39
Удаление символа в ячейке Flangini Microsoft Office Excel 2 05.05.2008 14:02
Фиксация значения `Dmitry Microsoft Office Excel 4 08.04.2008 13:04
Фиксация размера ячейки Умелец Microsoft Office Excel 7 12.09.2007 16:29
Доступ к конкретной ячейке Gorin БД в Delphi 14 27.06.2007 16:24