Boa noite, pessoal

Estou tendo problemas com um código que escrevi em VBA e gostaria de uma ajuda para melhorar o código.
Tenho uma planilha que é baseada em uma variável chamada g/c, que é uma variável de 6 caracteres. No meu departamento existem aproximadamente 15 colaborares que possuem uma planilha onde eles preenchem dados dos clientes (que são identificados pelo g/c). Todas as planilhas destes funcionários ficam em um arquivamento em nuvem. Tenho que criar uma planilha "Líder" pata o chefe do departamento, onde ele consegue carregar os dados de todas as outras planilhas. Os problemas surgem com as duplicatas. Muitos colaboradores atendem os mesmos clientes e registram o g/c na suas planilhas e, na hora de carregar os dados na planilha do Líder, existem centenas de duplicatas que, mesmo com dados diferentes, fazem parte do mesmo processo e eu acabo com um quebra cabeças gigante. Criei um código para eliminar as duplicatas, porém, ele para de rodar quando encontra a primeira delas e encerra a macro.
Segue o Código:

 iListCount = Sheets("Automóveis").Range("A1:A10000").Rows.Count
        Sheets("Automóveis").Range("A3").Select

        Do Until ActiveCell = ""
   
           For iCtr = 1 To 10000

              If ActiveCell.Row <> Sheets("Automóveis").Cells(iCtr, 1).Row Then
                 If ActiveCell.Value = Sheets("Automóveis").Cells(iCtr, 1).Value Then
      
                        
                          If Cells(iCtr, "i") <> "" Then
                            Cells(iCtr, "i").Copy
                            Cells(ActiveCell.Row, "i").PasteSpecial
                            
   
                            End If
                       iCtr = iCtr + 1
                 End If
              End If
           Next iCtr

           ActiveCell.Offset(1, 0).Select
        Loop
        Application.ScreenUpdating = True
        

Este é o teste que fiz para 1 coluna. Anexei uma imagem para um exemplo de o que eu quero fazer. Na imagem, observe os códigos em destaque (na coluna B), como o 0001230050. Na parte de cima da linha cinza (que representa os dados originais)ele esta duplicado, mas possui datas diferentes em cada registro. Eu gostaria de unificar as datas dos dois registros em apenas uma única linha, como mostrado na parte de baixo da linha cinza.