Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Упрощение сравнения 2 разных списков людей - Страница 2 - Мир MS Excel

Старая форма входа
  • Страница 2 из 2
  • «
  • 1
  • 2
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Упрощение сравнения 2 разных списков людей (Макросы/Sub)
Упрощение сравнения 2 разных списков людей
_Boroda_ Дата: Пятница, 06.10.2017, 16:17 | Сообщение № 21
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Добавить в словарь можно несколькими способами:
.Add key, item - если ключ уже есть, то дает ошибку
.Item(key) = item - если ключ уже есть, то НЕ дает ошибку, а просто тупо заменяет элемент
ааааа = .Item(key) - добавляет ТОЛЬКО ключ, если такой ключ уже есть, то ничего не делает. ааааа - просто переменная, нигде в дальнейшем не участвует

[vba]
Код
For Each k_ In .Keys'цикл по ключам
            .Item(k_) = k_ & " - " & .Item(k_)' элементк к-го ключа присваиваем значение ключ - элемент
Next
[/vba]
Пример
было - ключ ццц, элемент 55
стало - ключ ццц, элемент ццц - 55

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеДобавить в словарь можно несколькими способами:
.Add key, item - если ключ уже есть, то дает ошибку
.Item(key) = item - если ключ уже есть, то НЕ дает ошибку, а просто тупо заменяет элемент
ааааа = .Item(key) - добавляет ТОЛЬКО ключ, если такой ключ уже есть, то ничего не делает. ааааа - просто переменная, нигде в дальнейшем не участвует

[vba]
Код
For Each k_ In .Keys'цикл по ключам
            .Item(k_) = k_ & " - " & .Item(k_)' элементк к-го ключа присваиваем значение ключ - элемент
Next
[/vba]
Пример
было - ключ ццц, элемент 55
стало - ключ ццц, элемент ццц - 55
Автор - _Boroda_
Дата добавления - 06.10.2017 в 16:17
sboy Дата: Пятница, 06.10.2017, 16:30 | Сообщение № 22
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2566
Репутация: 724 ±
Замечаний: 0% ±

Excel 2010
_Boroda_, Еще раз спасибо, буду тренироваться дальше)

Яндекс: 410016850021169
 
Ответить
Сообщение_Boroda_, Еще раз спасибо, буду тренироваться дальше)
Автор - sboy
Дата добавления - 06.10.2017 в 16:30
BTH Дата: Понедельник, 09.10.2017, 11:15 | Сообщение № 23
Группа: Пользователи
Ранг: Новичок
Сообщений: 38
Репутация: -1 ±
Замечаний: 0% ±

Excel 2007
_Boroda_, Спасибо за код, протестировал. Я немного не уверен в том, что там добавлено тире и пробелы. Изначально я их хотел минимизировать, т.к, в последующем это может мне мешать. Будет удобнее если лишние данные будут отсутствовать.
---
Всё, нашёл где это делается :)

BlackTeaHappy

Сообщение отредактировал BTH - Понедельник, 09.10.2017, 11:21
 
Ответить
Сообщение_Boroda_, Спасибо за код, протестировал. Я немного не уверен в том, что там добавлено тире и пробелы. Изначально я их хотел минимизировать, т.к, в последующем это может мне мешать. Будет удобнее если лишние данные будут отсутствовать.
---
Всё, нашёл где это делается :)
Автор - BTH
Дата добавления - 09.10.2017 в 11:15
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Упрощение сравнения 2 разных списков людей (Макросы/Sub)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!