Перемешивание Email

Вход

Регистрация

Напомнить пароль

= Мир MS Excel/Перемешивание Email - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Перемешивание Email (Макросы/Sub)

Перемешивание Email

NeoBog

Дата: Суббота, 04.08.2018, 18:12 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

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

1. Неправильно

kna72@list.ru
flowers06@list.ru
ds_tdstk79@list.ru
sibinstrument@list.ru
duschik70@list.ru
bel-com@list.ru
prompoltyumen@list.ru
alpsoyuz@mail.ru
um_nata@mail.ru
agora-klass@mail.ru
axcerly@mail.ru
shina072@mail.ru
pc-sot@mail.ru
pkstalplus@mail.ru

2. Почти правильно

jazz_ld@hotmail.com
pk-delo@bk.ru
domvenera@gmail.com
pavel.v.72@hotmail.com
sibistochnik@i-tell.ru
atrium72@bk.ru
timecode72@gmail.com
avtomost-tmn@hotmail.com
kortech@inbox.ru
gkdc@bk.ru
radugacompany74@gmail.com
tmn-mv.geofiz@hotmail.com
sergrupi@inbox.ru
biosan05@bk.ru
lazernayagravirovka@gmail.com
or@hotmail.com

Помогите, надо срочно. С меня благодарность.