MS Excel - 通过获取第一个colmn

时间:2016-11-22 16:11:38

标签: excel vba excel-vba excel-formula

我有2张excel工作簿,每张都有一张。每张工作表都有一列唯一代码。第一个有大约1000行,如

COLUMN 1
1
2
3
4
.
.
.
1000

,第二个就像

COLUMN 2
a
b
c
d
.
.
.
r

我想把它们放在像

这样的单张纸上
COLUMN 1          COLUMN 2
1                 a
1                 b
1                 c
1                 d
1                 e
1                 f
1                 g
1                 h
1                 i
1                 j
1                 k
1                 l
1                 m
1                 n
1                 o
1                 p
1                 q
1                 r
2                 a
2                 b
2                 c
.                 .
.                 .
.                 .
.                 .
1000              p
1000              q
1000              r

请建议我该怎么做?

1 个答案:

答案 0 :(得分:0)

使用公式:

在Sheet3上的A1:

var workbook = new Workbook("Erstfassung.xls");
var pagesSoFar = 0;

foreach (var worksheet in workbook.Worksheets)
{
    var pageCount = worksheet.GetPrintingPageBreaks(new ImageOrPrintOptions()).Length;
    Console.WriteLine($"{worksheet.Name} - ({pageCount} long), starts from {pagesSoFar}");
    pagesSoFar += pageCount;
}

在Sheet3上的B2:

=INDEX(Sheet1!A:A,INT((ROW(1:1)-1)/COUNTA(Sheet2!A:A))+1)

然后复制。

enter image description here