.按ALT+F11调出VBA窗口,插入一个模块,然后把下面的代码复制进去SubMacro1()DimdstSheetAsWorksheetDimsrcSheetAsWorksheetDimdstRowsAsLongDimsrcRowsAsLongApplication.DisplayAlerts=FalseSetdstSheet=Sheets(1)dstRows=dstSheet.Cells.SpecialCells(xlLastCell).RowdstSheet.ActivateWhileSheets.Count1SetsrcSheet=Sheets(2)srcRows=srcSheet.Cells.SpecialCells(xlLastCell).RowsrcSheet.Rows(1
Copyright © 2018-2021 Wenke99.com All rights reserved
工信部备案号:浙ICP备20026746号-2
公安局备案号:浙公网安备33038302330469号
本站为C2C交文档易平台,即用户上传的文档直接卖给下载用户,本站只是网络服务中间平台,所有原创文档下载所得归上传人所有,若您发现上传作品侵犯了您的权利,请立刻联系网站客服并提供证据,平台将在3个工作日内予以改正。