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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 30.05.2012, 16:18   #1
Korvinspb
Новичок
Джуниор
 
Регистрация: 30.05.2012
Сообщений: 7
По умолчанию Вывод даты последнего изменения

Доброго времени суток. В программировании не силен. Есть задача. Ячейка в MS Excell связана с другим файлом (тоже MS Excell) в сети к которому имеют доступ несколько пользователей и вносят в него периодически изменения. Необходимо,чтобы в соседней ячейке отображалась дата (можно со временем) последнего изменения этого сетевого файла. Буду рад помощи.
Korvinspb вне форума Ответить с цитированием
Старый 30.05.2012, 17:05   #2
staniiislav
Форумчанин
 
Аватар для staniiislav
 
Регистрация: 16.04.2010
Сообщений: 695
Радость

Цитата:
Сообщение от Korvinspb Посмотреть сообщение
Доброго времени суток. В программировании не силен. Есть задача. Ячейка в MS Excell связана с другим файлом (тоже MS Excell) в сети к которому имеют доступ несколько пользователей и вносят в него периодически изменения. Необходимо,чтобы в соседней ячейке отображалась дата (можно со временем) последнего изменения этого сетевого файла. Буду рад помощи.
Вставляете этот код в свой сетевой фаил в модуль листа на котором производился расчеты:


Код:
Private Sub Worksheet_Change(ByVal Target As Range)
  If Application.Intersect(Range("A1"), Target) Is Nothing Then Exit Sub 'проверяется, _
  в нужной ли ячейке происходит изменение, в данном случаи ячейка А1, если изменения происходят в _
  другой ячейке, макрос не срабатывает
    Range("B1") = Now 'указываем в какую ячейку выводить результат
End Sub
а затем можно просто через "=" указать нужную ячейку в файле, где нужно отслеживать изменение...
Только есть одно НО, если вы хотите чтобы люди не видели свои изменения на сетевом файле, нужно будет скрыть столбец или строку в котором (й) будет отображаться информация изменения...
Ну вот вообщем-то и все
Единственный способ стать умнее, играть с более умным противником...
staniiislav вне форума Ответить с цитированием
Старый 30.05.2012, 17:07   #3
staniiislav
Форумчанин
 
Аватар для staniiislav
 
Регистрация: 16.04.2010
Сообщений: 695
По умолчанию

да еще можно и закрасить шриф белым )))
Единственный способ стать умнее, играть с более умным противником...
staniiislav вне форума Ответить с цитированием
Старый 30.05.2012, 17:12   #4
Korvinspb
Новичок
Джуниор
 
Регистрация: 30.05.2012
Сообщений: 7
По умолчанию

Если я правильно понял, то будут отображаться изменения ячеек. А мне необходимо знать в принципе - вносились изменения или нет. Если на примере, то как в свойствах файла - последние изменения файла 12:23 5 марта 2012 г.
Korvinspb вне форума Ответить с цитированием
Старый 30.05.2012, 17:15   #5
staniiislav
Форумчанин
 
Аватар для staniiislav
 
Регистрация: 16.04.2010
Сообщений: 695
По умолчанию

Цитата:
Сообщение от Korvinspb Посмотреть сообщение
Если я правильно понял, то будут отображаться изменения ячеек. А мне необходимо знать в принципе - вносились изменения или нет. Если на примере, то как в свойствах файла - последние изменения файла 12:23 5 марта 2012 г.
нет, будет отображать число и время изменения ячейки А1
Единственный способ стать умнее, играть с более умным противником...
staniiislav вне форума Ответить с цитированием
Старый 30.05.2012, 17:19   #6
Korvinspb
Новичок
Джуниор
 
Регистрация: 30.05.2012
Сообщений: 7
По умолчанию

Спасибо большое. Попробую. Потом отпишусь.
Korvinspb вне форума Ответить с цитированием
Старый 30.05.2012, 17:53   #7
Korvinspb
Новичок
Джуниор
 
Регистрация: 30.05.2012
Сообщений: 7
По умолчанию

Вставил в модуль. А вот через равно "не дошло".
Korvinspb вне форума Ответить с цитированием
Старый 30.05.2012, 17:57   #8
staniiislav
Форумчанин
 
Аватар для staniiislav
 
Регистрация: 16.04.2010
Сообщений: 695
По умолчанию

Цитата:
Сообщение от Korvinspb Посмотреть сообщение
Вставил в модуль. А вот через равно "не дошло".
как это не дошло, а скинь пример... по сете у себя попробую ваши файлики поюзать
Единственный способ стать умнее, играть с более умным противником...
staniiislav вне форума Ответить с цитированием
Старый 31.05.2012, 10:34   #9
Korvinspb
Новичок
Джуниор
 
Регистрация: 30.05.2012
Сообщений: 7
По умолчанию

Ан нет получилось. Но немного не то. Видишь ли, этот код выдает дату изменения конкретной ячейки. А мне надо просто в общем смысле - производились изменения или нет. Не важно в какой ячейке, в каком листе. То есть прикасался ли кто-то к этому файлу.
Korvinspb вне форума Ответить с цитированием
Старый 31.05.2012, 10:46   #10
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Посмотрите справку по "FileDateTime". Может это как раз то, что Вам нужно.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как можно вывести время последнего изменения файла путь к которому введен в текстовом поле. язык С++ kolyok333 Помощь студентам 2 15.01.2012 17:42
Установление даты последнего изменения в поле примечание vasyater Microsoft Office Excel 2 27.06.2010 10:53
Атрибуты файла - дата последнего изменения iskurt Общие вопросы C/C++ 1 19.06.2010 13:21
Дата последнего изменения файла GrindeX Паскаль, Turbo Pascal, PascalABC.NET 2 26.05.2009 17:22
Запрет изменения даты Viteef Общие вопросы Delphi 0 20.02.2008 05:09