Ma_Ri sotnikov - Спасибо!

Все работает!

Здравствуйте.


Если ввести следующие слова в столбик "А"  

малина
сердце
довольно
секунду

Результат в столбике "С"

мАлинА
сЕрдцЕ
дОвОльнО
секУндУ

Выполнить: (Конструктор - Данные из внешней таблицы - Обновить)

Я предположу что если в слове находится две и более одинаковые гласные у них меняется регистр.
Вы можете проверить слова которые я написал выше?

Метод для кириллицы не работает.

https://notepadok.com/blog/ru/posts/how-to-capitalize-the-last-latin-letter-in-a-word-in-notepad
Нашел такой вариант решения задачи программа Notepad++

Работает только с латиницей.

В поле Найти введите регулярное выражение:
[a-zA-Z]\b
В поле Заменить на: введите:
\U$0

Может кто нибудь знает как применить это пункт для кириллицы?

gling - Это решение не подходит.

Здравствуйте.
Как можно в программе Эксель изменить регистр последней буквы в словах. (Для латиницы и кириллицы.)
Версия офис: Microsoft Office профессиональный плюс 2016

Дано:
марс венера земля.
mars venus earth

Результат:
марС венерА землЯ
marS venuS eartH

Через команду print activecell.Interior.Color
- Узнал номера цветов в первом столбце.


6299648
8092539
13998939
10921638
5395026

Нашел в google два макроса которые возможно помогут написать рабочую версию:
К сожалению я не знаю как в VBA прописать значение: - залить всю строку цветом.....

Макрос №1

Скрытый текст

Sub Макрос1() Dim sht As Worksheet, i As Integer Set sht = Application.ActiveWorkbook.ActiveSheet 'находим первую синию ячейку For i = 1 To 100 '100 - диапазон    If sht.Cells(i, 1).Interior.ColorIndex = 5 Then        Exit For    End If Next 'ну и собственно вставка For i = i To 100 '100 - диапазон    If sht.Cells(i, 1).Interior.ColorIndex = 5 Then        sht.Cells(i, 1).Select        Selection.Copy    Else            sht.Cells(i, 2).Select            sht.Paste    End If Next End Sub

Макрос №2

Скрытый текст

Sub Макрос2()        Dim rngFind As Excel.Range            'Настройка поиска на поиск оформления.    With Application.FindFormat.Interior        'Жёлтая заливка.        .Color = 65535    End With        'Поиск на активном листе, в столбце 1.    'What:="?" - знак вопроса - это специальный символ        'в данном случае. Который означает любой один символ.    'SearchDirection:=xlPrevious - поиск снизу вверх по столбцу 1.    Set rngFind = Columns(1).Find(What:="?", LookIn:=xlValues, LookAt:=xlPart, _        SearchOrder:=xlByColumns, SearchDirection:=xlPrevious, MatchCase:=False, _        SearchFormat:=True)            'Убирание из поиска оформления, чтобы не мешало,        'т.к. макрос изменит настройки окна "Найти и заменить."    Application.FindFormat.Clear        'Если не будет найдено, то в переменной "rngFind"        'будет слово "Nothing".    If rngFind Is Nothing Then        'Выход из процедуры.        Exit Sub    End If        'Скрытие строк от найденной строки + 1 строка и до последней нужной.    Rows(rngFind.Row + 1 & ":10").Hidden = True     End Sub

- Произвольно.

Здравствуйте уважаемые форумчане.
Возможно ли настроить следующую опцию

Условие:
В первом столбце есть ячейки с настроенным цветом фона. Я хочу при помощи УФ или макроса закрашивать всю строку в фон ячейки первого столбца.

Пример:
А6 - черный фон
А10 - оранжевый фон

При запуске УФ (макроса) вся шестая строка станет черного цвета.
Десятая строка будет закрашена в оранжевый цвет.

Версия:
Excel 2016 (Ru)

Большое Спасибо:
Воспользовался функцией:

Здравствуйте, уважаемые форумчане.
Подскажите пожалуйста как через условное форматирование в диапазоне от А1:А20 закрасить ячейки с целыми числами?

Пример:
1,9
2
2,3
2,9
3

Значения 2 и 3 будут закрашены в ячейках.

Здравствуйте многоуважаемые форумчане.

Подскажите пожалуйста как можно воспроизвести музыкальный сигнал при следующем условии.
Есть диапазон ячеек. Ячейки постоянно обновляются, из этого диапазона интересует ячейка с максимальным значением  =МАКС(A1:A100).
Условие: - если изменяется значение в ячейке максимум, воспроизводится звуковой сигнал формат wav, mp3, или ogg.

С уважением Александр.
Версия Офис: Excel 2007 Рус

Большое Вам СПАСИБО!

Данные поступают из другой программы и каждый раз обновляются.

Здравствуйте уважаемые форумчане. Прошу помощи в данном вопросе.
Как можно вытащить из динамического диапазона нужную мне ячейку.
Есть значения которые поступают на лист excel из другой программы, и по мере поступлений новых значений сумма начинает сдвигаться на одну ячейку вниз.
Выглядит это следующим образом:

"значение"
"значение"
"значение"
"0" (ячейка не изменяется и всегда показывает "ноль"
"сумма" (меняется как в "плюс" так и в "минус" сдвигается вниз на одну ячейку по мере поступления значений)

Очень нужно чтобы была возможность зафиксировать значение с суммой в нужной мне ячейке.
версия: Офис 2007 рус.

Заранее большое спасибо.
С уважением Александр.

ber$erk - Огромное ВАМ СПАСИБО!!!

Посоветуйте пожалуйста книгу по Экселю а то с формулами я полный чайник....

С уважением Александр.

Hugo ber$erk - спасибо.
У меня Оффис 2007.
а этой формулой как пользоваться ?

=ИНДЕКС($A$1:$A$6;_xlfn.RANK.EQ(B1;$B$1:$B$6;1))
Ячейка с данной формулой имеет вид (#ИМЯ)
Как обновлять страницу по одному клику мышкой?

Можно поподробней пожалуйста, не получается....
нахожу в интернете примеры с описанием чисел а вот со словами нет...

Здравствуйте многоуважаемые форумчане.

Как перемешать список слов в столбике хаотично?
Что для этого нужно?

С уважением Александр.

Здравствуйте многоуважаемые форумчане.  
Подскажите пожалуйста как оптимально решить задачу связав несколько таблиц ( около 50) в одну основную?  
Полазил по форумам нашел один из вариантов добавления в главную книгу результатов из других книг    
 
1. открыть документы    
2. встать в нужную ячейку наж кл. = перейти в др. таблицу выбрать значение наж энтер.  
минус этой операции каждый раз нужно открывать новый документ и каждый раз выбирать нужную ячейку... а их будет около 50.  
   
(1. вопрос: при какой функции\формуле можно сделать так чтобы была возможность выбрать    диапазон и вытянуть его до нужных мне границ?)  
 
(2. вопрос: если не все таблицы будут отправлены сотрудниками гл. Бухгалтеру возможно ли выделить тех сотрудников что прислали таблицу зеленым цветом, а те кто не прислали надписью "отсутствует файл" и выделить его красным?) см. прикрепленный файл tovar.zip  
 
Также нашел на вашем форуме удобную опцию обновления гл. книги в виде кнопки "Обновить"    
я в экселе разбираюсь плохо не могли бы вы сделать захват видео и показать это в виде урока - добавление vba кода и т.д. думаю многим будет интересно.    
Искал уроки тут и в других форумах увы не нашел если такие уроки есть дайте пожалуйста ссылку буду очень признателен!  
 
С уважением Александр!