datka

Увы обычным сортом тут не получится. Можно попробовать через Макросы/VBA.

Можно сделать так :
1) запихнуть все в один столбец
2) Отсортировать его
3) Вручную вырезать с 39 по 79 и вставить радом в столбец. Повторить еще ~8 раз.

Если надо это автоматизировать. надо один раз сделать ручками и записать ( Record Macros ) а потом отредактировать макрос так чтобы не было жесткой привязки к ячейкам. Тут надо использовать что-то на подобии Selection.End(xlDown).Select

Источник

VBA
Here's a VBA solution for those who can use it.

Create a VBA module with the following code:

Public Function GetURL(c As Range) As String
    On Error Resume Next
    GetURL = c.Hyperlinks(1).Address
End Function

To use, enter the following into any cell:

=GetURL(A1)

where A1 contains a hyperlink.

The function at work:

Копируйте вашу Коллекцию. Убирайте Дубликаты. И подставляете формулу

.

Все просто. У вас ячейка в формате текст поэтому и не отображается формула.

Меняйте ячейки на General ( Общий ? ) потом 2 раза кликнув на ячейку жмите Enter

А также в формулах ошибки? =Учёт_товаров!H8 / ='Учёт товаров'!H9 отсуствует нижнее подчеркивание.

ПС: не загружайте файлы с макросами лучше сделать копию файла и удалить их и так загружать. безопасность и все дела.

=IF(B1="ДА";A1+C1;A1)