使用vba转换数据表的结构

时间:2017-03-14 12:03:40

标签: excel vba excel-vba

我正在尝试使用vba将Excel中的现有数据表(表1)转换为新数据表(表2)。数据代表一个活动列表和相应的前辈,我希望它是2列而不是多列。如何将表1转换为表2?

     Table 1:      Table 2:
A                 A
B   A             B   A
C   B   A         C   B
D                 C   A
E   A   D   C     E   A
                  E   D
                  E   C

enter image description here

enter image description here

1 个答案:

答案 0 :(得分:1)

我做这样的事情(伪代码):

int n = 2  // operator for tracking your row index
for i = 1 to end of rows
    for j = 2 to end of column
        if cell(i,j) == empty
            do nothing
        else
            copy cell(1, i) to new table location (column 6, now n)
            copy cell(j, i) to new table location (column 7, row n)
            n = n+1
        end
    end
end

请注意第6栏和第7栏是指新表的位置。