Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
Строчные буквы в прописные через макрос
 
Цитата
Юрий М написал:
Добавьте отключение/включение отслеживания событий:Код ? 12345678Private Sub Worksheet_Change(ByVal Target As Range)    If Target.Cells.Count > 1 Then Exit Sub    If Not Intersect(Target, Range("$A$2:$A$3000")) Is Nothing Then        Application.EnableEvents = False       Target.Value = UCase(Target.Value)    End If    Application.EnableEvents = TrueEnd Sub
Заработало!!!))) Огромное спасибо! =) тебе +100 к карме
Строчные буквы в прописные через макрос
 
Ребят всем привет, облазил форум, нашел нужную тему и макрос для решения проблемы, но почему то после преобразования строчных букв в прописные, макрос ломается и иногда сам эксель крашится. В общем нужно, чтобы в диапазоне A2:A3000, вносимый текст преобразовывался в прописной

Макрос который использовал
Код
Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Cells.Count > 1 Then Exit Sub
   If Not Intersect(Target, Range("$A$2:$A$3000")) Is Nothing Then
       Target.Value = UCase(Target.Value)
   End If
End Sub
Изменено: Castiel666 - 04.06.2018 19:00:43
Отключение макроса при закрытии книги.
 
В общем такая проблема. Есть таблица, которая обновляется каждые 30 секунд при открытии книги при помощи макроса. Но дело в том, что при закрытии книги, через 30 секунд книга сама открывается, чтобы обновить значения))). Как этого избежать?
Изменено: Castiel666 - 04.12.2016 22:25:08
Страницы: 1
Наверх