удалить повторяющиеся значения в текстовом файле

296
bashma


У меня есть текстовый файл с разделителями табуляции, показывающий сравнение.
как это:

 A B C D  A 1 2 3 4 B 2 1 4 3 C 3 4 1 2 D 4 3 2 1 

Но мне нужно поработать с данными позже в другой программе, которая должна иметь следующую таблицу:

A
B 2
C 3 4
D 4 3 2

Кто-нибудь знает, как я мог бы сделать это с Excel, Terminal или TextWrangler? набор данных действительно огромен, и я не мог сделать это вручную.

0
Я не понимаю, как это определяет, что является дубликатом. Не могли бы вы уточнить? Raystafarian 11 лет назад 2
Вы не указали никаких параметров для определения дубликатов. Jason Bristol 11 лет назад 1

1 ответ на вопрос

1
teylyn

Get the table into Excel. Let the data table start with the blank cell above the A value in cell A1. See the screenshot of the input sheet

Try this macro:

Option Explicit Sub convert() Dim wssrc As Worksheet Dim wstarget As Worksheet Dim i As Long Dim lrow As Long Set wssrc = ThisWorkbook.Worksheets("Sheet1") Set wstarget = ThisWorkbook.Worksheets("Sheet2") wssrc.Activate lrow = Cells(Rows.Count, "A").End(xlUp).Row Debug.Print lrow For i = 1 To lrow wssrc.Range(Cells(i + 1, 1), Cells(i + 1, i)).Copy wstarget.Range("A" & i) Next i End Sub 

This is a screenshot of the input sheet:

enter image description here

This is a screenshot of the output sheet.

enter image description here

Похожие вопросы