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

Страницы: 1
Изменение во всём документе прописных букв, кроме одного, или нескольких столбцов
 
#
22.10.2015 10:20:51
Sanja, Спасибо, а если несколько, то через запятую?
 
Перейти    
Изменение во всём документе прописных букв, кроме одного, или нескольких столбцов
 
#
22.10.2015 08:18:58
А как тут столбцы указывать?
 
Перейти    
Изменение во всём документе прописных букв, кроме одного, или нескольких столбцов
 
#
21.10.2015 15:08:46
Добрый день. Есть такой код. Как сделать, чтобы изменялись все прописные буквы, кроме, например: столбца M:
Код
Sub maxibel()
Dim rng As Range, cl As Range
    On Error Resume Next
    Set rng = ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants)
    On Error GoTo 0
    If Not rng Is Nothing Then
        Application.FindFormat.Clear
        rng.Replace What:=",", Replacement:=".", LookAt:=xlPart, SearchOrder:=xlByRows, _
            MatchCase:=False, MatchByte:=False
        For Each cl In rng
            cl.Value = UCase(cl.Value)
        Next cl
    End If
End Sub
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 23:57:27
А ответьте пожалуйста. Можно прописные буквы делать во всех столбцах, кроме, например: M
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 16:28:47
JayBhagavan,Огромное спасибо. Всё работает. Только я 2-ю строчку удалил.
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 16:13:54
Андрей Гайкевич, перестаньте копировать целые собщения! Кнопка цитирования не для ответа.

Спасибо всё работает. Но мне ещё надо чтобы все буквы были прописными.
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 16:13:12
Ошибка 1004
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 15:26:07
TheBestOfTheBest , пишет Run-time error "13"
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 15:10:58
Напишите полностью пожалуйста как надо, а то я не понимаю "и т.д."
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 14:56:44
1.xlsx до изменений. 2.xlsx после. До применения макрос при нажатии на ячейку B2 видим в строке формулы "=E2", а после применения "IJITSU 1152 13X5.5 4X98 D58.6 ET35 BP / ЧЕРНЫЙ С ПОЛИРОВКОЙ". Мне бы хотелось чтобы там была формула, как в первом случае.
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 14:30:39
Сменил. Надеюсь теперь вы мне поможете.
 
Перейти    
После применения макроса пропадают формулы
 
#
20.10.2015 13:38:24
Ребят применяю макрос на странице по замене запятой на точку и все буквы делаю прописные. Всё работает как надо,но при клике на ячейку пропадает формула. Как её вернуть? Вот код, за написание которого огромное спасибо Казанскому.
Код
Sub bb()
With ActiveSheet.UsedRange
  .Value = Evaluate("INDEX(UPPER(SUBSTITUTE(" & .Address & ","","",""."")),)")
End With
End Sub
 
Перейти    
Все прописные и замен запятой, на точку
 
#
19.10.2015 22:56:38
кнопка цитирования не для ответа

А скажите пожалуйста куда это вводиться?
 
Перейти    
Все прописные и замен запятой, на точку
 
#
19.10.2015 22:35:48
Добрый день. Понимаю, что для вас это мелочь, но для меня большая проблема. Имею документ Excel. Мне надо, чтобы во всем тексте были заглавные буквы, и "," заменилась на "." Именно в документе, а не в самой программе.
 
Перейти    
Страницы: 1
Наверх