Страницы: 1
RSS
Ширина скопированного диапазона, в столбцах
 
Всем привет!
Подскажите, как лучше определить ширину (в столбцах) скопированного в данный момент диапазона. чтобы после запретить вставку если скопировано данных больше чем из одного столбца одновременно
 
Код
selection.columns.count

Формула массива (ФМ) вводится Ctrl+Shift+Enter
Memento mori
 
Selection потом не обязательно Copy
Я понял, что нужно или узнать количество столбцов УЖЕ находящегося в буфере диапазона, ну, или, упредить именно копирование, если выделено более одного столбца
Предлагаю предупреждать пользователя, что выделено более одного столбца. В модуль листа откуда копируем
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Columns.Count > 1 Then
        If MsgBox("В выбранном диапазоне более одного столбца! Продолжить?", vbYesNo + vbExclamation, "Внимание!") = vbNo Then
            Target(1).Select
            Exit Sub
        End If
    End If
End Sub


Изменено: Sanja - 12.09.2016 17:18:03
Согласие есть продукт при полном непротивлении сторон
 
Sanja, метод Target, вот что мне нежно было ) Спасибо!!
Страницы: 1
Наверх