excel中如何将sheet1至sheet10上的内容快速复制到sheet11,表头的内容是一样的。请各位大侠帮帮忙,急急
excel中如何将sheet1至sheet10上的内容快速复制到sheet11,表头的内容是一样的。请各位大侠帮帮忙,急急
日期:2013-03-31 08:54:46 人气:1
EXCEL:一个工作薄中多个工作表合并代码
在EXCEL中打开宏,将下列代码进行粘贴并保存。然后返回你需要合并的工作表中,运行此宏,看看效果吧。
Sub 合并sheets()
n = 11 '源表个数,根据需要修改!
nstart = 9 '每个单表数据的开始行数,根据需要修改!
k = nstart '目标表的行标
For i = 1 To n
irow = nstart '行标
While Sheets(i).Cells(irow + 1, 2)
