Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Запрет копирования/вставки в эксель, Запрет копирования/вставки в эксель из буфера обмена макросом
 
Здравствуйте всем!
Необходимо, чтобы только в определенном диапазоне ячеек нельзя было вставить данные путем ctrl+v и путём набора с клавиатуры, но работал выпадающий список и другие ячейки (столбцы) не были блокированы.
Как только народ вставляет копированием или просто набирает текст, выпадающий список перестает работать.
Поделитесь кодом, пожалуйста!
Не сильна в макросах.
Нашла один код, но блокирует всё.
 

Здравствуйте. Не уверен, что это то, что вам нужно.

В примере нужный вам диапазон расположен на листе “Запрет на вставку”, в диапазоне A1:B10.

Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error Resume Next

    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then
    Selection.Offset(-1, 0).ClearContents

    Range("AAA1000").Value = ""
    Range("AAA1000").Copy
    End If
    
End Sub
Изменено: rud.666 - 27 Май 2020 21:03:18
 
Спасибо большое!
Будем пробовать
 
К сожалению не помогло.

Вот мой код, но с ним перестает работать выпадающий список, т.е. вижу, что данные есть, а выбор блокирует.
В диапазоне этих ячеек (в колонках) выпадающие списки.
Может как-то можно это победить?
Код
Private Sub Worksheet_Change(ByVal Target As Excel.Range)    
Dim iTarget As Range
    Set iTarget = Intersect(Target, Me.Range("U14:Z100"))
    If Not iTarget Is Nothing Then
       With Application
            If .Count(iTarget) <> .CountA(iTarget) Then
               .EnableEvents = False
               .Undo
               .EnableEvents = True
            End If
       End With
    End If
End Sub
 

Можно выделить несколько диапазонов (все диапазоны вокруг этой ячейки).

Например, если выпадающий список будет в ячейке V17, то тогда вместо “U14:Z100” напишите “U17:Z100,W16:Z16,U16,U14:Z15”.

Наверняка можно сделать просто исключение для этой ячейки, но я не знаю как.

И ещё. Ваш макрос не даёт запрет на ввод цифр. Это допустимо?

Изменено: rud.666 - 28 Май 2020 10:50:29
 
Это не подходит, т.к. именно в эти ячейки (столбцы) народ и вставляет копированием текст и соответственно ломает выпадающий список.
Цифры не актуальны, потому что туда копируют только текст из подобных же документов, чтобы ручками не набивать, хотя есть выпадающий список, и данные должны быть там только по списку.
Вот мне и надо, чтобы не вставляли всякую ерунду, но выпадающий работал.
 
omela07, код следует оформлять соответствующим тегом. Ищите такую кнопку (см. скрин) и исправьте своё сообщение.
Тег VBA.jpg (19.2 КБ)
 
Попробуйте так поискать.
Страницы: 1
Читают тему (гостей: 1)
Наверх