Excel Как я могу сначала найти совпадение, а затем разделить часть строки и создать столбец в конце строки? - PullRequest
0 голосов
/ 13 февраля 2019
32P 32P 9/10/2019   9/13/2019                       
32P 32P 9/24/2019   9/27/2019                       
38G 38G 9/10/2019   9/13/2019                       
38G 38G 9/25/2019   9/30/2019                       
3D5 3D5 9/3/2019    9/6/2019                        
3D5 3D5 9/10/2019   9/13/2019

Я хочу объединить эту таблицу, чтобы в ней не было строк с одинаковой трехбуквенной группировкой, и создать больше столбцов в конце строки для размещения данных.

Есть ли VBAили формула, которая сама по себе может выглядеть так?

32P 32P 9/10/2019   9/13/2019   9/24/2019   9/27/2019                                           
38G 38G 9/10/2019   9/13/2019   9/25/2019   9/30/2019                                           
3D5 3D5 9/3/2019    9/6/2019    9/10/2019   9/13/2019                   

1 Ответ

0 голосов
/ 13 февраля 2019

Работайте снизу вверх и удаляйте повторяющиеся строки после перемещения дат вверх.

Не забудьте сначала отсортировать данные.

dim i as long
with sheet1
  for i=.cells(.rows.count, 1) to 2 step -1
    if .cells(i, 1)=.cells(i-1, 1) then
      .cells(i-1, 5).resize(1, 2) = .cells(i, 3).resize(1, 2)
      .cells(i, 3).entirerow.delete
    end if
  next i
end with
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...