[ Регистрация · Вход · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: irakitin2014  
На кнопке отображаются данные формулы
GlockДата: Четверг, 05.01.2017, 15:52 | Сообщение # 1
Рядовой
Группа: Проверенные
Сообщений: 8
Репутация: 0
Статус: Offline
Все здравствуйте. Есть макрос, чтобы данные формулы отображались на кнопке, но почему то текст не отображается. Имя кнопки правильное, пробовал на английском тоже не получается, что я делаю неправильно?
Формула =СЧЁТЗ(C:C)

Private Sub Worksheet_Change(ByVal Target As Range)
Dim X As Long
X = WorksheetFunction.CountA(Columns("C"))
ActiveSheet.DrawingObjects("Кнопка 1").Characters.text = X
End Sub
Прикрепления: 0255228.xls (28.5 Kb)
 
PelenaДата: Четверг, 05.01.2017, 18:37 | Сообщение # 2
Рядовой
Группа: Проверенные
Сообщений: 10
Репутация: 3
Статус: Offline
Здравствуйте.
Этот код должен быть в модуле листа. Правой кнопкой мыши по ярлыку листа -- Исходный текст -- сюда и вставить макрос
 
GlockДата: Четверг, 05.01.2017, 19:27 | Сообщение # 3
Рядовой
Группа: Проверенные
Сообщений: 8
Репутация: 0
Статус: Offline
Спасибо, всё понял.
 
  • Страница 1 из 1
  • 1
Поиск: