问题：复制EXCEL表的部分内容，粘贴（追加）到另一个EXCEL表中。具体要求是：打开化生政4951.xlsx，A1单元格中有“提醒：与你最匹配的位置：第　58　行”，就取第58行的前后10行A48:H68的内容复制，然后粘贴到结果表的B到I列，A列为表名化生政4951。再打开第二张理地技120360.xlsx，复制A1270：H1290的内容追加到结果表的B22：I42，A22:A42为表名理地技120360。以此类推。有500多张表，需要一个循环。
麻烦各位大佬啦！

吹版，搜到过您的代码，很精致，还在消化中

fyyylyl大侠，复制代码，执行，直接出理想的结果！非常非常感谢！！

经测试，EXCEL已用行数的计算可能有问题。第一次打开结果表（空表）的时候，显示已用行数是1，粘贴在B2单元格（21条记录）；粘贴第二张表的时候，显示已用行数是21，其实应该是22，少计了一行，结果粘贴在了B22（应该在B23），把前面粘贴的最后一条记录覆盖了。
是不是EXCEL默认空表就已经使用了一行，但后续又没把这条计入呢？
我现在是加了一个 if nRowCounts=1 的判断来解决的。
各位能否测试一下，是不是存在这个情况？
win10,vfp9,EXCEL2007。