Изменение области печати элементом CheckBox

Вход

Регистрация

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

= Мир MS Excel/Изменение области печати элементом CheckBox - Мир MS Excel

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

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

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Изменение области печати элементом CheckBox (Формулы/Formulas)

Изменение области печати элементом CheckBox

Chetvertkoff

Дата: Понедельник, 10.08.2020, 13:33 | Сообщение № 1

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

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

Сообщений: 103

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

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

Excel 2010

День добрый. У меня есть Область печати "A1:D10", мне надо с помощью элемента Activex CheckBox сделать чтоб когда я ставлю галочку она увеличивалась к примеру "A1:D20" а когда убираю она возвращалась "A1:D10"

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

Ответить

Nic70y

Дата: Понедельник, 10.08.2020, 14:37 | Сообщение № 2

Группа: Друзья

Ранг: Экселист

Сообщений: 8759

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

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

Excel 2010

[vba]

Код

Private Sub CheckBox1_Click()
    If CheckBox1 Then
        ActiveSheet.PageSetup.PrintArea = "$A$1:$D$20"
    Else
        ActiveSheet.PageSetup.PrintArea = "$A$1:$D$10"
    End If
End Sub

[/vba]

ЮMoney 41001841029809

Ответить

Chetvertkoff

Дата: Понедельник, 10.08.2020, 16:50 | Сообщение № 3

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

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

Сообщений: 103

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

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

Excel 2010

Спасибо огромное, как все просто) буду учитсья)

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Изменение области печати элементом CheckBox (Формулы/Formulas)

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