Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Событие - обновление ячейки / 13 сообщений из 13, страница 1 из 1
25.08.2005, 12:25
    #33233788
-GL-
-GL-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Есть текущий workbook и текущая страница, с которой идет работа. Нужно при обновлении (изменении значения) некоторой ячейки, обновить определенные данные в какой-то ячейке на какой-то странице в другом workbook-е.Как это сделать? Помогите плззз.

п.с. Нужно обойтись без формул.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.08.2005, 12:46
    #33233885
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Код: plaintext
1.
2.
3.
4.
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        MsgBox "Событие"
    End If
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2005, 15:30
    #33239196
-GL-
-GL-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Есть ли какой-то более простой способ определить координаты ячейки, чье значение изменилось? А то знаете как-то неудобно циклом по всему листу прочесывать...
Да, и можно ли Target.Adress сравнивать не в виде "$A$1", а, допустим, (1,1)?
Мне так легче.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.08.2005, 15:52
    #33239257
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
-GL-Есть ли какой-то более простой способ определить координаты ячейки, чье значение изменилось?
Этот вариант

Код: plaintext
1.
2.
3.
Private Sub Worksheet_Change(ByVal Target As Range)
    MsgBox "Изменилась ячейка. Строка: " _
      & Target.Row & " Столбец: " & Target.Column
End Sub

чем не устраивает?

-GL-Да, и можно ли Target.Adress сравнивать не в виде "$A$1", а, допустим, (1,1)?
Код: plaintext
If Target.Address = Cells( 1 ,  1 ).Address Then
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.08.2005, 01:58
    #33242337
-GL-
-GL-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Thanx
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.09.2005, 17:49
    #33246910
-GL-
-GL-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Что-то не работает обновление

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox "updated"
End Sub

Ничего не выодит :(

Может я че-нить не так делаю?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.09.2005, 22:27
    #33247204
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
-GL-Что-то не работает обновление

Private Sub Worksheet_Change(ByVal Target As Range)
MsgBox "updated"
End Sub

Ничего не выодит :(

Может я че-нить не так делаю?

А куда ты этот код вставил?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.09.2005, 23:07
    #33247217
-GL-
-GL-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Ok, хорошо. А куда его нужно вставить, чтобы он заработал?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.09.2005, 08:12
    #33247381
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Модуль листа.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.09.2005, 20:21
    #33249452
-GL-
-GL-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Microsoft Excel Objects > имя листа? Или modules? Или что еще?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.09.2005, 18:48
    #33249960
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
-GL-Microsoft Excel Objects > имя листа? Или modules? Или что еще?
Нажми Alt F11
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
08.11.2011, 18:41
    #37516787
Wipeout2097
Wipeout2097
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Народ, доброго всем времени суток! Утащу свои пять копеек, как говориться... ;)
Такой вопрос: а как смоделировать событие "Перед обновлением ячейки"? Ну, типа что-то вроде аналога в Аксессе - Before_Update (или Before_Change)? И возможно ли такое вообще?
P.S. это мне необходимо для специфической проверки введенного значения, которую я не смог обеспечить штатными средствами Excel (такими как Данные -> Проверка -> и т.д.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.11.2011, 19:17
    #37516850
Ципихович Эндрю
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Событие - обновление ячейки
Wipeout2097,

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Sub Worksheet_Change(ByVal Target As Range)
'вставлять в исходный текст листа
    If Not Intersect(Target, Range("C6")) Is Nothing Then
        'сравниваем значение ячейки с числом
        'If Range("C6").Value > 6 Then
        'сравниваем длину содержимого в ячейке
        'Функция CStr(Conversion to String) используется для приведения числового выражения в строку (тип String)
        If Len(CStr(Range("C6").Value)) >  6  Then
        'срабатывает, после ввода в ячейку С6 данных
        Range("C6").Select
            MsgBox "Введено неверное значение!"
        End If
    End If

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Событие - обновление ячейки / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 598ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2176303]:
 0ms
get settings:
 6ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 312ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 31ms
get tp. blocked users:
 1ms
others: 220ms
total:  598ms
x
x
Закрыть


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