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

@erick trodly · Регистрация: 10.04.2015

Студворк — интернет-сервис помощи студентам

Добрый день!
Передо мной стоит следующая задача:

Есть два столбца: 1 список городов. 2 список стран.
Мне нужно получить 3 столбец, результатом которого будет список ячеек, каждая из которых будет выглядеть так "авиабилеты из <названия города> в <название страны>". Соответственно, нужно получить такой результат, который бы отражал все вариации пересечений город - страна. Количество городов - 5757, стран - 244. То есть каждому из городов будет посвящено 244 направления

Потом тоже самое нужно проделать и для результатов "авиабилеты из <название страны> в <название города>.

Кто-нибудь подскажет, как ее можно решить? Спасибо заранее

@Казанский · 23.04.2015, 20:12

Сообщение от erick trodly

Количество городов - 5757, стран - 244

Получится 1'397'388 комбинаций, т.е. это не поместится в столбец листа Excel.
Можно текстовый файл сформировать.

@Hugo121 · 23.04.2015, 20:13

И что Вы будете делать с этими двумя столбцами? Полтора миллиона в один не влезет...
Макросом легко нагенерить - цикл в цикле и готово. Но т.к. один столбец никак не получится - как делать непонятно...
Можно текстовый файл создать.

@Казанский · 23.04.2015, 20:28

Hugo121, bingo!

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub IHateSEO()
Dim cty(), cntry(), x, y
cty = Application.Transpose(Range("A1", Cells(Rows.Count, "A").End(xlUp)))
cntry = Application.Transpose(Range("B1", Cells(Rows.Count, "B").End(xlUp)))
Open "c:\temp\city2country.txt" For Output As #1  'вставьте нужный путь
For Each x In cty
  For Each y In cntry
    Print #1, "авиабилеты из " & x & " в " & y
  Next
Next
Close #1
Open "c:\temp\country2city.txt" For Output As #1  'вставьте нужный путь
For Each x In cntry
  For Each y In cty
    Print #1, "авиабилеты из " & x & " в " & y
  Next
Next
Close #1
End Sub

@BeL · 23.04.2015, 20:43

используйте функцию СЦЕПИТЬ. только если планируете все комбинации сделать, при открытии файл будет тормозить

@erick trodly · 23.04.2015, 22:02 **[ТС]**

Казанский, спасибо Вам большое!

*про IHateSEO посмеялся ))))))

Новые блоги и статьи Все статьи Все блоги /
Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита табличной части. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем

@erick trodly 0 / 0 / 0 Регистрация: 10.04.2015 Сообщений: 8

	Получение данных из двух столбцов в третий 23.04.2015, 19:38. Показов 1927. Ответов 5 Метки нет (Все метки) Добрый день! Передо мной стоит следующая задача: Есть два столбца: 1 список городов. 2 список стран. Мне нужно получить 3 столбец, результатом которого будет список ячеек, каждая из которых будет выглядеть так "авиабилеты из <названия города> в <название страны>". Соответственно, нужно получить такой результат, который бы отражал все вариации пересечений город - страна. Количество городов - 5757, стран - 244. То есть каждому из городов будет посвящено 244 направления Потом тоже самое нужно проделать и для результатов "авиабилеты из <название страны> в <название города>. Кто-нибудь подскажет, как ее можно решить? Спасибо заранее 0

@Hugo121 6998 / 2896 / 555 Регистрация: 19.10.2012 Сообщений: 8,804
	23.04.2015, 20:13
	И что Вы будете делать с этими двумя столбцами? Полтора миллиона в один не влезет... Макросом легко нагенерить - цикл в цикле и готово. Но т.к. один столбец никак не получится - как делать непонятно... Можно текстовый файл создать. 0

@BeL 1 / 1 / 0 Регистрация: 01.12.2014 Сообщений: 11
	23.04.2015, 20:43
	используйте функцию СЦЕПИТЬ. только если планируете все комбинации сделать, при открытии файл будет тормозить 0

@erick trodly 0 / 0 / 0 Регистрация: 10.04.2015 Сообщений: 8
	23.04.2015, 22:02 [ТС]
	Казанский, спасибо Вам большое! *про IHateSEO посмеялся )))))) 0

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

Решение