Veseliy.4el

Veseliy.4el

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

Топ-100 лучших метал-песен XXI века по версии журнала Metal Hammer

Топ-100 лучших метал-песен XXI века по версии журнала Metal Hammer Музыка, Metal, Сборник, Топ, Длиннопост

1. System Of A Down - Chop Suey!

2. Slipknot - Duality

3. Deftones - Change (In The House Of Flies)

4. Ghost - Square Hammer

5. Trivium - Pull Harder Of The Strings Of Your Martyr

6. Mastodon - Blood And Thunder

7. Lamb Of God - Redneck

8. Nightwish - Nemo

9. Gojira - Stranded

10. Rammstein - Sonne


11. Architects - Doomsday

12. Iron Maiden - The Wicker Man

13. Lacuna Coil - Heaven's A Lie

14. LinkinPark - Papercut

15. Avenged Sevenfold - Nightmare

16. Killswitch Engage - My Last Serenade

17. Power Trip - Executioner's Tax

18. Papa Roach - Last Resort

19. Machine Head - Halo

20. Heilung - Krigsgaldr


21. Clutch - Electric Worry

22. Tool - Schism

23. Dragonforce - Through The Fire And Flames

24. Bring Me The Horizon - Shadow Moses

25. HIM - Wings Of A Butterfly

26. Parkway Drive - Vice Grip

27. Limp Bizkit - Rollin

28. Skindred - Nobody

29. Babymetal - Road Of Resistance

30. Korn - Here To Stay


31. The Dillinger Escape Plan - Milk Lizard

32. Slayer - Disciple

33. Metallica - Moth Into Flame

34. Watain - Malfeitor

35. Bullet For My Valentine - Tears Don't Fall

36. In Flames - Only For The Weak

37. Code Orange - Bleeding In The Blur

38. Baroness - Chlorine & Wine

39. Converge - Concubine

40. Halestorm - I Miss The Misery


41. Bloodywood - Ari Ari

42. Satyricon - K.I.N.G.

43. At The Drive In - One Armed Scissor

44. Volbeat - Still Counting

45. Testament - More Than Meets The Eye

46. Five Fingers Death Punch - The Bleeding

47. Within Temptation - Angels

48. Disturbed - The Sickness

49. Judas Priest - Lightning Strike

50. Wardruna - Helvegen


51. Meshuggah - Bleed

52. Tesseract - Of Mind Nocturne

53. Zeal & Ardor - Devil Is Fine

54. Carpenter Brut - Turbo Killer

55. Cradle Of Filth - Nymphetamine

56. Immortal - All Shall Fall

57. Stone Sour - Through Glass

58. Isis the band - Weight

59. Grand Magus - Hammer Of The North

60. Cave In - In The Stream Of Commerce


61. Akercocke - A Skin For Dancing In

62. Opeth - Ghost Of Perdition

63. Evanescence - Bring Me To Life

64. Primordial - Empire Falls

65. Finntroll - Trollhammaren

66. Amenra - Am Kreuz

67. Steel Panther - Death To All But Metal

68. Children Of Bodom - Needled 24/7

69. Loathe - Two Way Mirror

70. Every Time I Die - The New Black


71. The Devil's Blood - River Of Gold

72. The HU - Wolf Totem

73. Asking Alexandria - The Final Episode

74. Jinjer - Pisces

75. Beartooth - In Between

76. Sabaton - Ghost Division

77. Hatebreed - I Will Be Heard

78. Beastmilk - Death Reflects Us

79. Megadeth - Head Crusher

80. Myrkur - Funeral


81. Letlive - Banshee (Ghost Fame)

82. Negura Bunget - Tesarul De Lumini

83. Enslaved - Bounded By Allegiance

84. Coheed And Cambria - Welcome Home

85. Audioslave - Cochise

86. Strapping Young Lad - Love?

87. Venom Prison - Abysmal Agony

88. Turisas - Battle Metal

89. Soil - Halo

90. Amon Amarth - Cry Of The Black Birds


91. Arch Enemy - We Will Rise

92. Dimmu Borgir - Progenies Of The Great Apocalypse

93. Kvelertak - Bloodtorst

94. Body Count - No Lives Matter

95. Sikth - Bland Street Bloom

96. Twin Temple - Sex Magick

97. Nine Inch Nails - The Hand That Feeds

98. Electric Wizard - Funeralopolis

99. Sólstafir - Ótta

100. Atreyu - Bleeding Mascara


Ссылки для прослушивания Вконтакте, Яндекс, Spotify, YouTube, Apple Music и Torrent

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

Как сгенерировать случайный текст в Word?

Если в документе Word написать =rand(), то появится текст с подробным описанием функционала программы.

Так же вы можете в скобках указать количество абзацев и количество предложений на один абзац через запятую (например, =rand(5,4)).

Эту функцию можно использовать для тестирования или демонстрации возможностей Word.

Подобную функцию выполняют также команды =lorem() и =rand.old()

Как сгенерировать случайный текст в Word? Microsoft Word, Текст, Полезное, На заметку

Быстрый подсчёт значений в Word

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

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

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

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

Быстрый подсчёт значений в Word Microsoft Word, Сумма, Полезное
Показать полностью 1

Тот ли это Джек?

Зашёл сейчас в магазин сладостей, выбираю конфеты и слышу голос бабушки на весь магазин: "у вас есть Джек потрошитель?"
Я так прихуел сперва, а в магазине все затихли. Я подумал может она с Джеком Скеллингтоном спутала.
Продавщица ей так буднично отвечает: "потрошителя у нас нет, но есть просто Джек". Но бабка прям настаивает, говорит что именно "потрошитель" ей нужен. Тут даже я заинтересовался, что это за конфеты такие)) в итоге продавщица её переубедила и она купила простого Джека, наверно дома сама его распотрошит)))

Тот ли это Джек? Бабушка, Конфеты, Джек Потрошитель, Джек Скеллингтон, Юмор, Мат
Показать полностью 1

Как определить, от чего зависит или на что ссылается формула?

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

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

Как определить, от чего зависит или на что ссылается формула? Microsoft Excel, Таблица, Полезное, На заметку

Как обрезать изображение по кругу

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


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

Чтобы это реализовать, выберите нужную картинку и перейдите в раздел Формат → Обрезать → Обрезать по фигуре.

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

Как обрезать изображение по кругу Microsoft Excel, Обрезка, Рисунок, На заметку

Древнее заклинание

Недавно с женой были в гостях у знакомых, сидели общались обо всём и ни о чём. Тут ко мне подходит их 5 летний сын и спрашивает: "Хотите я вам мантию Гарри Поттера покажу?" Я говорю "Давай". Он убежал в спальню переодеваться, потом пришёл в мантии, в круглых очках, почему-то в шляпе и направив на меня волшебную палочку крикнул: АБРА КАДАБРА! Я прихуел от ситуации и спрашиваю его, откуда он знает это древнее заклинание и тут его мать заявляет: ну дак Волан-де-Морт же так говорил, когда хотел Гарри Поттера убить!!! О_О
Я прям представил как грозный Тот-кого-нельзя-называть кричит "Абра кадабра" и у него из палочки появляются цветы))))
Я ей говорю, он же произносил "Авада кедавра", она начала спорить со мной, пришлось показать ей видеоролик, после которого она признала, что была не права. Потом ребёнок бегал по квартире и кричал Авада кедавра. Но для меня остался открытым вопрос: "Почему он хотел меня убить?"

Массовая замена текста формулами в Excel

У Николая Павлова вышла новая статья как с помощью формулы произвести массовую замену одного текста (или его фрагмента) на другой по имеющейся таблице подстановок (справочнику).
Другими словами - как привести в единый порядок разношёрстый текст в таблице Excel.

Предположим, что у вас имеется список, в котором с разной степенью "пряморукости" записаны исходные данные - например, адреса или названия компаний:

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост
Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

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

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

Что же делать? Не заменять же вручную 100500 раз кривой текст на правильный через окошко "Найти и заменить" или нажимая Ctrl+H?

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

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

К сожалению, при очевидной распространенности подобной задачи, в Microsoft Excel не существует простых встроенных способов для её решения. Для начала, давайте разберёмся, как это делать формулами, без привлечения "тяжелой артиллерии" в виде макросов на VBA или Power Query.

Случай 1. Массовая полная замена

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

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

В первой - исходные разномастные названия компаний. Во второй - справочник соответствия. Если находим в названии компании в первой таблице любое слово из столбца Найти, то нужно полностью заменить это кривое название на правильное - из столбца Заменить второй таблицы-справочника.
Для удобства:
Обе таблицы преобразованы в динамические ("умные") с помощью сочетания клавиш Ctrl+T или командой Вставка - Таблица (Insert - Table).

На появившейся вкладке Конструктор (Design) первой таблице присвоено имя Данные, а второй таблице-справочнику - Замены.
Чтобы объяснить логику формулы зайдём чуть издалека.
Взяв в качестве примера первую компанию из ячейки A2 и забыв временно про остальные компании, попробуем определить какой именно вариант из столбца Найти там встречается. Для этого выделим любую пустую ячейку в свободной части листа и введём туда функцию НАЙТИ (FIND):

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

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

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

Если у вас не последняя версия Office 365 с поддержкой динамических массивов, то после ввода этой формулы и нажатия на Enter вы этот массив увидите прямо на листе:

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

Если же у вас предыдущие версии Excel, то после нажатия на Enter мы увидим только первое значение из массива результатов, т.е. ошибку #ЗНАЧ! (#VALUE!).
Пугаться не стоит :) На самом деле наша формула работает и увидеть весь массив результатов всё равно можно, если выделить введённую функцию в строке формул и нажать клавишу F9 (только не забудьте потом нажать Esc, чтобы вернуться обратно к формуле):

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

Полученный массив результатов означает, что в исходном кривом названии компании (ГК Морозко ОАО) из всех значений в столбце Найти нашлось только второе (Морозко), причём начиная с 4-го по счёту символа.

Теперь добавим к нашей формуле функцию ПРОСМОТР (LOOKUP):

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

У этой функции три аргумента:
Искомое значение - можно использовать любое достаточно большое число (главное, чтобы оно превышало длину любого текста в исходных данных)
Просматриваемый_вектор - тот диапазон или массив, где мы ищем искомое значение. Здесь это введённая ранее функция НАЙТИ, возвращающая массив {#ЗНАЧ!:4:#ЗНАЧ!}
Вектор_результатов - диапазон, откуда мы хотим вернуть значение, если искомое значение найдено в соответствующей ячейке. Здесь это правильные названия из столбца Заменить нашей таблицы-справочника.

Главная и неочевидная фишка тут в том, что функция ПРОСМОТР при отсутствии точного совпадения всегда ищет ближайшее наименьшее (предыдущее) значение. Поэтому, указав в качестве искомого значения любое здоровенное число (например 9999), мы заставим ПРОСМОТР находить ячейку с ближайшим наименьшим числом (4) в массиве {#ЗНАЧ!:4:#ЗНАЧ!} и выдавать соответствующее ей значение из вектора результатов, т.е. правильное название компании из столбца Заменить.

Второй нюанс заключается в том, что, технически, наша формула является формулой массива, т.к. функция НАЙТИ возвращает в качестве результатов не одно, а массив из трёх значений. Но поскольку функция ПРОСМОТР поддерживает массивы "из коробки", то нам не придётся вводить эту формулу как классическую формулу массива - с помощью сочетания клавиш Ctrl+Shift+Enter. Достаточно будет простого Enter.
Вот и всё. Надеюсь вы ухватили логику.

Осталось перенести готовую формулу первую ячейку B2 столбца Исправлено - и наша задача решена!

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

Само-собой, с обычными (не умными) таблицами эта формула тоже замечательно работает (только не забудьте про клавишу F4 и закрепление соответствующих ссылок):

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

Случай 2. Массовая частичная замена

Этот случай чуть похитрее. Снова имеем две "умных" таблицы:

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

Первая таблица с криво записанными адресами, которые нужно исправить (я назвал её Данные2). Вторая таблица - справочник, по которому нужно произвести частичную замену подстроки внутри адреса (я назвал эту таблицу Замены2).

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

Готовая формула будет выглядеть так (для удобства восприятия я разделил её на насколько строк с помощью Alt+Enter):

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

Основную работу здесь выполняет стандартная Excel'евская текстовая функция ПОДСТАВИТЬ (SUBSTITUTE), у которой 3 аргумента:
Исходный текст - первый кривой адрес из столбца Адрес
Что ищем - тут мы используем трюк с функцией ПРОСМОТР (LOOKUP) из предыдущего способа, чтобы вытащить значение из столбца Найти, которое входит как фрагмент в кривой адрес.
На что заменить - аналогичным образом находим соответствующее ему правильное значение из столбца Заменить.

Вводить эту формулу с Ctrl+Shift+Enter здесь тоже не нужно, хотя она и является, по-сути, формулой массива.

И хорошо видно (см. ошибки #Н/Д на предыдущей картинке), что такая формула, при всей её элегантности, обладает и парой недостатков:
- Функция ПОДСТАВИТЬ является регистрочувствительной, поэтому "Спб" в предпоследней строке так и не нашлось в таблице замен. Для решения этой проблемы можно либо использовать функцию ЗАМЕНИТЬ (REPLACE), либо предварительно привести обе таблицы к одному регистру.
- Если текст изначально правильный или в нём нет ни одного фрагмента на замену (последняя строка), то наша формула выдает ошибку. Этот момент можно нейтрализовать перехватом и заменой ошибок с помощью функции ЕСЛИОШИБКА (IFERROR):

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

- Если в исходном тексте встречается сразу несколько фрагментов из справочника, то наша формула заменяет только последний (в 8-й строке Лиговский "проспект" заменился на "пр-т", а вот "С-Пб" на "Санкт-Петербург" уже нет, т.к. "С-Пб" стоит выше в справочнике). Эту проблему можно решить повторным прогоном нашей же формулой, но уже по столбцу Исправлено:

Массовая замена текста формулами в Excel Microsoft Excel, Таблица, Редактирование, Полезное, На заметку, Длиннопост

Не идеально и, местами, громоздко, но гораздо лучше, чем однообразная замена вручную, правда? :)

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