Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Копирование диапазона на другой лист по двойному щелчку.
 
#1
22.03.2022 12:29:32
Добрый день. Как то приходилось пользоваться макросом по копированию ячейки на другой лист двойным щелчком мыши.
Помогите пожалуйста переделать макрос что бы он копировал диапозон на другой лист по тому же адресу.

Более подробно описал в примере.
Лист Test исходные данные. Лист Total конечные данные.
 
 
 
#2
22.03.2022 16:15:08
Не знаю правильно понял или нет. Попробуйте так
Код
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim n As Integer, m As String
    If Intersect(Range("F2:G6"), Target) Is Nothing Then Exit Sub
        Cancel = True
        n = Target.Row
        m = Split(Columns(Target.Column).Address(False, False), ":")(0)
        Worksheets("Total").Range("A" & n & ":E" & n).Value = Worksheets("test").Range("A" & n & ":E" & n).Value
        Worksheets("Total").Range(m & n).Value = Worksheets("test").Range(m & n).Value
End Sub
 
 
 
#3
22.03.2022 18:29:42
Цитата
написал:
Не знаю правильно понял или нет. Попробуйте так
Супер. Спасибо огромное.
 
 
 
Страницы: 1
Наверх