Скачать или смотреть How to consolidate data in excel from multiple worksheets using VBA

how to consolidate data in excel from multiple worksheets using VBA?
In this video, you will learn how to consolidate data in excel from multiple worksheets using VBA.

Sub CombineData()
Dim iRow As Integer
Dim lRow As Integer
Dim sh_Count As Integer

For sh_Count = 2 To Sheets.Count
iRow = Sheet1.Cells(Rows.Count, "A").End(xlUp).Row + 1

'i am using this CurrentRegion.Offset(1, 0) for ignore headers
Sheets(sh_Count).Range("A1").CurrentRegion.Offset(1, 0).Copy
Sheet1.Range("A" & iRow).PasteSpecial xlPasteValues

Application.CutCopyMode = False

Next sh_Count
MsgBox "Master sheet has been updated", vbInformation
End Sub



Website name
AVIT Guru

Website URL
http://www.avitguru.com/

Registration Form
http://www.avitguru.com/avit-guru-cou...

Course URL
Advanced Excel & MIS
http://www.avitguru.com/advanced-exce...

VBA MAcro Automation
http://www.avitguru.com/online-traini...

MS Access Database
http://www.avitguru.com/ms_access_dat...