Кнопка макроса неактивна

[vostok]

Добрый вечер! Можно как-то сделать кнопку макроса неактивной, если в ячейке F2 положительное число, и активной при отрицательном значении этой ячейки? Полагаю, что при помощи функции, но как привязать ее к кнопке или коду? Спасибо.

[IgorGO]

см.вложение

[vostok]

Игорь, спасибо, но я макросы назначаю на кнопки, которые из "Формы", а не "Элементы управления", там типа "кнопка3_Щелкнуть". Как ее обозвать в Вашем коде?

[Пименов Александр]

1. В форме обзывать кнопки можно по разному. например btn_Удалить_гипперссылку.
2. Обращение к ней через объект UserForm Например: formНайти_гипперссылку.btn_Удалить_ гипперссылку, а далее уже использовать свойства и методы кнопки...........

[Казанский]

Сообщение от vostok

я макросы назначаю на кнопки, которые из "Формы", а не "Элементы управления", там типа "кнопка3_Щелкнуть". Как ее обозвать в Вашем коде?

Запишите макрорекордером действие - назначение макроса такой кнопке.
ИМХО сделать такую кнопку неактивной нельзя. Если ей не назначен макрос, при клике она будет выбираться. Лучше в макросе кнопки проверять знак ячейки, и если ячейка положительна, то ничего не делать.

[Hugo121]

Неактивной нельзя, а скрыть можно. А если под этой кнопкой поместить рисунок неактивной кнопки, то...
Вот, на коде Игоря (имя поставьте своё, это МОЯ кнопка скрывается):

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address <> "$F$2" Then Exit Sub
  CommandButton1.Enabled = [f2] < 0
  ActiveSheet.Shapes("Button 3").Visible = [f2] < 0
End Sub

[vostok]

Это неплохо придумано, но как? в макросе проверить полярность ячейки? Макрорекордер лишь тупо пишет нажатия клавиш, сопоставить значения как в функции "если" я не могу. Будьте добры, черкните макрос, в котором определяется полярность, а я эту часть пристрою к своему макросу.
Hugo121, это я писал для Казанского, а по коду Игоря - у меня нет на странице коммандбаттонов, как я могу вставить этот код?

[Hugo121]

vostok, намёк не поняли...
Я ещё пока ответа Игоря не было, хотел написать - давайте свою кнопку!
Пишу сейчас

[Казанский]

vostok
Первой строкой в макросе

if [F2]>=0 then exit sub

[vostok]

Казанский, спасибо огромное! Изящное решение и вполне меня устраивает. Для IgorGo и Hugo121: я все-таки не владею кодами в листах, не понимаю их, мне как-то любимее макросы в модулях, исполняемые по нажатию на кнопку (поскольку электрик по жизни ). Спасибо всем откликнувшимся, извините за дурацкие вопросы.