Можно ли вывести сообщение, если в ячейке введено заданное значение !!!???

Пользователь

Сообщений: 114 Регистрация: 03.01.2013

20.01.2011 13:39:53

Подскажите кто знает, можно ли сделать так :

В excel 2007 в книге у меня есть несколько листов, в одном листе в нужной мне ячейке, если мне надо я могу ввести какое-то значение или вообще ничего не вводить. И если в этой ячейке введено что-то, то можно ли в другом листе вывести сообщение-предупреждение с текстом, который я введу. Чтобы внизу сообщения была кнопка "ОК" чтобы его закрыть...

Можно ли так сделать ???

Юрий М Модератор Сообщений: 60982 Регистрация: 14.09.2012 Контакты см. в профиле	#2 20.01.2011 13:44:25 Вводите данные на одном листе, а сообщение получить на другом? Зачем? Вывести сообщение сразу после ввода значения устроит?

zeyram

Пользователь

Сообщений: 114 Регистрация: 03.01.2013

20.01.2011 13:51:34

{quote}{login=Юрий М}{date=20.01.2011 01:44}{thema=}{post}Вводите данные на одном листе, а сообщение получить на другом? Зачем? Вывести сообщение сразу после ввода значения устроит?{/post}{/quote}
не устроит нужно именно на другом листе

Guest

Гость

20.01.2011 13:54:40

При наступлении какого события "на втором листе" должно вылезать грозное предупреждение?
Например, в определенном месте на листе 2 пользователь вводит некое значение - и ему тут же сообщение выскакивает: "Первое предупреждение!" и т.д.
При выполнении какого условия должно выскакивать сообщение?

Юрий М

Модератор

Сообщений: 60982 Регистрация: 14.09.2012

Контакты см. в профиле

20.01.2011 13:56:53

{quote}{login=zeyram}{date=20.01.2011 01:51}{thema=Re: нет не устроит!!!!!!}{post}{quote}{login=Юрий М}{date=20.01.2011 01:44}{thema=}{post}Вводите данные на одном листе, а сообщение получить на другом? Зачем? Вывести сообщение сразу после ввода значения устроит?{/post}{/quote}не устроит нужно именно на другом листе{/post}{/quote}
Расскажите, как Вы это видите.

zeyram

Пользователь

Сообщений: 114 Регистрация: 03.01.2013

20.01.2011 14:03:20

{quote}{login=}{date=20.01.2011 01:54}{thema=}{post}При наступлении какого события "на втором листе" должно вылезать грозное предупреждение?
Например, в определенном месте на листе 2 пользователь вводит некое значение - и ему тут же сообщение выскакивает: "Первое предупреждение!" и т.д.
При выполнении какого условия должно выскакивать сообщение?{/post}{/quote}

Описываю мое условие подробнее:
Если я ввел что-то в ячейку А1 в листе1, то в листе2 при переходе на него и нажатии на кнопку должно появиться сообщение!
Кнопка - это созданный мной рисунок с заданным в ней макросом, т.е. макрос проверяет введено ли что-то в ячейке А1 в листе1, и если введено, то показывает мне сообщение с текстом, который я пропишу в макросе, чтобы он писался.

Вот так мне надо......

Юрий М Модератор Сообщений: 60982 Регистрация: 14.09.2012 Контакты см. в профиле	#7 20.01.2011 14:08:03 Ну вот совсем другое дело! Вот макрос: Sub InfAbout() If Sheets("Лист1").Range("A1") <> "" Then MsgBox "В ячейке А1 первого листа есть данные", 64, "Онформация к разышлению" End Sub

Guest

Гость

20.01.2011 14:09:04

Посмотрите прилагаемый файл.
Без кнопки. При переходе на лист 2 вылезает сообщение, содержание которого вводится на листе 1 в А1.
Если нет ничего на листе 1 в ячейке А1 - соответственно ничего не происходит.

Прикрепленные файлы

post_192324.xls (30 КБ)

demon

Пользователь

Сообщений: 79 Регистрация: 01.01.1970

20.01.2011 14:10:14

{quote}{login=zeyram}{date=20.01.2011 01:51}{thema=Re: нет не устроит!!!!!!}{post}{quote}{login=Юрий М}{date=20.01.2011 01:44}{thema=}{post}Вводите данные на одном листе, а сообщение получить на другом? Зачем? Вывести сообщение сразу после ввода значения устроит?{/post}{/quote}
не устроит нужно именно на другом листе{/post}{/quote}

можно сделать надпись по выполнению условия: просто появится текст в ячейке на другом листе.

Прикрепленные файлы

post_192325.xls (24.5 КБ)

zeyram

Пользователь

Сообщений: 114 Регистрация: 03.01.2013

#10

20.01.2011 14:16:29

{quote}{login=Юрий М}{date=20.01.2011 02:08}{thema=}{post}Ну вот совсем другое дело!
Вот макрос:
Sub InfAbout()
If Sheets("Лист1").Range("A1") <> "" Then MsgBox "В ячейке А1 первого листа есть данные", 64, "Онформация к разышлению"
End Sub{/post}{/quote}

не работает этот макрос, возможно вы что-то неправильно прописали ???!!!

Guest Гость	#11 20.01.2011 14:19:04 А вы этот макрос "которыйнеработает????!!!!!!" в свою книгу вставили? А названия листов там такие как в макросе????!!!!!!????? "Может в консерватории чего подправить?" :)

zeyram

Пользователь

Сообщений: 114 Регистрация: 03.01.2013

#12

20.01.2011 14:23:32

{quote}{login=}{date=20.01.2011 02:19}{thema=}{post}А вы этот макрос "которыйнеработает????!!!!!!" в свою книгу вставили? А названия листов там такие как в макросе????!!!!!!?????
"Может в консерватории чего подправить?"
:){/post}{/quote}

не понял почему первый раз не работало ,но попробовал еще раз и все заработало.
Я еще такой вопросик, а как прописать, чтобы макрос проверял не значение в одной ячейке, а проверял сумму в допустим ячейке А1 и ячейке С1 и если их сумма не равна 0, то выводил бы сообщение ???

Юрий М Модератор Сообщений: 60982 Регистрация: 14.09.2012 Контакты см. в профиле	#13 20.01.2011 14:30:40 If Range("A1") + Range("C1") <> 0 Then ...

Guest Гость	#14 20.01.2011 14:31:04 If Sum(Sheets("Лист1").Range("A1;C1")) <> 0 Then MsgBox "В ячейке А1 первого листа есть данные", 64, "Онформация к разышлению" Как-то так?

zeyram Пользователь Сообщений: 114 Регистрация: 03.01.2013	#15 20.01.2011 14:48:32 все разобрался все работает так как мне нужно. ОГРОМНОЕ СПАСИБО !!!!!!

Читают тему