Сортировка массива по отдельному столбцу

[Кардаган]

И опять здравствуйте.
Помогите, пожалуйста, отсортировать массив.
Итак в приложенном файле имеем столбец B и столбцы D; E; F. Нужно отсортировать столбцы D; E; F по столбцу D в соответствии со столбцом B. То есть нужно отсортировать столбцы D; E; F так, чтобы столбец D имел такой же порядок, как и столбец B. Столбец B: не изменять данные, не сортировать его.
Помогите, пожалуйста.

[27102014]

Сами до конца понимате что нужно сделать? Столбец В:В в примере меньше по размеру других столбцов - что делать с дублирующими данными?
Обычный ВПР Вам не поможет?

[riniks17]

Сообщение от 27102014

Сами до конца понимате что нужно сделать? Столбец В:В в примере меньше по размеру других столбцов - что делать с дублирующими данными?
Обычный ВПР Вам не поможет?

Тем более, что где ячейки поля "В"заполнены, остальные столбцы именно так, как указывает ТС и отсортированы. Проверил ВПР

[27102014]

Кардаган , только для Вас сортировка данных столбцов D,E,F по столбцу В из имеющихся данных

Sub Кардаган()

i = 1

For y = 1 To 69

    If Cells(i, 2).Value = Cells(i, 4).Value Then
        Cells(i, 10).Value = Cells(i, 4).Value
        Cells(i, 11).Value = Cells(i, 5).Value
        Cells(i, 12).Value = Cells(i, 6).Value
        Cells(i, 13).Value = i ' номер строки из которой взяты данные
    Else:
    x = 1
        For Z = 1 To 100
            If Cells(i, 2).Value = Cells(x, 4).Value Then
                Cells(i, 10).Value = Cells(x, 4).Value
                Cells(i, 11).Value = Cells(x, 5).Value
                Cells(i, 12).Value = Cells(x, 6).Value
                Cells(i, 13).Value = x ' номер строки из которой взяты данные
             End If
         x = x + 1
    Next Z
End If

i = i + 1
Next y


End Sub

[Кардаган]

Сообщение от 27102014

Сами до конца понимате что нужно сделать? Столбец В:В в примере меньше по размеру других столбцов - что делать с дублирующими данными?
Обычный ВПР Вам не поможет?

Данные в столбцах B и D идут в разном порядке. Дублей нету. Если будут - то допсортировка (у меня есть ещё столбцы рядом с В - т.е этот тоже массив). Да столбец В меньше D. Но мне и надо понять, почему, что совпадает. Если цифры в B нету, а в D есть или в D нету, а в В есть то по идее должно быть расхождение по строке (для примера цифра 19380 в столбце В стоит на 2 строке, а в D в случае отсутствия цифры в первой строке - цифра 19380 будет в первой строке (отсортируйте "тупо" от А до Я - так и будет).

[Кардаган]

Сообщение от riniks17

Тем более, что где ячейки поля "В"заполнены, остальные столбцы именно так, как указывает ТС и отсортированы. Проверил ВПР

нет не так. Впр подтянет, но не то - см цифры. Их порядок разный в столбцах B и D.

[Кардаган]

Сообщение от 27102014

Обычный ВПР Вам не поможет?

Обычный ВПР отсортирует (подтянет) только столбец D, а остальные (E и F) не затронет - так что мимо.

[Кардаган]

Проверил код - в принципе правильно но:
1. Вставляет на лист копию столбцов D, E, F, но только со значениями имеющимися в столбце В, а мне надо тупо отсортировать столбец D по столбцу В. Значения, которых нет в столбце В должны идти под всеми остальными.
2. Добавляет справа ещё один столбец с какими-то цифрами - что это?

[27102014]

Сообщение от Кардаган

Проверил код - в принципе правильно но:
1. Вставляет на лист копию столбцов D, E, F, но только со значениями имеющимися в столбце В, а мне надо тупо отсортировать столбец D по столбцу В. Значения, которых нет в столбце В должны идти под всеми остальными.
2. Добавляет справа ещё один столбец с какими-то цифрами - что это?

Вы несколько дополнили условия задачи, сразу вопрос - а если в столбце В есть значения, которых нет в других?


по коду:
Отсортировать исходные данные прямо в этих столбцах D, E, F - если сможете, научите? Сортируете в других, а исходные D, E, F можно потом удалить
Добавляет справа ещё один столбец с какими-то цифрами - номер строки, из которой взяты данные в столбцах D, E, F

[27102014]

Сообщение от Кардаган

Обычный ВПР отсортирует (подтянет) только столбец D, а остальные (E и F) не затронет - так что мимо.

очень простой фокус
G1 = СЦЕПИТЬ (D1;E1;F1)

C1 = ВПР(B1;D:G;4;0)

Далее столбец С - разделить по столбцам