Aqui está um exemplo para você começar no lado do VBA. Eu criei uma pasta de trabalho que possui dois campos, fornecedor e o local do arquivo. Também criei um subprocesso de VBA que abrirá o arquivo de texto e substituirá qualquer linha que = o número do fornecedor por um carro de retorno no final dele e substituirá o valor por nada (""):
Sub Remove_line_item()
Dim myFile As String, text As String, textline As String, posLat As Integer, posLong As Integer
myFile = Range("B2").Value
myFile = Application.GetOpenFilename()
Open myFile For Input As #1
Do Until EOF(1)
Line Input #1, textline
text = text & textline
Loop
text = Replace(text, Range("A2").Value & ChrW(14), "")
myFile.Write text
myFile.Close
End Sub
Eu usei apenas um caminho de arquivo por vez, mas você poderia ir além e percorrer todos os arquivos de texto em um diretório também. Este pode ser um bom começo para você, se bem que espero.