Veseliy.4el

Veseliy.4el

Пикабушник
поставил 20601 плюс и 11407 минусов
отредактировал 1160 постов
проголосовал за 1365 редактирований
Награды:
5 лет на ПикабуС Днем рождения Пикабу!выполнение всех достиженийС Днем рождения, Пикабу! За победу в продуктовом сёрфинге За исследование параллельных миров объединение 500 и более тегов За серию постов об Excel и Google docsболее 10000 подписчиков самый сохраняемый пост недели самый сохраняемый пост недели редактирование тегов в 1000 и более постах объединение 1000 и более тегов
114К рейтинг 10К подписчиков 11 подписок 126 постов 95 в горячем

Случай в метро

Сегодня было в метро. Утренний час пик. Люди, как шпроты в банке, прижаты друг к другу. Я стоял возле двери, которая не открывается, от безделья разглядывал рекламные вывески и увидел, что в середине вагона стоит женщина 30+, зажатая молодым парнем и как-то часто поворачивает голову назад. Потом начала локтями пихать его, подвинуться ей в другое место не было возможности. Так продолжалось несколько станций, парень не унимался и технично лапал её.


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


На следующей станции женщина вышла, а парень перешёл в другой вагон.

Цветовые шкалы

Ещё один способ наглядно продемонстрировать цифровые показатели, используя цветовые шкалы в условном форматировании.

Для этого выделяем таблицу с цифрами и применяем «Цветовые шкалы» в «Условном форматировании».

Цветовые шкалы Microsoft Excel, Таблица, Лайфхак, Полезное, На заметку, Длиннопост

Можно выбрать разные вариации по цвету и значениям

Цветовые шкалы Microsoft Excel, Таблица, Лайфхак, Полезное, На заметку, Длиннопост
Цветовые шкалы Microsoft Excel, Таблица, Лайфхак, Полезное, На заметку, Длиннопост
Цветовые шкалы Microsoft Excel, Таблица, Лайфхак, Полезное, На заметку, Длиннопост

Здесь же можно настроить параметры и цвет выделения наибольших и наименьших цифр

Цветовые шкалы Microsoft Excel, Таблица, Лайфхак, Полезное, На заметку, Длиннопост
Цветовые шкалы Microsoft Excel, Таблица, Лайфхак, Полезное, На заметку, Длиннопост
Показать полностью 5

Спарклайны

Продолжаю серию постов по Excel.

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

Для этого нужно выделить пустые ячейки, куда мы хотим поместить спарклайны, и на вкладке «Вставка» выбрать кнопки группы «Спарклайны»:

Спарклайны Microsoft Excel, Таблица, Лайфхак, Полезное, Длиннопост

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

Спарклайны Microsoft Excel, Таблица, Лайфхак, Полезное, Длиннопост

Применив кнопку «Гистограмма» мы получим мини-графики, которым в разделе «Конструктор» можно задать цвет минимальных и максимальных значений:

Спарклайны Microsoft Excel, Таблица, Лайфхак, Полезное, Длиннопост

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

Спарклайны Microsoft Excel, Таблица, Лайфхак, Полезное, Длиннопост

Во вкладке «Конструктор» можно добавить «Маркеры», тогда каждое значение будет отмечено точкой. Здесь также можно подобрать цвет линий и точек.

Спарклайны Microsoft Excel, Таблица, Лайфхак, Полезное, Длиннопост

Кнопкой «Выигрыш/проигрыш» мы получаем положительные и отрицательные значения, оно подходит для небольших цифр, например результаты матчей.


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

Спарклайны Microsoft Excel, Таблица, Лайфхак, Полезное, Длиннопост

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

Спарклайны Microsoft Excel, Таблица, Лайфхак, Полезное, Длиннопост
Показать полностью 6

Иранский ключник

Иранский ключник Ключи, Мастерская

Почти как Tetrischallenge

Показать полностью 1

А-анонимность

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


После того, как осмотр комиссией был закончен, последним нужно было собрать мнение солдат. Нас посадили в общий зал и начали инструктаж. Проверяющий на узбекском языке объяснял: "Отвечайте на вопросы честно, это всё анонимно, никто не узнает, при наличии нарушений в отношении виновных будут приняты меры и тому подобное". Потом берёт в руки бланки, окидывает всех взглядом и остановившись на мне спрашивает: "Кому вопросник на русском языке?"

Я один поднимаю руку...

Вот это я понимаю анонимность 200%.

Стоит ли говорить о том, что я сдал пустой лист?

Ввод даты без разделителей

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

Этот вариант с помощью макроса предоставляет возможность писать даты сокращенно, без точек/дробей - просто как число, т.е. 101019 автоматически превратится в 10.10.2019.

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

Ввод даты без разделителей Microsoft Excel, Дата, Полезное, Лайфхак, Длиннопост

выберите команду «Просмотреть код», в более ранних версиях Word «Исходный текст». В открывшееся окно редактора Visual Basic скопируйте и вставьте следующий код:


Private Sub Worksheet_Change(ByVal Target As Range)

Dim vVal

Dim StrVal As String

Dim dDate As Date


If Target.Cells.Count > 1 Then Exit Sub

If Not Intersect(Target, Range("A2:A10")) Is Nothing Then

With Target

StrVal = Format(.Text, "000000")

If IsNumeric(StrVal) And Len(StrVal) = 6 Then

Application.EnableEvents = False

dDate = DateValue(Left(StrVal, 2) & "/" & Mid(StrVal, 3, 2) & "/" & Right(StrVal, 2))

.NumberFormat = "dd/mm/yyyy"

.Value = CDate(DateSerial(Year(dDate), Month(dDate), Day(dDate)))

End If

End With

End If


Application.EnableEvents = True


End Sub

Ввод даты без разделителей Microsoft Excel, Дата, Полезное, Лайфхак, Длиннопост

Диапазоны A2:A10 замените на свои области ячеек листа, куда будут вводиться даты.


Даты до 10 можно вводить одной цифрой, либо с нулём (01, 02 и т.д.), месяц и год должен быть только двухзначной цифрой.


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

Ввод даты без разделителей Microsoft Excel, Дата, Полезное, Лайфхак, Длиннопост

В этом случае нажмите «End», сохраните и закройте документ, затем откройте заново и продолжайте вводить цифры дальше.

Показать полностью 2

Подсветка дат за 30 и более дней

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

Здесь я покажу формулу для выделения дат за 30 и более дней.

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

1. Создаём таблицу в Excel.

2. Создаём текущую обновляемую дату. Наводим курсор на удобное для вас место и вводим формулу: =СЕГОДНЯ()

3. Чтобы подсветить даты за 3 месяца вперёд выделяем всю таблицу Excel (без шапки) и выбираем на вкладке ГлавнаяУсловное форматирование Создать правило. В открывшемся окне задаём последний тип правила: Использовать формулу для определения форматируемых ячеек и вводим в строку следующую формулу: =$H1<СЕГОДНЯ()+120

Не забываем в графе «Формат» выбрать цвет заливки.

4. Аналогичным способом, для подсветки дат за 2 месяца вперёд, в новое правило вводим: =$H1<СЕГОДНЯ()+90

5. Также подсвечиваем даты за 1 месяц вперёд: =$H1<СЕГОДНЯ()+60

6. Даты меньше текущей даты подсветим с помощью формулы: =$H1<$L$2

7. Для пустых ячеек вводим: =ЕПУСТО($H1).

В итоге у вас должно получиться так:

Подсветка дат за 30 и более дней Microsoft Excel, Таблица, Контроль, Срок, Полезное, Лайфхак

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

Показать полностью 1

Может ли быть ещё более худший начальник? Концовка.

Продолжение к посту Может ли быть ещё более худший начальник?


Пост-повествование о самодурстве и хамстве начальника, ссылающий к вопросу в заголовке.


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


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


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


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


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


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


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


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

Показать полностью
Отличная работа, все прочитано!