Скопировать значение флажка в другую ячейку

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Скопировать значение флажка в другую ячейку - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Скопировать значение флажка в другую ячейку (Макросы/Sub)

Скопировать значение флажка в другую ячейку

XbI3bIP

Дата: Пятница, 10.07.2015, 12:23 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 6

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

Подскажите пожалуйста по вопросу флажка. Очень бы хотелось видеть значение выставленного флажка как 1 или истину, а выключенного как 0 или ложь.
Но написанный код: [vba]

Код

Set ra = sh.CheckBoxes(CheckBox1)
ThisWorkbook.Worksheets("tab").Rows(2 + count).Columns(9).Value = ra.Value

[/vba]
ставит в ячейки ( не зависимо от заполнения ) цифры в зависимости от кол-ва заполненных строк (1,2,3 ... ).
А попытался добавить в код: [vba]

Код

Set ra = sh.CheckBoxes(CheckBox1)
ThisWorkbook.Worksheets("tab").Rows(2 + count).Columns(9).Value = ra.Value = xlOff

[/vba]
и теперь везде опять же не зависимо от положения флажка во всех ячейках ложь

Ответить

Samaretz

Дата: Пятница, 10.07.2015, 14:33 | Сообщение № 2

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 223

Репутация: 63 ±

Замечаний: 0% ±

Excel 2010; 2013; 2016

Если честно, то не понял зачем так городить...

Так надо?

К сообщению приложен файл: CheckBox.xlsm (21.7 Kb)

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Скопировать значение флажка в другую ячейку (Макросы/Sub)

Страница 1 из 1
1