Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » omela07
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
[ Закрыто] Макросы, Макрос поиска значений
 
#
08.07.2020 16:25:00
Добрый день.
Макросом ищем всевозможные значения и заменяем их на нужные.
Но возникает ошибка из-за того, что макрос два слова считает одинаковыми из-за первых трех букв "УГМ" и "УГМет"
Подскажите как написать, чтобы макрос считал эти слова разными.
Суть макроса такова, что надо найти все значения и верные и не верные и заменить их на правильные.
После проверки и замены везде встаёт "УГМ", а где должно появиться "УГМет" пишет "Ошибка".
Помогите, пожалуйста!
 
Перейти    
Запрет копирования/вставки в эксель, Запрет копирования/вставки в эксель из буфера обмена макросом
 
#
28.05.2020 11:51:29
Это не подходит, т.к. именно в эти ячейки (столбцы) народ и вставляет копированием текст и соответственно ломает выпадающий список.
Цифры не актуальны, потому что туда копируют только текст из подобных же документов, чтобы ручками не набивать, хотя есть выпадающий список, и данные должны быть там только по списку.
Вот мне и надо, чтобы не вставляли всякую ерунду, но выпадающий работал.
 
Перейти    
Запрет копирования/вставки в эксель, Запрет копирования/вставки в эксель из буфера обмена макросом
 
#
28.05.2020 09:39:42
К сожалению не помогло.

Вот мой код, но с ним перестает работать выпадающий список, т.е. вижу, что данные есть, а выбор блокирует.
В диапазоне этих ячеек (в колонках) выпадающие списки.
Может как-то можно это победить?
Код
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
 
Перейти    
Запрет копирования/вставки в эксель, Запрет копирования/вставки в эксель из буфера обмена макросом
 
#
28.05.2020 09:02:57
Спасибо большое!
Будем пробовать
 
Перейти    
Запрет копирования/вставки в эксель, Запрет копирования/вставки в эксель из буфера обмена макросом
 
#
27.05.2020 16:33:58
Здравствуйте всем!
Необходимо, чтобы только в определенном диапазоне ячеек нельзя было вставить данные путем ctrl+v и путём набора с клавиатуры, но работал выпадающий список и другие ячейки (столбцы) не были блокированы.
Как только народ вставляет копированием или просто набирает текст, выпадающий список перестает работать.
Поделитесь кодом, пожалуйста!
Не сильна в макросах.
Нашла один код, но блокирует всё.
 
Перейти    
В Excel 16 книга не открывается на активном листе
 
#
06.03.2020 12:47:59
Ещё раз вопрос: почему в Excel 10 работает?

И свои инсинуации оставьте при себе.
Если нет желания отвечать, можно просто не отвечать...
 
Перейти    
В Excel 16 книга не открывается на активном листе
 
#
06.03.2020 12:11:35
В макросе один из листов назначен активным после выполнения действий в макросе. в Excel 10 всё работает, а в Excel 16 нет. Книга открывается с другого листа.
Код
 &#39;настраиваем отражаемые вкладки
                Sheet1.Visible = False

                Sheet2.Visible = True   &#39; Ig: Вкладку с легендой (календарь) делаем активной и видимой
                Sheet2.Activate
                
                Sheet7.Visible = True
                Sheet8.Visible = False  
                Sheet9.Visible = False   
                Sheet10.Visible = True  
                Sheet11.Visible = True
                Sheet12.Visible = True
                Sheet13.Visible = True  
                Sheet14.Visible = False 
                Sheet15.Visible = True
                Sheet16.Visible = True
                Sheet17.Visible = True
                Sheet19.Visible = False  
                Sheet20.Visible = False  
                Sheet21.Visible = True  
                Sheet22.Visible = True 
                Sheet18.Visible = True

Почему не работает в Excel 16? Может кто сталкивался
 
Перейти    
Страницы: 1
Наверх