Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Выделение нескольких значений из таблицы щелчком мыши - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выделение нескольких значений из таблицы щелчком мыши (Выделение нескольких значений из таблицы щелчком мыши)
Выделение нескольких значений из таблицы щелчком мыши
Kamikadze_N Дата: Среда, 27.04.2016, 13:15 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 42
Репутация: 5 ±
Замечаний: 0% ±

Excel 2010
Добрый день!
Стоит задача отметить несколько строк в таблице и по нажатию кнопки, отправить данные из строк в шаблон для последующей отправки на печать.
На данный момент в таблице отмечается только 1 строка, при нажатии кнопки на печать формируется новый лист только если отмечена первая строка.
Подскажите пожалуйста:
Как в таблице сделать так, чтобы можно было отметить несколько строк, нажатием левой кнопкой мыши?

Файл пример во вложении, на листе рабочая форма отмечаются необходимые строки, новый лист формируется при нажатии кнопки "на печать", из шаблона листа 412-АПК.
К сообщению приложен файл: ____.xlsm(63Kb)
 
Ответить
СообщениеДобрый день!
Стоит задача отметить несколько строк в таблице и по нажатию кнопки, отправить данные из строк в шаблон для последующей отправки на печать.
На данный момент в таблице отмечается только 1 строка, при нажатии кнопки на печать формируется новый лист только если отмечена первая строка.
Подскажите пожалуйста:
Как в таблице сделать так, чтобы можно было отметить несколько строк, нажатием левой кнопкой мыши?

Файл пример во вложении, на листе рабочая форма отмечаются необходимые строки, новый лист формируется при нажатии кнопки "на печать", из шаблона листа 412-АПК.

Автор - Kamikadze_N
Дата добавления - 27.04.2016 в 13:15
Karataev Дата: Среда, 27.04.2016, 21:29 | Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 643
Репутация: 227 ±
Замечаний: 0% ±

Excel
Нужно отключить события в момент вставки/удаления галочки, чтобы не запускалось событие "Worksheet_Change", которое делает какие-то действия со столбцом A:
[vba]
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    r = Cells(Rows.Count, 2).End(xlUp).Row
    If Not Intersect(Target, Range("A2:A" & r)) Is Nothing Then
        Target.Font.Name = "Marlett"
        Application.EnableEvents = False
        If Target = vbNullString Then
            Target = "a"
        Else
            Target = vbNullString
        End If
        Application.EnableEvents = True
    End If
End Sub
[/vba]


 
Ответить
СообщениеНужно отключить события в момент вставки/удаления галочки, чтобы не запускалось событие "Worksheet_Change", которое делает какие-то действия со столбцом A:
[vba]
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    r = Cells(Rows.Count, 2).End(xlUp).Row
    If Not Intersect(Target, Range("A2:A" & r)) Is Nothing Then
        Target.Font.Name = "Marlett"
        Application.EnableEvents = False
        If Target = vbNullString Then
            Target = "a"
        Else
            Target = vbNullString
        End If
        Application.EnableEvents = True
    End If
End Sub
[/vba]

Автор - Karataev
Дата добавления - 27.04.2016 в 21:29
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выделение нескольких значений из таблицы щелчком мыши (Выделение нескольких значений из таблицы щелчком мыши)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!