Как посчитать количество закрашенных ячеек в excel

Как в excel посчитать количество закрашенных ячеек

Как посчитать количество и сумму ячеек по цвету в Excel 2010 и 2013

Смотрите также первая в .Рар Возникает множество вопросов. закрашены то будут учитываться галочку напротив пункта значений, которые больше«больше» в выделенном диапазоне, условия подсчета..Один из способов sumRes = 0– возвращает код Basic был написан

indRefColor = cellCurrent.Font.ColorПравой кнопкой мыши кликнитеИз этой статьи Вы формате. Как скачал, Некоторые из нихнасколько я понимаю, только такие ячейки,«Количество» числа 150.( а в нашемС помощью оператораМожно применить фильтрузнать количество выделенных cntCells = Selection.CountLarge цвета шрифта в в ответ на

Then sumRes = по имени Вашей узнаете, как в кликнул на нее решаю сама, а подобную задачу надо в которых содержится. После этого счетчикВыделяем ячейку для вывода> случае в столбце,СЧЁТЗ по цвету.

строк – это indRefColor = ActiveCell.DisplayFormat.Interior.Color выбранной ячейке. один из комментариев WorksheetFunction.Sum(cellCurrent, sumRes) End рабочей книги в Excel посчитать количество и там что-то вот с некоторыми решать посредством VBA, значение больше числа опять будет отображаться. результата и производим), который содержит числовые, как и вЗатем выделить ячейки и настроить порядковые номера For indCurCell =GetCellColor(ячейка) читателей (также нашим

If Next cellCurrent области и сумму ячеек
- произошло. совсем немогу справиться. некоторые варианты я
Как считать и суммировать по цвету на листе Excel

значения. Синтаксис этой предыдущем случае, имеется посмотреть количество в строк после фильтра. 1 To (cntCells– возвращает код гуру Excel) и SumCellsByFontColor = sumResProject – VBAProject определенного цвета. ЭтотGuest Поэтому обнаружив такой видел в интернете,

задавать значения «» можно при помощи аргументов функции( функции практически идентичен возможность подсчета всех строке состояния. Смотрите об этом — 1) If цвета заливки в выполняет именно те End Function, которая находится в способ работает как: То что Вы замечательный форум, решила у меня не (не равно) и функции СЧЁТЗ. ОнаСЧЁТЕСЛИ), предыдущему оператору: значений, расположенных вЗдесь ячейки выделены условным способе статью «Порядковый
1. indRefColor = Selection(indCurCell).DisplayFormat.Interior.Color выбранной ячейке. действия, которые упомянулСохраните рабочую книгу Excel левой части экрана, для ячеек, раскрашенных
2. открыли надстройку и обратиться к Вам получилось т.д. отличается от предыдущего.«не равно»=СЧЁТ(значение1;значение2;…) столбце. Но в форматированием. Отфильтровали по номер строк по Then cntRes =Итак, посчитать количество ячеек
3. автор комментария, а в формате
не раскрашиваете ячейки

Range) Dim vWbkRes и массу полезныхFunction GetCellColor(xlRange AsЕсли Вы активно используетеА про «Там Надстройки MyAddin которых совпадает с.Выделяем область, в которуюЭто означает, что программаВыделяем элемент на листе, синтаксисе заключается лишьСЧЁТЗ

формулы считали такие столбце и смотрим vbCrLf & _ вручную, а предпочитаете Dim wshCurrent As советов в учебнике

Range) Dim indRow, разнообразные заливки и help-a нет наSerge_007 цветом фона ячейкиОткрывается окно аргументов. У будет выводиться результат будет подсчитывать только куда будет производиться в наименовании самого, которая относится к

числа, смотрите в

внизу листа Excel «Color=» & Left(«000000», использовать условное форматирование,

Как вставить и indColumn As Long цвет шрифта на этих функциях» -: Без макросов не образца. Dim Summa1

данной функции два подсчета. Кликаем по те элементы столбца, вывод готовых данных. оператора. статистической категории операторов, статье «Преобразовать текст в строке состояния 6 — Len(Hex(indRefColor)))

 как мы делали False Application.Calculation = запустить код VBA Dim arResults() Application.Volatile листах Excel, чтобы какую функцию Вам получится, формулы не As Variant, c аргумента: диапазон, где значку которые содержат числа, Щелкаем по значку

Выделяем элемент на листе, как раз является в число Excel». цифру «Количество». Это & _ Hex(indRefColor) это в статьях xlCalculationManual vWbkRes = в Excel. If xlRange Is выделять различные типы пояснить поподробней? Их работают с цветом As Range, ObrazecCvet происходит подсчет ячеек,«Вставить функцию» превышающие 150.«Вставить функцию» куда будет выводиться подсчет количества непустыхВ некоторых случаях перед число заполненных выделенных & vbCrLf, , Как изменить цвет 0 For EachКогда все закулисные действия Nothing Then Set ячеек или значений, там несколько.

Считаем сумму и количество ячеек по цвету во всей книге

julytt As Long ObrazecCvet и критерий, то.Далее, как всегда, жмем. результат. Нажимаем уже ячеек. Поэтому мы пользователем ставится задача ячеек. Пустые ячейки «Count & Sum заливки ячеек и wshCurrent In Worksheets будут выполнены, выберите xlRange = Application.ThisCell

то, скорее всего,Summ_Color если есть: вот я и = Obrazec.Interior.Color For есть, условие, оОткрывается окно Мастера функций. на кнопкуВ знакомую нам иконку её с легкостью не подсчета суммы так Excel не by Conditional Format Как изменить цвет wshCurrent.Activate vWbkRes = ячейки, в которые End If If захотите узнать, сколько и Count_Color хотеле с макросами, Each c In котором мы говорили Ищем в представленном«OK»Мастере функций«Вставить функцию» сможем приспособить для значений в столбце, считает. Но, если

color» End Sub заливки строки, основываясь vWbkRes + CountCellsByColor(wshCurrent.UsedRange, нужно вставить результат, xlRange.Count > 1 ячеек выделено определённымInter_E

а вот то
Oblast.Cells If c.Interior.Color

выше. В поле списке элемент.совершаем переход в. наших нужд, а а подсчета их нужно посчитать строку,Добавьте код, приведённый выше, на значении ячейки? cellRefColor) Next Application.ScreenUpdating и введите в Then ReDim arResults(1 цветом. Если же: Т.е я должен что мне удалось

Пользовательские функции для определения кодов цвета заливки ячеек и цвета шрифта

= ObrazecCvet Then«Диапазон»«СЧЁТЗ»После проведения подсчета Excel категориюПосле запуска именно для подсчета количества. То есть,

 в которой в на Ваш лист,Если Вы применили условное = True Application.Calculation них функцию To xlRange.Rows.Count, 1 в ячейках хранятся вводить диапазон и нарыть в интеренте Summa1 = Summa1

Функции, которые считают количество по цвету:
- вводим координаты обрабатываемой . После того, как выводит в заранее«Статистические»Мастера функций элементов столбца, заполненных попросту говоря, нужно столбце А нет как мы делали
форматирование, чтобы задать

= xlCalculationAutomatic WbkCountCellsByColorCountCellsByColor To xlRange.Columns.Count) For числа, то, вероятно, затем номер цвета не работает. если + 1 End области, а в

это наименование выделено, обозначенную ячейку результат., выделяем название

Функции, которые суммируют значения по цвету ячейки:
- это в первом цвет заливки ячеек = vWbkRes End:
- indRow = 1 Вы захотите вычислить определенной заливки? Допустим возможно окажите помощь
Функции, которые возвращают код цвета:
- If Next СчетЕслиЦвет поле жмем на кнопку Как видим, выбранный
- СЧЁТЕСЛИ категорию функции следующий: в данном столбце
в столбце В, примере. в зависимости от Function Function WbkSumCellsByColor(cellRefColorCountCellsByColor(диапазон, код_цвета) To xlRange.Rows.Count For сумму всех ячеек зеленый, какой кодSerge_007 = Summa1 End«Критерий»«OK» столбец содержит 82и щелкаем по«Статистические»=СЧЁТЗ(значение1;значение2;…) заполнено определенными числовыми то выделяем ячейку

Как посчитать количество и сумму ячеек по цвету, раскрашенных при помощи условного форматирования

Выберите диапазон (или диапазоны), их значений, и As Range) DimВ этом примере мы indColumn = 1 с одинаковой заливкой, у него?: Function Function СумЕслиЦвет(Oblastвписываем условия. После. значения, которые превышают кнопке. Затем выделяем наименованиеВсего у оператора может или текстовыми данными. столбца В. Главное, в которых нужно теперь хотите посчитать vWbkRes Dim wshCurrent используем формулу To xlRange.Columns.Count arResults(indRow,

например, сумму всехInter_EQuote As Range, Obrazec этого жмем наЗапускается окно аргументов. Аргументами число 150.«OK»«СЧЁТ» насчитываться до 255 В Экселе существует
-  чтобы были выделены сосчитать цветные ячейки количество ячеек определённого As Worksheet Application.ScreenUpdating=CountCellsByColor(F2:F14,A17)
-  indColumn) = xlRange(indRow, красных ячеек.: Вы издеваетесь?!(julytt)200?’200px’:»+(this.scrollHeight+5)+’px’);»>олько не с
-  As Range) As кнопку этой функции являютсяТаким образом, мы видим,.и щелкаем по
-  аргументов общей группы целый ряд инструментов, ячейки всех нужных или просуммировать по
цвета или сумму = False Application.Calculation, где indColumn).Interior.Color Next NextКак известно, Microsoft ExcelCell_Color — ячейка-образец помощью Надстройки MyAddin Variant ‘ Суммирует«OK» ссылки на ячейки. что в ExcelПроизводится активация окошка аргументов кнопке «OK».«Значение» которые способны решить строк. Например, так. цвету, если в значений в них,

= xlCalculationManual vWbkResF2:F14 GetCellColor = arResults предоставляет набор функций заливки. Разве здесьВы сами себе заданный диапазон ячеек. Ссылку на диапазон существует целый ряд функцииПосле того, как было. В качестве аргументов указанную проблему. РассмотримЗдесь выделили четыре строки. них содержатся числовые

то у меня = 0 For– это диапазон, Else GetCellColor = для различных целей, написано — «укажите противоречите при условии, чтоДля ручного ввода шаблон можно прописать вручную, способов подсчитать количествоСЧЁТЕСЛИ запущено окно аргументов как раз выступают каждый из нихТретий способ данные. для Вас плохие Each wshCurrent In содержащий раскрашенные ячейки, xlRange.Interior.Color End If и логично предположить, код цвета заливки»?Вот аналогичная тема: RGB цвет фона выглядит следующим образом: но лучше установить значений в столбце.. Как видим, окно оператора ссылки на ячейки в отдельности..

Как использовать код, чтобы посчитать количество цветных ячеек и просуммировать их значения
1. Нажмите и удерживайте новости – не Worksheets wshCurrent.Activate vWbkRes которые Вы хотите End Function Function
2. что существуют формулыВы просто ЩЕЛКАЕТЕНарод подскажите как слагаемого совпадает с=СЧЁТЕСЛИ(диапазон;критерий) курсор в поле Выбор определенного варианта
3. имеет два поля,СЧЁТ или диапазон, вСкачать последнюю версиюМожно в таблицеCtrl существует универсальной пользовательской
4. = vWbkRes + посчитать. Ячейка GetCellFontColor(xlRange As Range) для подсчёта ячеек НА ЯЧЕЙКУ с
5. посчитать сумму ячеек цветом фона ячейкиПосле этого программа производит«Значение1» зависит от конкретных которые соответствуют аргументам, следует в его котором нужно произвести
Excel фильтром отфильтровать нужные, кликните по одной функции, которая будет SumCellsByColor(wshCurrent.UsedRange, cellRefColor) Next
- A17 Dim indRow, indColumn по цвету. Но, цветом заливки, который выделенных цветом образца. Dim Summa1 подсчет заполненных ячеек, куда нужно ввести целей пользователя. Так,
-  функции. поле внести запись. подсчет значений.Читайте также: Как посчитать данные. Затем выделить ячейке нужного цвета, по цвету суммировать Application.ScreenUpdating = True– содержит определённый As Long Dim к сожалению, не
-  надо суммировать. ЗакрепляетеВот тема с As Variant, c выделенного диапазона, которые данные, и выделить индикатор на строкеВ поле
Рабочая книга с примерами для скачивания

В этом окне,Выделяем элемент листа, в количество строк в отфильтрованные ячейки в затем отпустите или считать количество Application.Calculation = xlCalculationAutomatic цвет заливки, в arResults() Application.Volatile If существует формулы, которая эту ячейку(знаки долаара форума Microsoft: As Range, ObrazecCvet соответствуют заданному условию, соответствующую область на состояния позволяет только«Диапазон»

как и в который будет выводиться
Excel
столбце. В строке

Количество выделенных строк в Excel.

ячеек и выводить WbkSumCellsByColor = vWbkRes нашем случае красный. xlRange Is Nothing позволила бы на $A$1 — ставятсяСуммирование по ячейкам, As Long ObrazecCvet и выводит их листе. Если нужно посмотреть количество всех
тем же способом, окне предыдущей функции, итоговый результат. ЩелкаемКак посчитать количество состояния будет видно. результат в определённые End FunctionТочно таким же образом Then Set xlRange
 обычном листе Excel через F4. Если выделенным цветом = Obrazec.Interior.Color For в область указанную
произвести подсчет заполненных значений в столбце который мы уже тоже может быть по значку заполненных ячеек в количество строк. Помним,Нажмите ячейки. По крайнейДобавьте этот макрос точно Вы записываете формулу = Application.ThisCell End суммировать или считать не получится -julytt Each c In в первом пункте ячеек в нескольких без фиксации результата; не раз описывали
 представлено до 255«Вставить функцию»
Экселе что пустые ячейкиAlt+F8 мере, я не также, как и для других цветов, If If xlRange.Count по цвету. ставьте вручную. ): спасибо за подсказку Oblast.Cells If c.Interior.Color этого способа.
удаленных друг от функция выше, вводим координаты полей, но, как, который размещен слеваВ зависимости от целей не считаются в, чтобы открыть список
слышал о таких предыдущий код. Чтобы которые требуется посчитать > 1 ThenЕсли не использовать сторонние
Извини брат, что-то буду читать = ObrazecCvet ThenОператор СЧЁТЕСЛИМН является продвинутым друга диапазонах, то
СЧЁТЗ первого столбца таблицы.
и в прошлый от строки формул. пользователя, в Экселе строке состояния. Получится макросов в Вашей функциях, а жаль получить количество и в таблице (жёлтый ReDim arResults(1 To надстройки, существует только у меня неRAN Summa1 = Summa1 вариантом функции СЧЁТЕСЛИ. координаты второго, третьегопредоставляет возможность ихВ поле раз, нам понадобитсяТем самым мы вызвали можно производить подсчет так. рабочей книге.Конечно, Вы можете найти сумму цветных ячеек и зелёный). xlRange.Rows.Count, 1 To одно решение –
 правильно работает. Или
: Почему так категорично? + c.Value End Его используют, когда
и последующего диапазона число зафиксировать в«Критерий» всего одно изМастер функций всех значений в
Выделены три строки.
Выберите макрос тонны кода VBA используйте вот такиеЕсли в раскрашенных ячейках xlRange.Columns.Count) For indRow создать пользовательскую функцию я совсем понял!
julytt If Next СумЕслиЦвет
 нужно указать более нужно вводить в отдельной ячейке; операторнам нужно задать них под названием. Переходим в категорию
столбце, только числовыхБыстро выделить столбец
Sum в интернете, который формулы:
содержатся численные данные = 1 To (UDF). Если Вы Прикрепляю файл образец: сисадмины неразрешают ничего = Summa1 End
одного условия соответствия поля под названиемСЧЁТ условие подсчета. Вписываем«Значение1»«Статистические» данных и тех, можно так. Выделяем

Подсчет количества значений в столбце в Microsoft Excel

CountByConditionalFormat пытается сделать это,=WbkCountCellsByColor() (например, столбец xlRange.Rows.Count For indColumn мало знаете об там я написал устанавливать Function для различных диапазонов.«Значение2»производит подсчет только туда слово. Вводим в этои выделяем наименование которые соответствуют определенному верхнюю ячейку столбца.

и нажмите но все эти

=WbkSumCellsByColor()Qty. = 1 To
этой технологии или что нужно мне. Serge_007

Процедура подсчета значений в столбце

Byronel Всего можно указать, элементов, содержащих числовые«Мясо» поле координаты столбца,«СЧЁТЗ» заданному условию. Давайте Нажимаем на клавишуRun коды (по крайней

Способ 1: индикатор в строке состояния

Просто введите одну изв нашей таблице), xlRange.Columns.Count arResults(indRow, indColumn) вообще никогда не Заранее спасибо!: Надстройка — это: сразу предупреждаю, с до 126 условий.«Значение3» данные; а с

. над которым нам. После этого производим рассмотрим, как решить F8 и ставим(Выполнить). мере, те экземпляры, этих формул в Вы можете суммировать = xlRange(indRow, indColumn).Font.Color слышали этого термина,Юрий М просто книга Excel, VBA работал давноОбозначаем ячейку, в которуюи т.д. Когда помощью функцииПосле того, как вышеуказанные нужно выполнить операцию. щелчок по кнопке поставленные задачи различными

курсор в нижнююВ результате Вы увидите которые попадались мне) любую пустую ячейку значения на основе Next Next GetCellFontColor не пугайтесь, Вам: Inter_E, Вы читаете, в которой хранятсясоздал модуль, забил будет выводиться результат все данные введены.СЧЁТЕСЛИ настройки выполнены, жмем Делаем это все«OK» способами. ячейку столбца. Нажимаем

вот такое сообщение: не обрабатывают правила на любом листе выбранного цвета ячейки, = arResults Else не придётся писать что Вам пишут? макросы туда этот код и запускаем Мастер Жмем на кнопкуможно задать более на кнопку тем же образом,внизу данного окошка.Данный способ самый простой левую мышку.

Способ 2: оператор СЧЁТЗ

Для этого примера мы условного форматирования, такие Excel. Диапазон указывать используя аналогичную функцию GetCellFontColor = xlRange.Font.Color код самостоятельно. Здесь»Если в диапазонеКак Вы будете и сохранил, выбрал функций. В нем«OK» сложные условия подсчета«OK» каким выполняли данную

Мы переходим к окну и требующий минимальногоИли нажимаем сочетание выбрали столбец как: не нужно, ноSumCellsByColor End If End Вы найдёте отличный суммирования находятся ячейки использовать ДРУГИЕ макросы, имя модуля «test» ищем элемент.

. процедуру для функции аргументов функции количества действий. Он клавиш «Ctrl» +Qty.Format all cells based необходимо в скобках: Function Function CountCellsByColor(rData
: Ну, если надстройкуEnd Sub»«OK» формул, придерживаясь следующего с таблицей бывает в выделенной колонке колонку таблицы. После Как и количество Сделать это можноО других сочетаниях– это число значений);

=WbkSumCellsByColor(A1) использовали формулу:

Способ 3: оператор СЧЁТ

As Long Dim – это скопировать примере пишете: «не низзя, тогда отдельнозабил внутрь текст. синтаксиса: необходимость произвести подсчет в 63 ячейках того, как адрес аргументов, они могут просто взглянув на клавиш, чтобы выделить ячеек искомого цвета;Format only top or, и формула вернет=SumCellsByColor(D2:D14,A17) cellCurrent As Range его и вставить важно цифры или зти макросы здесь.

Происходит открытие окна аргументов.=СЧЁТЗ(значение1;значение2;…) заполненных данными ячеек. содержится слово столбца был занесен достигать численности 255 индикатор в строке ячейки, смотрите в в нашем случае bottom ranked values сумму всех ячеек
Способ 4: оператор СЧЁТЕСЛИ

кнопку мыши и.Past Due are above orЗдесь Вы найдёте самые– ячейка с For Each cellCurrent раскрашены вручную считалось, потому и

: Всем спасибо з — как узнать«Диапазон» заполненных ячеек указанного указанную процедуру в ячеек в этойРезультат тут же будет«Значение1» выделить весь столбец,Посчитать количество строк. below average важные моменты по образцом цвета.

Считаем сумму и количество он COUNT! Ну участие и помощь. код цвета, насколькои диапазона. этой программе.

же колонке, которые выведен в ячейку,. Устанавливаем в него в котором вы можно с помощьюSum(Форматировать только значения, всем функциям, использованнымТаким же образом Вы indRefColor = cellCurrent.Interior.Color ячеек по цвету как-то можно же Разбираюсь. Надеюсь все я понял именно«Условие»Кроме того, для подсчетаСкачать последнюю версию не содержат слово которую мы определили

курсор и после хотите произвести подсчетфункции «Автосумма» в Excel– это сумма которые находятся выше
том, что диапазонов Экселе существует ещёВ программе Excel количество. Как видим, программа левой кнопкой мыши выделение будет произведено,

которой будет стоять красного цвета вFormat only unique or пару новых функций, цвету шрифта при End If Next цвету, когда к

сижу, самому найти: Добрый день!Heidegger и соответствующих им функция счет. В

которые определяют коды помощи функций cellCurrent CountCellsByColor = ячейкам применены правила в стандартном екселеКак можно без: Текст функций не
Нажимаем стрелку уQty.(Форматировать только уникальные цветов.CountCellsByFontColor cntRes End Function

условного форматирования через заводских надстройеек VBA, просто с

нужно никуда забивать

много. Вводим адреса формулы, она считает счетчика на строке уже описанным ранее значения. Пустые ячейки в котором нужно окна, около параметра кнопки «Автосумма» на, то есть общее или повторяющиеся значения).Замечание:и

Function SumCellsByColor(rData AsПредположим, у Вас есть время сейчас берет! использованием формулы IF – они должны

Пожалуйста, помните, чтоSumCellsByFontColor Range, cellRefColor As таблица заказов компании,Заранее спасибо!
текстовые данные, в как координаты столбцабудет отображаться число и выбираем функцию

отметкой эти коды VBA все эти формулы

Range) Dim indRefColor в которой ячейкиЮрий М ячейках которые залиты уровне.

потом жмем наКак и в предыдущем из которых подсчитываетСЧЁТЕСЛИ

Замечание: As Long Dim в столбце: Я полагаю, что определенным цветом. ФормулаНет, вторым аргументом кнопку случае, выделяем ячейку, элементы, заполненные определенным.Урок: Функция СЧЁТ в жмем на кнопку столбце. В подсчетеЭта функция считает только. особенностей и ограничений, Вы уже добавилиЕсли после применения cellCurrent As RangeDelivery штатными средствами такого будет считать по функции идёт ячейка,«OK» куда будут выводиться типом данных.В поле

Подсчет заполненных ячеек в Microsoft Excel

«OK» будут участвовать ячейки, заполненные строки. ЕслиColor из-за которых они в свою рабочую выше описанного кода Dim sumRes Application.Volatileраскрашены в зависимости не сделать. Нужно горизонтали. (например зеленым)!

имеющая целевой цвет,.

Подсчет ячеек

данные и такимСамый простой способ подсчитать«Диапазон»В отличие от предыдущихв нижней части заполненные любыми данными есть пустые ячейки– это шестнадцатеричный могут не работать

Способ 1: счетчик на строке состояния

книгу Excel пользовательскую VBA Вам вдруг sumRes = 0 от их значений: изощряться :-)Мой примерный план: вхождения которого ищутсяСинтаксис у этой функции же способом запускаем ячейки, содержащие данныевводим координаты все способов, использование оператора окна аргументов. (числовые, текстовые, дата в столбце, то код цвета выделенной корректно с какой-то функцию, как было потребуется раскрасить ещё indRefColor = cellRefColor.Cells(1,Due in X DaysInter_E =if(E36:G36,colorindex(15773696),counta(E36:G36)) во входном диапазоне

следующий: Мастер функций. В – это воспользоваться того же первогоСЧЁТЕСЛИПрограмма производит подсчет и и т.д.). Пустые в формуле исправляем ячейки, в нашем конкретной книгой или показано ранее в несколько ячеек вручную, 1).Interior.Color For Each– оранжевые,: У меня однаЗаранее благодарен. (первый аргумент функции).=СЧЁТЕСЛИМН(диапазон_условия1;условие1; диапазон_условия2;условие2;…) нём выбираем оператора

Способ 2: функция СЧЁТЗ

информацией со счетчика, столбца таблицы, которыйпозволяет задавать условия, выводит в ячейку, элементы при подсчете адрес первой ячейки случае типами данных. Так этой статье. сумма и количество cellCurrent In rDataDelivered
этих изменений. Не

Способ 3: функция СЧЁТ

«OK» кнопок переключения режимоввводим следующее выражение: остальные ячейки будут всех значений (как не высвечиваться в формуле указан диапазон трудности с добавлением
Запускается окно аргументов. Аргументы Пока на листе

То есть, данный критерий

Способ 4: функция СЧЁТЕСЛИ

удастся найти его, вот такую формулуНа самом деле, это sumRes End Function по их цвету, то не получается: Спасибо, но какByronelКак видим, простейший подсчет те же самые, выделен диапазон, в задает условие, чтоСЧЁТЕСЛИ целевом столбце. он, скорее всего, Мы адрес ячейки
использовании предыдущего способа. пустые или лишь

заполненные данными элементы,

Способ 5: функция СЧЁТЕСЛИМН

Range) As Long и оранжевых ячеек: Добрый день! Такое: меня 2007-ой на с ним. увидеть в строке В их роли один содержит какое-то
Inter_E: To Heidegger :

Посчитать, если выделено цветом примерами и с выше ограничения иF2:F14 все подобные функции As Range Dim выше, прямого решения сумму только тех: у меня вСознательно не вставлял вывести результат в диапазонов на листе, появляется тогда, когда. Знак диапазоне, а в

с возможным его

Посчитать количество цветных ячеек

 нем нужно установить – формула Excel
готовыми к использованию
работает в таблицах– это выбранный вызываются только изменением cntRes As Long этой задачи не ячеек, где фон
«User defined» т.е Application.Volatile, чтобы не
отдельную область на в которых нужно выделено две или
«<>» нашем случае в сохранением там. Но, галочку около пункта. функциями Microsoft Excel 2010
диапазон,

 данных на листе, Application.Volatile cntRes = существует. Но, к зеленый. у вас как вводить пользователя в листе, а тем подсчитать количество заполненных более не пустыхозначает в Экселе столбце, которые отвечают к сожалению, функция«Количество»Можно написать такуюCountCellsByColor и 2013, сA17 но Excel не 0 indRefColor = счастью, в нашейЭто первое. «Определенные пользователи» появились заблуждение: да при более произвести подсчет ячеек числовыми данными. ячеек, и сразу«не равно» заданному условию. СинтаксисСЧЁТЗ. После этого количество формулу. =СЧЁТ(A1:A6) Этаи любыми типами условного– это ячейка расценивает изменение цвета cellRefColor.Cells(1, 1).Font.Color For команде есть оченьМожно ли из эти функций. Знаете изменении значений в с учетом определенных Жмем кнопку показывает их число

. у данного операторавсе-таки не позволяет
заполненных данными ячеек формула считает толькоSumCellsByColor форматирования (и снова с нужным цветом шрифта или заливки
Each cellCurrent In
умелые и знающие
макроса обращаться к как я сделал, целевых ячейках функция условий, то в«OK»
после словаПосле введения этих настроек заметно отличается от задавать условия отбора будет отображаться в ячейки с числами,

, и испытать их спасибо нашему гуру!). заливки. ячейки как изменение rData If indRefColor Excel гуру, и
фону ячейки, вытаскивать просто 2-раза кликнул пересчитается, но если этом случае придут.«Количество»
 в окне аргументов предыдущих двух функций: значений. строке состояния. а с текстом на своих данных.
 В результате онВсе перечисленные далее формулы данных. Поэтому, после = cellCurrent.Font.Color Then

 один из них значение фона и
на файл который не меняя значений на помощь специализированныеДля ручного введения формулы. жмем на кнопку=СЧЁТЕСЛИ(диапазон;критерий)Урок: Мастер функций вК недостаткам данного способа – не считает.Урок подготовлен для Вас выводит количество раскрашенных работают по такому изменения цвета ячеек

 cntRes = cntRes написал безупречный код

 менять его? я скачал и поменять цвета ячеек

Подсчет ячеек определенного цвета

 функции. придерживаемся следующего синтаксиса:
Но, хотя по умолчанию«OK»Аргумент Excel можно отнести то,Шестой способ. командой сайта office-guru.ru ячеек и сумму же принципу. вручную, просто поставьте + 1 End
для Excel 2010sboy что-то тихо произошло. в целевом диапазонеАвтор: Максим Тютюшев=СЧЁТ(значение1;значение2;…) этот счетчик включен,.

«Диапазон»С помощью оператора что полученный результатЧтобы посчитать ячейки

Источник: https://www.ablebits.com/office-addins-blog/2013/12/12/count-sort-by-color-excel/ значений в этихCountCellsByFontColor(диапазон, код_цвета) курсор на любую If Next cellCurrent и 2013. Итак,: И Вам здравствуйте!Ну как теперь

 — функция автоматическиByronelПосле этого в области, и только ждетВ предварительно заданной ячейке
представляется в видеСЧЁТ
нигде не фиксируется.
(строки) по определенномуПеревел: Антон Андронов ячейках, независимо от
– считает ячейки ячейку и кликните
CountCellsByFontColor = cntRes выполните 5 простых

buchlotnik пользоваться? Там help-a не пересчитается -

: добрый день! в которой находится

 того, когда пользователь сразу же отображается ссылки на конкретный

можно произвести подсчет То есть, как условию, используем функциюАвтор: Антон Андронов типа условного форматирования,
с заданным цветомF2 End Function Function шагов, описанных далее,

: можно нет на этих надо вводить ееесть 2 столбца
формула, отобразится количество выделит определенные элементы, результат. Он сообщает

 массив ячеек, а только числовых значений только вы снимете «СЧЁТЕСЛИ». Примеры формулГоворят, что нет

Подсчет значений в цветных ячейках

 применённого на листе. шрифта.
, а затем SumCellsByFontColor(rData As Range, и через несколькоsvd2017 функция. Т.е надо заново.ячейки в них ячеек, заполненных числовыми
в некоторых случаях о том, что
в нашем случае

 в выбранной колонке. выделение, он исчезнет. смотрите в статье специальной функции безSub SumCountByConditionalFormat() Dim

SumCellsByColor(диапазон, код_цвета)Enter cellRefColor As Range) минут Вы узнаете: ура только 2 аргумента?

Александр Смит закрашены 4 цветами данными. он может быть в выделенном столбце на колонку. Он игнорирует текстовые Поэтому, при необходимости «Функция «СЧЁТЕСЛИ» в макросов indRefColor As Long
– вычисляет сумму, сумма и количество Dim indRefColor As количество и суммуа как ? область и цвет: Ctrl+Alt+F9 (причем, некоторые изДанная функция позволяет подсчитать отключен вручную. Тогда
находятся 190 элементов

Аргумент значения и не его зафиксировать, придется Excel» здесь.посчитать количество выделенных строк Dim cellCurrent As ячеек с заданным

 после этого обновятся. Long Dim cellCurrent ячеек нужного цвета. =суммесли(. что?)) как вписать ячейки указать? какHeidegger них нестандартны - не просто количество актуальным становится вопрос с данными, которые«Критерий»
включает их в записывать полученный итогСедьмой способ в Excel Range Dim cntRes цветом заливки.

Так нужно сделать, As Range Dim

Откройте книгу Excel и туда фон ячейки будет в цифровом: Да, тогда пересчитает выбирал оттенки через ячеек, заполненных числовыми о его включении.

 не содержат словосодержит заданное условие.
общий итог. Данная вручную. Кроме того,.. Неправда. Есть много
As Long DimSumCellsByFontColor(диапазон, код_цвета) работая с любым sumRes Application.Volatile sumRes нажмите , именно зеленый.. виде стандартный зеленый и без Volatile. «другие цвета»)

выражениями, но только Для этого нужно«Мясо» Это может быть функция также относится с помощью данногоПосчитать строки, выделенные условным других приемов, чтобы

 sumRes Dim cntCells– вычисляет сумму макросом, который Вы
= 0 indRefColorAlt+F11buchlotnik цвет?julyttнеобходимо посчитать количество такие из них, кликнуть правой кнопкой.

 как точное числовое к категории статистических способа можно производить форматированием посчитать выделенные строки, As Long Dim ячеек с заданным найдёте далее в = cellRefColor.Cells(1, 1).Font.Color, чтобы запустить редактор: читаем правила форумаСпасибо!
: Доброго дня всем!

 ячеек определенного цвета которые соответствуют определенному мыши по строкеТеперь давайте произведем в или текстовое значение,

 операторов, как и подсчет только всехили ячейки Excel. Было indCurCell As Long цветом шрифта. этой статье. For Each cellCurrentVisual Basic for Applications , прикладываем пример,

Посчитать значения в закрашенных ячейках. (Макросы/Sub)

Inter_EПытаюсь усовершеннствовать таблицы,
в ячейках значений условию. Например, если состояния и в третьей колонке данной так и значение,
предыдущая. Её задачей
заполненных значениями ячеекокрашены цветом вручную в бы желание, а cntRes = 0GetCellFontColor(ячейка)

Представленный ниже скрипт Visual In rData If

(VBA). получаем помощь

: Которая вторая и с которыми работаю.
нет, они просто задать условие «>50», открывшемся списке установить таблицы подсчет всех

 заданное знаками является подсчет ячеек и нельзя задавать Excel

Как посчитать количество закрашенных ячеек в excel

В Excel мы можем заштриховать ячейку цветом, чтобы выделить важные ячейки, и теперь вы хотите подсчитать количество этих заштрихованных ячеек, как вы можете быстро решить это вместо того, чтобы пересчитывать их вручную? В этом руководстве представлены две хитрости.

Быстрый подсчет затененных ячеек с функцией COUNTSHADES Kutools for Excel

Подсчет затененных ячеек с помощью определения имени и формулы

Чтобы подсчитать количество всех затененных ячеек, вам нужно определить имя для диапазона (диапазон включает затененный цвет), а затем использовать некоторые формулы в Excel.

1. Выберите пустую ячейку рядом с диапазоном данных и щелкните правой кнопкой мыши, чтобы выбрать Определить имя контекстное меню формы. Смотрите скриншот:

Внимание: В Excel 2007 контекстное меню не содержит элемента «Определить имя». Но вы можете получить его, нажав Формулы > Определить имя.

2. В открывшемся диалоговом окне укажите имя, которое вам нравится, в Имя и фамилия текстовое поле и введите эту формулу = GET.CELL (38; Лист1! A1) в поле «См.». Смотрите скриншот:

Функции: В формуле Sheet1 — это лист, с которым вы работаете, вы можете изменить его при необходимости.

3. Затем в ячейке A22 (ячейка имеет определенное имя) введите эту формулу = Цвет (имя, которое вы определили на шаге выше), затем перетащите маркер заливки в диапазон, который имеет тот же масштаб, что и исходный диапазон данных, в котором вы хотите подсчитать затененный цвет. Смотрите скриншот:

Теперь вы можете видеть, что некоторые ячейки заполнены нулем, а некоторые заполнены числами больше нуля, на самом деле количество ячеек с числами больше нуля — это количество заштрихованных ячеек.

4. В пустой ячейке введите эту формулу. = СЧЁТЕСЛИ (A22: K41; «>» & 0) чтобы подсчитать количество ячеек с числами больше нуля, затем нажмите клавишу Enter. Смотрите скриншот:

Функции: В формуле выше A22: K41 — это диапазон ячеек с числами.

Теперь 15 — количество закрашенных ячеек.

С этим методом подсчитать количество затененных ячеек немного сложно, перейдите к следующему методу, который облегчит эту проблему.

Быстрый подсчет затененных ячеек с функцией COUNTSHADES Kutools for Excel

Вот функция под названием КОНФЕТЫ в Kutools Функции группа Kutools for Excel который может быстро подсчитать количество затененных ячеек с небольшим шагом.

После бесплатной установки Kutools for Excel вы можете использовать функцию COUNTSHADES, выполнив следующие действия:

1. Выберите пустую ячейку, в которую вы будете выводить результат, и нажмите Кутулс > Kutools Функции > Статистические и математические > КОНФЕТЫ. Смотрите скриншот:

2. В появившемся диалоговом окне щелкните, чтобы выбрать диапазон, из которого вы хотите подсчитать затененные ячейки. Смотрите скриншот:

3. Затем вы увидите, что количество затененных ячеек в выбранном диапазоне отображается в Аргументы функций диалоговое окно, вы можете нажать OK чтобы экспортировать результат в ячейку, выбранную на шаге 1. См. снимок экрана:

В Kutools Functions есть много полезных функций, вы можете подсчитать количество каждой цветной ячейки или суммировать ячейки одним заполненным цветом или цветом шрифта, или подсчитать время появления определенного символа в ячейке. Нажмите здесь, чтобы бесплатно установить Kutools for Excel и сэкономить рабочее время Excel.

Как в Excel посчитать количество ячеек по цвету ячейки или цвету текста

Мы с вами уже рассматривали вопрос о том как посчитать в Excel количество ячеек/значений в подробном видео уроке. Сегодня мы бы хотели немного расширить данную статью для решения более узкой задачи. Допустим, вам необходимо посчитать количество ячеек в зависимости от цвета ячеек или цвета текста.

Начиная с Excel 2007 в программе встроили возможность сортировки ячеек по цвету. Таким образом, можно отфильтровать нужный нам цвет, выделить оставшиеся на виду ячейки и визуально посмотреть общее количество ячеек. Но что делать, если нам требуется делать это часто и при этом нам необходимо, чтобы все считалось и пересчитывалось с помощью формул.

Для этих целей необходимо использовать очень простенький макрос, а точнее пользовательскую функцию, назовем ее ColorNom, она позволит нам вытягивать числовой код цвета заливки и далее по этому коду мы и будет считать общее количество ячеек, используя приемы, описываемые в статье как посчитать в Excel количество ячеек/значений

Итак, приступим. Зайдите в редактор Visual Basic, для этого:

в Excel 2003 нажмите на Сервис, далее Макрос и затем Редактор Visual Basic.

в Excel 2007, 2010 и 2013 это делается по-другому. Зайдите в раздел Разработчик, далее выберите Visual Basic

Внимание! Раздел панели инструментов Разработчик в Excel 2007 доступен по умолчанию, а в Excel 2010 и 2013 его необходимо включить. Это особенно полезно сделать тем пользователям, которые будут часто работать с макросами. Чтобы включить панель инструментов Разработчик в Excel 2010 или 2013 необходимо запустить Файл | Параметры | Настройка ленты после этого необходимо с правой стороны необходимо поставить галочку напротив надписи Разработчик

После того как откроется редактор Visual Basic, вставьте пустой модуль, для этого выберите меню Insert и далее Module

и скопируйте туда текст простой функции:

Public Function ColorNom(Cell As Range)
ColorNom = Cell.Interior.ColorIndex
End Function

После этого закройте редактор Visual Basic и можно вернуться к нашему файлу. В любой пустой ячейки введите пользовательскую функцию, которую мы ввели раннее. В нашем случае это функция ColorNom, ее можно вызвать либо через меню Вставка, Функция — категория Определенные пользователем, либо просто можно напечатать ее в самой ячейке =ColorNom( A1 ), где A1 — это наша ячейка, в которой нам необходимо определить индекс цвета.

После этого уже не составит труда посчитать количество ячеек или значений в зависимости от цвета ячейки. Используйте нашу статью как посчитать в Excel количество ячеек/значений

Если вам необходимо посчитать количество значений или сумму в зависимости от цвета текста, то необходимо немного изменить код пользовательской функции.

Public Function ColorNom(Cell As Range)
ColorNom = Cell.Font.ColorIndex
End Function

Важно! Вы не сможете находить с помощью данной функции номер цвета ячейки при использовании условного форматирования. Кроме того, при изменении цвета ячейки Excel не пересчитывает значения, необходимо это делать в ручную, нажимая Ctrl+Alt+F9, либо изменения будут происходить при новом открытии данного файла. Это происходит из-за того, что Excel не считает изменение цвета ячейки редактированием формулы. В связи с этим, если это критично, то можно внести изменение в саму формулу, просто добавив функцию, которая постоянно пересчитывается и при этом не повлияет на определение цвета ячейки. Например, указать функцию определения текущей даты, умноженную на ноль.
В нашем случае функция будет выглядеть следующем образом.

=ColorNom(A1)+Сегодня()*0

Пример подсчета количества значений по цвету цвету заливки ячеек в Excel

Рассмотрим вышеуказанный пример с перечнем фруктов. Мы определили код ячеек и отобразили его напротив каждой ячейки.

Далее для удобства мы создадим вспомогательную таблицу из всех существующих цветов заливки. В нашем случае это красный, зеленый и желтый. Рядом с помощью все той же формулы определим код цвета.

В третьем столбце мы уже будет считать количество ячеек определенного цвета по условию, использую код цвета.

Считать количество мы будем с помощью функции СЧЁТЕСЛИ

Вот так выглядят аргументы данной функции

=СЧЁТЕСЛИ( диапазон ; критерий )

=СЧЁТЕСЛИ( $B$1:$B$8 ; E2 )

Диапазон мы указали со знаком доллара, чтобы он был закреплен и можно было протянуть формулу. Критерия у нас встречается всего три и они указаны в нашей вспомогательной таблице. Протянем формулу и получим количество ячеек по цветам.

Сумма ячеек по цвету, шрифту, формату и т.д ⁠ ⁠

Допустим вы используете таблицу с числовыми данными, которые для удобства помечаете цветом для последующего их подсчёта. Исходя из названия заголовка рассмотрим, как такое можно реализовать в Excel.

1. Сохраняем документ с поддержкой макросов, хотя его там и не будет, но в данном случае так надо.

2. Нажатием Ctrl+F3 или на вкладке «Формулы» выбираем «Диспетчер имён», где в строке «Имя» вводим название формулы ЦветЯчейки, а в поле «Диапазон» саму формулу: =ПОЛУЧИТЬ.ЯЧЕЙКУ(63;ДВССЫЛ(«RC[-1]»;0))

Я не буду грузить читателя разъяснением значений этой формулы, главное, чтобы всё работало, не так ли?)) Отмечу лишь, что 63 это код цвета заливки, заменяя который, можно подсчитывать ячейки по формату, шрифту, выделению курсивом и т.п.

Вот таблица с кодами и их значениями:

3. В соседнюю от цветной ячейки вводим «равно» и имя созданной формулы ЦветЯчейки, затем протягиваем её вниз. В результате отображаются коды цветов, которые будут необходимы нам для подсчёта.

4. Теперь с помощью формулы =СУММЕСЛИ(B2:B12;10;A2:A12) можно посчитать сумму цветных ячеек, где 10 это код цвета, для жёлтых — 6:

Созданная формула =ЦветЯчейки определяет 56 цветов. На некоторые цветовые гаммы он реагирует некорректно, так что любителям 50 оттенков серого придётся воспользоваться хардкорным чёрным или серым))

Вот пример палитры «твёрдых» цветов:

Следует учесть, что Excel при изменении цвета ячейки автоматически не совершит пересчёт данных, для этого необходимо заново ввести формулу, либо нажать Ctlr+Alt+F9, что гораздо проще и быстрее.

Также на этот случай есть макрос,

1. Нажимаем Alt+F11 и в открывшемся окне вводим следующий текст

Public Function SumByColor(DataRange As Range, ColorSample As Range) As Double

Dim Sum As Double

For Each cell In DataRange

If cell.Interior.Color = ColorSample.Interior.Color Then

Sum = Sum + cell.Value

2. В разделе «Формулы» — «Вставить функцию» выбираем категорию «Определенные пользователем», где указываем нашу функцию, которой задаём диапазон подсчёта и образец цвета:

И получаем результат:

Чтобы макрос учитывал не цвет заливки фона, а цвет шрифта ячейки, в шестой строке заменяем свойство Interior на Font в обеих частях выражения.

Для подсчёта количества цветных ячеек, а не суммы, заменяем в седьмой строке Sum = Sum + cell.Value на Sum = Sum + 1

Как и в первом варианте, макрос также не может подсчитать сумму ячеек автоматически, поэтому после произведённых изменений нажимаем клавишу F9.

Если значения в Вашей таблице окрашены в различные цвета и нужно их пересчитать по отдельности, то просто замените ячейку с образцом на цвет из таблицы и нажав F9 получите мгновенный результат.

Также используя ту же формулу, заменив лишь ячейку с образцом, можно вывести сумму и в другой ячейке.

Следует учесть, что функция перебирает все, в том числе и пустые ячейки, в DataRange, поэтому задавайте в качестве первого аргумента только диапазон со значениями, а не весь столбец, иначе Excel «зависнет» надолго.

P.S. Уважаемые подписчики, посты про Excel будут выходить по понедельникам

635 постов 14.5K подписчиков

Правила сообщества

2. Публиковать посты соответствующие тематике сообщества

3. Проявлять уважение к пользователям

4. Не допускается публикация постов с вопросами, ответы на которые легко найти с помощью любого поискового сайта.

По интересующим вопросам можно обратиться к автору поста схожей тематики, либо к пользователям в комментариях

Важно — сообщество призвано помочь, а не постебаться над постами авторов! Помните, не все обладают 100 процентными знаниями и навыками работы с Office. Хотя вы и можете написать, что вы знали об описываемом приёме раньше, пост неинтересный и т.п. и т.д., просьба воздержаться от подобных комментариев, вместо этого предложите способ лучше, либо дополните его своей полезной информацией и вам будут благодарны пользователи.

Утверждения вроде «пост — отстой», это оскорбление автора и будет наказываться баном.

Дяденька, а можно на Облако выкладывать файл-образец с формулами из поста? Чтобы потыкаться и скопировать себе нужное. Чтобы понять быстрее, как работает эта функция. А то получайникам сложно, а ужас как нужно это дело!! ))

Нет, не так, грузи давай)))

Спасибо, в закладки

Мгновенное заполнение в Excel — магия в чистом виде⁠ ⁠

Друзья, всем привет. Сегодня хочу рассказать вам про мгновенное заполнение в Excel.

Ссылка на файл, чтобы можно было потренироваться — https://disk.yandex.ru/i/HyW0N215F6CuUg

Возможно, многие с ним знакомы заочно. Наверняка же замечали, что когда вручную заполняешь какие-то значения в ячейках, то с переходом к следующей ячейке при вводе символов Excel порой выдаёт вот такой список:

Так вот это и есть мгновенное заполнение во всей своей красе. Да, иногда это раздражает, потому что тебе это не нужно. Но в большинстве случае польза мгновенного заполнения огромна.

Извлечение данных

Предположим, у нас есть вот такой столбец с текстом:

Нам нужно извлечь отдельно номер договора и дату. Это можно сделать с помощью инструмента «Текст по столбцам». Правда, потом придётся от символа «№» ещё избавляться. А вот мгновенное заполнение справится с этим намного быстрее. Просто вводим справа от текста в первую ячейку номер договора (1), нажимаем Enter. Далее возможны два варианта.

Вариант 1. Вручную вводим в ячейку первую цифру второго договора (2). Excel предлагает свои варианты, жмём Enter — PROFIT!

Вариант 2. После того, как перешли ко второй ячейке, сразу нажимаем сочетание Ctrl + E (Е английская, конечно). Именно это сочетание отвечает за запуск мгновенного заполнения. Аналогично с датами. Вводим в ячейку С2 дату первого договора — Enter — Ctrl + E — наслаждаемся результатом.

ОЧЕНЬ ВАЖНАЯ ЧАСТЬ СТАТЬИ.

Так как же это работает? Всё довольно просто. В первой ячейке мы задаём образец, чего хотим получить, далее Excel распознаёт нашу логику и заполняет остальные ячейки по образу и подобию.

Ух ты! И так будет работать всегда?! Строго говоря — нет. Иногда, Excel не может с одной ячейки распознать логику. В этом случае нужно вручную заполнить не одну, а две, три, четыре (если случай совсем запущенный) ячейки. И только после этого нажимать Ctrl + E. Чем больше ячеек заполняешь, тем выше вероятность того, что твоя логика будет верно распознана могучим интеллектом Excel. Порой мгновенное заполнение не справляется с поставленной задачей:

Даты в первом столбце указаны в формате ГГГГ-ММ-ДД. При попытке привести их в формат ДД-ММ-ГГГГ получается вот такая «красота». Поэтому не поленитесь после того, как все ячейки будут заполнены, пробежаться по ним, а тот ли в них результат, который ты ожидал увидеть.

Образцы вводите в соседнем столбце от источника (можно справа или слева). Не «убегайте» далеко от данных, результат может быть непредсказуемым или вообще ничего не будет.

Ещё одно важное дополнение: мгновенное заполнение работает в версиях Excel 2013 и выше.

Теперь, когда с пояснениями закончено, давайте посмотрим, на что ещё способен этот удивительный инструмент.

Извлечение только чисел из столбца

Если нам из «красивого» столбца, в котором есть значения вроде «123руб», «55 рублей» и так далее, нужно извлечь только цифры, то вы уже знаете, что нам поможет:

В данном конкретном случае я прописал вручную две первых ячейки, иначе Excel не понимал, что нужны только числа.

Работа с текстом

В столбце указаны Имя и Фамилия. Нам нужно получить результат в виде «Имя Ф.» В первой ячейке вводим образец — Enter — Ctrl + E:

Кстати, если попробовать получить Фамилия И., то будьте внимательны. Если прописать два примера, потом начать вводить третий, то появляется довольно забавный список:

Но если не начинать вводить в третью ячейку текст, а сразу нажать на Ctrl + E, то всё будет нормально. Раз на раз не приходится. Временами мгновенное заполнение ведёт себя очень странно.

Извлечение части сплошного текста

Необходимо разбить слипшийся текст на части. Вводим в первых двух ячейках образец — Ctrl + E:

С номером поступаем аналогично.

Сбор текста

В отдельных столбцах есть различная информация, которую необходимо собрать в одно предложение. Обратите внимание, что порядок столбцов для мгновенного заполнения роли не играет. Прописываем предложение в первой ячейке — Enter — Ctrl + E:

На этом статью я хотел бы завершить. Уверен, я перечислил далеко не все чудесные возможности мгновенного заполнения. Буду вам благодарен, если в комментариях поделитесь своими способами применения этой чудесной штуки.

В качестве небольшой рекламы позвольте оставить здесь ссылку на мастер-класс, который я буду проводить 9 марта. Кто хочет узнать ещё несколько полезных приёмов при работе в Excel (там почти не будет того, о чём я писал здесь), а ещё хочет услышать чуть больше про то, где я работаю, записывайтесь — Полезные приемы при работе в Excel. Часть 2 (specialist.ru)

На этом всё. Как обычно, спасибо огромное всем, кто потратил своё драгоценное время и осилил данное полотно. Надеюсь, было полезно. Видео по данной статье обязательно появится на моём канале — (36) Андрей Митрохин — YouTube

Услуги для бесправных: уловки и обман клиентов при получении микрозаймов⁠ ⁠

Надеемся, что этот пост попадет в руки тех, кто еще только собирается брать микрозайм. Завсегдатаи микрофинансовых конторок ничего нового для себя не найдут, разве что увидят еще раз, на чем наживаются многие МФО. Ну и еще вас ждет пара исторических и литературных экскурсов, немного аналитики и горячие слезоточивые примеры.

Кому нравится полезное чтиво про то, как современный рынок выставляет нас дураками — вступайте также в Лигу потребителей. Когда-нибудь мы сможем не только посмеяться над гениальными схемами СЕО и маркетологов, но и провести ритуал потребительского экзорцизма, объявив бойкот какой-нибудь токсичной причуде рынка.

Рынок на тоненького

Начнем как обычно с небольшого обзора рынка. Чтобы понимать, с каким уровнем ~~жадности~~ мы имеем дело.

В 2022 году жить стало веселее, поэтому объем выданных займов вырос на 22%. Банки стали реже одобрять заявки на кредиты. МФО подсуетились.

На руки клиентам было выдано 365 млрд рублей. Прибыль МФО в условиях СВО выросла на 40%. Чистой прибыли микрофинансисты наколотили где-то на 13 млрд рублей. Можно купить десяток 35-метровых яхт на 8 кают. Вот таких.

Людей, которые взяли деньги и ушли в закат тоже стало больше. В начале 2020 года 28 из 100 заемщиков имели просрочку более 90 дней. К концу 2022 года число любителей бега выросло до 35%. В ответ на это МФОшники слили коллекторам в два раза больше своих клиентов (для взыскания им переданы данные о 4,6 млн атлетов).

В среднем для счастья клиенту МФО надо 13 700 рублей. При этом микрозаймы со своим гигантским процентом проникли даже в POS-кредитование (когда соблазнители сидят внутри магазина и не дают деньги в руки, а переводят их продавцу в счет оплаты товаров). В этом сегменте техника и шмотки подорожали, поэтому и средняя покупка выросла с 28 до 35 тысяч рублей.

Что характерно, портфель онлайн-займов (привет лиге лени) вырос на 55%. Реальность такова, что сегодня 80% микрозаймов оформляется через интернет. И в этом есть свои риски (об этом ниже).

Дорогими считаются микрозаймы на короткий срок под 1% в день. На их долю приходится 82% всех займов. Под 0,2% в день (в пять раз дешевле) выдается всего 5% займов. Это длинные займы для самых отчаянных, они выдаются на срок до года и это более чем в три раза дороже, чем кредит в банке.

Кстати, Раскольникову удается взять денег под грабительские 10 % в месяц, заложив серебряные часы за полтора рубля. Нормальное проживание в столице (с арендой скромных двух комнат) обходилось в 60 рублей в месяц. А гонорар за «Преступление и наказание» составил 14 тысяч рублей.

В целом рынок сейчас переходит в руки (не смейтесь) крупных-микро-финансовых-организаций с портфелем выше 1 млрд рублей.

Матчасть

Итак, что нужно знать потенциальной жертве МФО.

Легальные МФО промаркированы в поисковике Яндекс и Мейл.ру синей галочкой. Если не следовать этому правилу, можно реально задолжать ребятам из якудзы. Нелегальные кредиторы — явление довольно распространенное.

По закону максимальная процентная ставка по краткосрочному микрозайму (до 1 года) — 1% в день. То есть максимальная переплата, например за 30 дней, составит 30%, а за 90 дней — 90%.

Даже если просрочить выплаты, ваш долг легальной МФО не может превысить размер займа более чем в 1,5 раза. Когда размер долга достигает этого предела, МФО обязана прекратить начислять проценты, штрафы и пени. Бывалые атлеты советуют гасить всю сумму, иначе она как копчик гидры — отрастает по полной вновь.

Сам по себе микрозайм был придуман как «перехватить денег на пару дней до получки» (на это как бы намекают проценты, которые еще недавно могли доходить до 800% годовых, а сегодня это всего 365%). По свежим исследованиям 72% микрозаймов нужны людям на срок до 30 дней. По такому кредиту не должно быть в договоре залога.

Когда вы погашаете задолженность, не забывайте сохранять документы об оплате (чек, квитанцию или приходно-кассовый ордер)

Нет предела совершенству и количеству займов в одних руках. В сети полно таких случаев

Штрафы для клиентов

Недавно мы писали про каршеринг. Пост набрал всего 16 тысяч просмотров и немножко комментариев про то, что штрафы для клиентов — это нормально и хорошо. Мол, не может мятежная русская душа без дубины сберечь казенное. Многие комментаторы даже не поняли, что в статье мы критикуем не столько размер штрафов (хотя они шокирующе большие), сколько практику их сокрытия (узнать можно только прочитав весь договор в электронном виде) и их взимания без доказывания и нормального арбитража. Может поэтому один из крупнейших операторов каршеринга пятую часть прибыли зарабатывает на списании с клиентов штрафов — 1,1 млрд рублей в год. В отчетности МФО (мы посмотрели одного из лидеров рынка по объему выданных займов) пени и штрафы для клиентов составляют «всего» 10% от дохода компании.

Возможно, у других МФО этот показатель немного выше. Но лидер в сфере чрезвычайно рискового микрофинансирования штрафует клиентов в два раза меньше, чем оператор каршеринга!

Стандартно МФО берет 0,1% от непогашенной суммы в день. Но для 35% клиентов это не страшно — они в бегах.

МФО препятствует досрочному погашению кредита (да, но нет)

Вот что говорится в типичном договоре типичной МФО:

По договору с лимитом кредитования. Заёмщик имеет право досрочно вернуть всю сумму займа, уведомив об этом Кредитора путем подачи заявления через личный кабинет на сайте www.****.ru за 30 календарных дней до возврата займа. Частичное досрочное погашение Задолженности возможно только в даты платежей, предусмотренные Договором

То есть хотим вернуть досрочно — ждем в любом случае 30 дней. Очень удобно, учитывая, что:

Начисление процентов за пользование займом осуществляется ежедневно

То есть картина маслом: получил наследство и хочешь вернуть деньги сразу? Погоди немного, сейчас набежит 30% от взятой суммы и и мы сразу примем деньги назад. Можно ли в чем-то упрекнуть МФО? Ну, они сделали все по букве закона (353-ФЗ им дает такое право). Правда закон написан для обычных кредитов, которые оформляются на месяцы и годы. И закон специально оговаривает, что срок для досрочного погашения может быть короче, если это предусмотрено договором. Но финансисты ведь не обязаны. А люди, писавшие закон про кредиты наивно (на самом деле специально) предполагали, что договоры в сфере оказания финансовых услуг могут быть проклиентские? Мы не видели ни одного такого случая. Зато ситуаций, когда клиентов банков, страховых и МФО провели по границе или за границей закона, макнув личиком в совковый сервис — полно. И мы будем много об этом писать.

Ненужные услуги для невнимательных

Также про МФО же в деловых изданиях пишут такое:

Доля доходов МФО от непрофильных направлений деятельности (различных видов страхования, телемедицины, СМС-информирования, расширенного пакета обслуживания) оставалась высокой. Как правило, такие доходы преобладали у компаний, выдававших онлайн-займы

Вычислить эти доходы довольно сложно, так как формально дополнительные услуги предоставляют третьи лица. Многие компании прибегают к навязыванию дополнительных услуг для того, чтобы повысить доходы (365% в год все же маловато).

Кстати, в 1893 году предпринимается детализация понятия ростовщичества как уголовно наказуемого преступления. Вновь устанавливается ограничение на ставку кредитования: сделка считалась ростовщической, если деньги выдавались под более чем 12 % годовых; если эта сделка доказуемо была заведомо крайне тяжелой для материального положения должника; если кредитор скрывал реальный процент, включая его часть в тело кредита. Пойманного на ростовщической сделке кредитора мог ждать тюремный срок от четырех до 16 месяцев.

У первой в в рейтинге за 2021 год компании (не называем ее) на сайте вообще нет никаких упоминаний о дополнительных услугах. Заем без всяких дополнительных услуг и комиссий — их фишка.

А вот у третьей из рейтинга МФО «МигКредит» на сайте нашлось описание дополнительных услуг. С трудом можем себе представить клиента, ищущего где бы занять 13 тысяч рублей до зарплаты и срочно нуждающегося в личном адвокате (1400 в год и адвокатскими услугами там не пахнет) и теледокторе (1000 рублей за пару консультаций с врачом).

Публичная отчетность не позволяет понять, сколько денег заработала данная МФО на дополнительных услугах. Также из опубликованной формы мы узнаем, что дополнительные услуги оказываютООО «НЮС» и/или ООО «Тот Тон» и/или ООО «Космовизаком».

Мы, кстати, попробовали оформить кредит и у данной компании оказалось все не так уж плохо. Если с перепоя не дернуть кнопку «Согласен со всем», то никаких предустановленных галочек не стоит.

Но другие игроки на рынке могут быть не столь разборчивы. В примере ниже (взят с Пикабу) видно, что клиенту плюсуют 6100 рублей за некий пакет услуг.

Что за пакет «Приоритет 2.0»? Очень нужная дичь:

И цена приятная, надо брать!

Правда предустановленных галочек нет (по крайней мере при написании данного поста картинка получилась такая, все галочки нами поставлены самостоятельно в тех местах, которые были обозначены как обязательные).

Но повторим еще раз — вся эта дичь рассчитана на торопливых. И таких клиентов будет много.

Многие дополнительные услуги маскируют под якобы обязательные. Среди них встречаются:

Проверка банковской карты. МФО уверяет, что ей необходимо передать сведения о вас и вашей карте специальной сервисной организации, которая проверит, действительно ли карта принадлежит вам.

Анализ кредитной истории. Организация утверждает, что должна запросить ваши данные в бюро кредитных историй (БКИ), чтобы решить, стоит ли выдавать вам деньги и под какой процент. Стоимость анализа кредитной истории варьируется от 150 до 1500 рублей. Помните, дважды в год вы можете запросить отчеты в бюро кредитных историй (БКИ) совершенно бесплатно и без чьей-либо помощи. Как это сделать, можно узнать из статьи «Кредитная история».

Комиссия за перевод денег. МФО запрашивает комиссию за перечисление ссуды на ваш счет. Порой она достигает 4% от суммы перевода. Но компания не имеет права брать за это плату — услуга неотделима от процедуры выдачи займа и незаконна.

Страховка. Бывает, заемщиков убеждают, что без полиса страхования жизни и здоровья деньги в долг им не дадут. Это типичный пример мисселинга: человека намеренно вводят в заблуждение, чтобы он приобрел ненужный продукт. Ведь на самом деле оформлять полисы, чтобы получить заем, необязательно.

Еще часто навязывают СМС-информирование. Когда МФО готовы заранее напоминать вам о приближающемся сроке платежа по займу, уведомлять о внесенных суммах и остатке долга. Обычно за СМС-рассылки ежемесячно берут 50–100 рублей.

Отказ от дополнительных услуг

Вы же не думали, что МФО просто так дадут вам соскочить и отказаться от договора по которому вы приобрели ворох бесполезных сервисов? Современная юриспруденция знает несколько способов, как сделать вас бесправным. И многие суды идут на поводу у ушлых юристов. Например, что придумала компания Амулекс, увидевшая прекрасные паразитические возможности кредитования самых бедных клиентов? Юристы придумали обойти запрет на свободу договора (вернее свободу отказаться от договора). Компания Амулекс заключает опционный договор на право получения юридической помощи, информационной и справочной поддержки в котором главное — в нескольких абзацах

То есть у клиента, который в онлайне за 10 минут оформил договор и не понял, где нужно сковырнуть галочку, чтобы с ним обошлись честно, есть возможность вернуть деньги только если:

а) он отправит письмо с отказом от услуг по почте

б) успеет понять, что это нужно сделать в течение 5 дней.

Грубое нарушение статьи 32 закона «О защите прав потребителей», но юристы Амулекс считают иначе. И по этому поводу в настоящее время в судах также идут ожесточенные баталии. Пока рынок отыгрывает эту схему по полной (неплохой анализ по опционным договорам и отказам от них есть здесь), лазейка эксплуатируется до тех пор, пока дела не попадут в Верховный Суд. Так было уже много раз, бизнес в такой тактике имеет фору 2-3 года, а иногда и вдвое больше.

В любом случае, с 29 декабря 2021 года клиенты банков, МФО и других кредиторов вправе отказаться от любых дополнительных услуг, оформленных при заключении договора потребительского кредита или займа. Подробнее можно глянуть здесь (пролистав в конец лонгрида).

Куда бежать

С 1 января 2020 года денежные споры с микрофинансовыми организациями можно улаживать с помощью финансового омбудсмена.

Если вы столкнулись с мошенниками, которые выдают себя за МФО, стоит сообщить об этом в Банк России.

Если же вы подписали договор с МФО, которая начала нарушать закон и правила, обращайтесь в Банк России и в саморегулируемую организацию, в которую входит эта МФО. За недочеты МФО могут оштрафовать, а за грубые нарушения — исключить из СРО и из государственного реестра МФО.

Анонсы наших постов и некоторую дополнительную информацию мы также публикуем в ТГ (stopcorp).

Что можно сделать полезное прямо сейчас за 5 минут⁠ ⁠

Скрыть себя в чужих адресных книгах Сбербанка

Настройки — Безопасность — Приватность — Инкогнито

Запретить списывать деньги сторонним сервисам, лучше завести отдельную цифровую карту для оплаты такси, подписок. На примере Сбера это выглядит так:

Прямо сейчас на экран блокировки смартфона или ноутбука вывести контактную информацию — телефон знакомого или свою почту, чтобы в случае находки с вами могли связаться. А вдруг?

Прямо сейчас вложи в обложку паспорта номер телефона

Если тебе важны фотографии в телефоне, то лучше установить облако. Бесплатного тарифа хватит тебе вполне для хранения фотографий, если вдруг потеряешь телефон:

Если ты хочешь дать кому то свой номер, например указать его в объявлении или для регистрации, или тебе нужен номер на короткий срок, то стоит рассмотреть услугу — дополнительный номер на Сим-карте. Например, в Мегафоне это стоит 60 рублей в месяц:

Как узнать Имя и Отчество человека? Один из способов это начать инициализацию перевода ему денег, например в банковском приложении. Вы все это знаете, но иногда забываете этот способ.

Как узнать какой сотовый оператор у абонента, переходил ли от одного оператора к другому, регион?

Я пользуюсь этим сервисом. Он работает по http, потому в браузере может ругаться. Пример запроса http://rosreestr.subnets.ru/?get=num&num=79001234567

Из скриншота понятно, что номер был в Теле2, сейчас переведен в Мегафон Москва. Эти запросы могут быть полезны, если нужно сегментировать базу клиентов по регионам.

Самый простой способ следить за ребенком, или в режиме онлайн показывать свое перемещение

Это телеграм. Отправьте с телефона ребенка себе в чат геопозицию и включите «трансляцию», вы будете видеть перемещение в режиме онлайн:

В последний раз мне эта функция пригодилась, когда мы немного потерялись в лесу.

Вы знаете, что загранпаспорт может быть использован в качестве подтверждения личности для получения электронной подписи, например для будущих ИП-шников? Такая подпись нужна для online регистрации ИП.

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

На этом всё, если зайдет, то могу время от времени делать подобные подборки полезностей.

И главное помни, что если тебе нечем заняться, то всегда можно пойти почистить кроссовки.

Таблица подсчета розеток/выключателей/рамок. ⁠ ⁠

Когда я работал в магазине электротоваров регулярно приходилось считать ЭУИ и рамки к ним по зарисовкам заказчиков или их работников, тогда я это делал на бумаге и неплохо набил на этом руку. Но у некоторых продавцов консультантов это выходит не слишком быстро и качественно. Для автоматизации процесса я решил создать таблицу в google, а затем перенес ее в Excel (последний мне нравится больше). Таблицей я намерен поделиться ссылки будут ниже, а пока краткое описание:

Это страница «Сводка» первоначально ее надо заполнить под себя и сохранить как шаблон:
— Наименования всех типов ЭУИ какие у вас могут быть (если не достаточно того, что ввел я)
— Цвета механизмов (или например серия + цвет, как удобнее будет)
— Цвета рамок (аналогично механизмам)

Потом переходим на страницу «Ввод данных»
При добавлении новой строки указываете комнату
цвет механизма, цвет рамки и наполнение постов выбираете из выпадающего списка (подтянутся варианты со страницы «Сводка»), когда вы выбираете механизм для поста — ячейка окрашивается, считая количество постов в рамке

После заполнения страницы «Ввод данных», возвращаемся на «Сводка»
При выборе нужного цвета в крайней правой таблице («Текущий цвет») в списке ЭУИ и рамок останется только то количество, которое соответствует выбранным цветам.
Кроме того, общее количество механизмов и постов в рамках и количество установочных коробок

ЗЫ Отдельное спасибо @XaXa3Pa3a

Полезные трюки при работе в Excel⁠ ⁠

Всем привет. Это моя первая статья на Пикабу, поэтому позвольте сначала представиться. Я являюсь преподавателем Microsoft Excel. Теперь, когда с формальностями покончено, можно перейти к основному.

Сомнения перед написанием

Я довольно часто читаю разный тематический материал на Пикабу, и меня восхищают большинство авторов и статей. Статьи восхищают, в первую очередь, своей интересностью (есть такое слово вообще?) и полезностью. Именно поэтому у меня были большие сомнения, а стоит ли вообще лезть со своими очередными «простыми, но полезными штуками при работе в Excel». Да и кому вообще ты со своим Excel нужен?! Тем более, что беглый поиск по сайту не выдал ни одной подобной статьи. И та часть меня, которая отвечает за неуверенность, сразу подметила, что раз нет, значит, оно никому не нужно. А может, просто плохо искал. И да, я отдаю себе отчёт в том, что подобного материала довольно много на просторах интернета. И всё-таки, принцип «лучше сделать и жалеть, чем не сделать вовсе» возобладал.

Почему я посчитал, что это будет полезно

Занимаясь преподаванием этой замечательной программы (а я и правда считаю её чудесной и, можно сказать, влюблён в неё), я довольно часто подмечал, что именно мелочи оказывают самое большое впечатление на слушателей. Рассказываешь про сочетание функций ИНДЕКС(ПОИСКПОЗ), какое оно крутое, позволяет двумерный поиск по таблице осуществлять и много чего ещё делать, все сидят, понимающе кивают. Потом в процессе показываешь какую-нибудь мелочь, вроде той, что листы можно копировать, зажав Ctrl и мышкой перетащив лист чуть правее/левее, аудитория сразу оживает: «Ну всё, не зря время потратили». Именно про такие вот простые приёмы я и хотел бы вам рассказать (про первый так уже рассказал).

Небольшое пояснение

Путь до той или иной команды обычно описывается следующим образом: название вкладки — потом группа команд — сама команда:

Если у вас ноутбук, то функциональные клавиши могут работать только при одновременном нажатии на кнопку Fn+F1-12 (есть такие ноутбуки, в которых и этот способ не работает, тут надо уже по модели ноута смотреть).

Вообще, почти каждая функциональная клавиша отвечает за какое-то действие. Но я остановлюсь на одной, а именно — F4. И нет, речь пойдёт не про то, что этой кнопкой в Excel мы можем менять тип ссылки для ячейки.

F4 — повтор последнего выполненного пользователем действия (если нажимать её не тогда, когда курсор находится в строке формул)

Например, вам нужно для нескольких несмежных столбцов установить определённую ширину. Вместо того, чтобы каждый раз выбирать столбец, потом переходить на вкладку Главная — Ячейки — Формат — Ширина столбца. Можно один раз проделать эту операцию, потом просто выделить следующий столбец и нажать F4. И такой фокус можно проделывать со многими операциями, будь то закраска ячеек, строк, столбцов, части графика на диаграмме или банальная вставка столбцов (да, столбец можно вставлять сочетанием Ctrl + «+», но ведь это две кнопки, а F4 — одна).

Представления

Представления, с моей точки зрения, являются одним из самых недооценённых инструментов в Excel. Предположим, у вас есть таблица, в которой вы часто фильтруете несколько столбцов по разным критериям: отдел, пол и город.

И вот вы каждый раз раскрываете фильтр, устанавливаете нужные критерии, просматриваете данные, потом раскрываете фильтр, следующий критерий, потом фильтр. Думаю, суть вы уловили. «Но всё меняется, когда приходят они — представления!» © Установив нужные критерии, переходим на вкладку Вид — Режимы просмотра книги — нажимаем Представления:

Далее всё интуитивно (куда же без интуиции в этой прекрасной программе) понятно. Жмёшь «Добавить», обзываешь представление так, как тебе угодно — Ок. Здесь же, в окне добавления представления, мы можем узнать, а что, собственно, Excel сохраняет. А сохраняет он параметры печати, результаты фильтрации, скрытые строки и столбцы. Создав под каждый набор фильтров, строк и столбцов представление, потом лёгким и непринуждённым нажатием на эту команду ты будешь менять свою таблицу в мгновение ока. Это не совсем удобно? Что же, согласен. Давайте сделаем ещё удобнее и добавим представления на панель быстрого доступа. Для этого раскроем настройку панели быстрого доступа — Другие команды:

В открывшемся окне в поле «Выбрать команды из:» выбираем «Все команды». Потом находим «Представления» — Добавить:

Кстати, так можно добавить на панель быстрого абсолютно любую команду.

Теперь у нас появился выпадающий список со всеми нашими сохранёнными представлениями. Через это же окно можно и новые представления создавать. Просто пишешь в нём название, нажимаешь Enter — готово.

ПРЕДУПРЕЖДЕНИЕ!

Представления не работают в книгах, в которых есть «умные» таблицы (таблицы, которые мы создаём через вкладку Главная — Стили — Форматировать как таблицу).

После создания представления не нужно перемещать столбцы/менять их местами, иначе представление прекратит работать.

Два окна одной книги.

Прежде, чем кидать в меня различные предметы с криками «мало того, что про какой-то Excel пишет, так сейчас ещё будет рассказывать, как в двух окнах работать, смерд?!» позвольте пояснить. Речь пойдёт о том, как работать в двух окнах с ОДНОЙ книгой. Давайте смоделируем ситуацию. Есть у тебя два монитора (если ещё нет, обязательно заводи второй, пускай небольшой, но чтобы был), один файл Excel с несколькими листами внутри. Тебе нужно из одной таблицы перенести данные в другую (сравнить их, связать формулами и так далее). Что ты делаешь? Правильно, бесконечно долго и уныло переключаешься между листами. Второй монитор тем временем грустно за этим наблюдает. Но можно сделать этот процесс более удобным и быстрым. Прошу любить и жаловать, вкладка Вид — Окно — Новое окно:

Нажав на эту команду, мы получим ту же самую книгу, но в другом рабочем окне. Название файла будет немного изменено на «Мой файл:1» и «Мой файл:2». А дальше уже дело за тобой. Располагай окна так, как тебе удобно (на одном мониторе, на разных), копируй данные, создавай связи, формулы — в общем, работай. Но делать ты это уже будешь быстрее и удобнее. Все изменения, которые мы вносим в любое из клонированных окон, появляются сразу во всех связанных окнах. Главное, не забыть нажать «Сохранить» хоть в каком-нибудь окне.

Специальная вставка (пропускать пустые ячейки)

Вообще, про специальную вставку в Excel можно написать отдельную статью, наверное. Инструмент во многих случаях просто незаменимый. Но в рамках данной статьи я расскажу только про одну возможность. Представим, что есть две таблицы:

Нужно перенести данные из крайнего правого столбца второй таблицы (столбец Р) в крайний столбец первой таблицы (столбец F) таким образом, чтобы существующие номера остались. Обычным копированием-вставкой сделать это не получится, так как в столбце Р есть пустые ячейки, которые заменят собой существующие номера в столбце F. И тут на сцену выходит специальная вставка. Выделяем диапазон из столбца Р, копируем. Далее выбираем ячейку, начиная с которой нужно вставить данные (в нашем случае это F2), и либо щёлкаем правую кнопку мыши — в контекстном меню ищем «Специальная вставка», либо нажимаем сочетание клавиш Ctrl+Alt+V. Попадаем в такое окно:

Ставим галочку рядом с «пропускать пустые ячейки» — Ок. Профит!

Хочу отметить, что большинство приёмов, которые я здесь описал, не начнут прям с ходу экономить вам часы рабочего времени. Но если постепенно приучить себя их использовать, вспоминать о них, то скорость работы будет неуклонно возрастать. На этом, пожалуй, всё. Спасибо всем, кто уделил своё внимание и драгоценное время чтению поста. Надеюсь, что кому-то это было полезно. Вообще, если хотя бы одному человеку данный материал поможет в работе, я уже буду считать это успехом.

P.S. Если статья покажется интересной и полезной, то на примете есть ещё несколько приёмов, про которые могу рассказать.

Друзья, создал на Ютубе свой канал. Пока только видео с первой статьёй. В ближайшие дни опубликую вторую часть. Полезные трюки и приёмы при работе в Microsoft Excel — YouTube

История о крохоборстве Сбера. Реально ли сдать мелочь в банк без комиссии⁠ ⁠

Каждый год я сдаю в банк накопленную мелочь и покупаю на нее какую- нибудь полезную вещицу для дома. В банке с меня всегда брали комиссию за так называемый «пересчет монет» . Полтора процента (1,5%)от суммы, но не меньше ста рублей. Всегда казалось это бредом. Магазины, например, обязаны принимать любые деньги в любом количестве хоть миллион по десять копеек. Не раз наблюдал, как некоторые люди приносили в магазин где я работал мешки с мелочью. Касса занималась часа на полтора. А в банке, где стоит счетная машина, будь добр комиссию плати, да еще и расфасуй монеты по номиналу. С какого фига, спрашивается. В новостях то и дело слышим про безумные миллиарды из бюджета в помощь банкам, а они мало того, что при переводах комиссию берут, так даже мелочь данью комиссией обложили. И в этот раз я твердо решил никому ничего не платить.

Перед походом в банк я пошарил в инете и нашел свежий закон и предписание Центробанка о том, что банки не должны взимать комиссию за внесение монет на счет. Звоню в Сбербанк, на линии мне сообщают о всё тех же комиссиях за пересчет монет. На вопрос, « как же закон Центробанка?» сообщили, что про это ничего не знаем.
Окей, звоню в Центробанк, на горячей линии сообщают, что комиссия за внесение монет на счет не законна, и если банк отказывает можно написать жалобу . Отлично, иду в банк. Кассир внести без комиссии деньги на счет отказался. На мои доводы, мол закон … предписание… ответ был «наш компьютер не дает внести деньги без комиссии». А на просьбу показать информацию о комиссии, был послан на сайт сбера.
Что ж, пишу жалобу в Центробанк. Через 15 дней пришел ответ. Типа «со стороны сбера все кошерно , комиссии банк сам может устанавливать, как коммерческая организация, а мы(Центробанк) постановления и предписания выносим, но выполнять их или нет- это на усмотрение банков». Далее написали, что в сбере можно таки сдавать монеты бесплатно до трехсот рублей (300р) и количество операций не ограничено. И что в банке мне об этом сообщили. Это не правда, я записывал на диктофон весь разговор с сотрудниками банка. Но это фигня. Короче, как и следовало ожидать, ворон ворону глаз не выклюет.
Ладно, решил я, на весах разделил монеты на кучки по 300р . Получилось 12 кучек.

Затем примерно дней через 14 после получения ответа из Центробанка отравился в то же отделение сбера. У кассира уточняю сколько можно внести монет бесплатно. И , о чудо!! Мне сообщают, что теперь внести на счет можно неограниченное количество монет. Типа у них недавние изменения и теперь нет проблем сколько хочешь на счет вносить. Сумма получилась 3442 рубля,
Мне ее закинули на счет одной операцией.
Я вот думаю, это жалоба моя так подействовала или звезды сошлись ?
Если ли вы, уважаемые бикабушники, сталкивались с проблемами при сдаче монет или наоборот все проходило хорошо напишите в коментах.

P.s я немного добавил к сданным деньгам и купил в дом увлажнитель воздуха 🙂

Читать:
Как том сойер красил забор