如何在多张EXCLE工作表中提取相同表头列中的数据到另一张表中?

我没试过，估计有错，你自己尝试改改
假设工资合计都在第一列
set sht1=thisworkbook.worksheets("sheet1")
set sht2=thisworkbook.worksheets("sheet2")
set sht3=thisworkbook.worksheets("sheet3")
i=1 j=1
do until sht1.cells(i,1)<>""
sht1.cells(i,1)=sht3.cells(j,1)
i=i+1,j=j+1
loop
k=1
do until sht3.cell(k,1)=""
k=k+1
loop
sht2.cells(m,1)=sht3.cells(k,1)
k=k+1,m=m+1