vba - Concatenate data from multiple Excel sheets into one Excel sheet -
within excel workbook have 5 specific worksheets (different names) want concatenate data different worksheet (master) within same workbook. taking data each sheet , appending bottom of data in "master" sheet. removing blank rows if possible. there macro can this?
there several choices. if need once, don't bother using macro. go each sheet, copy rows, move master sheet, scroll down first empty row, , paste.
assuming need macro this, might work:
sub combinesheets() dim wksht worksheet, mastersht worksheet, r integer set mastersht = worksheets.add r = 0 each wksht in thisworkbook.worksheets if not wksht mastersht wksht.usedrange.copy destination:=mastersht.cells(r + 1, 1) r = mastersht.usedrange.rows.count end if next wksht end sub
Comments
Post a Comment