| Be the first user to complete this post  | Add to List | 
VBA-Excel : 3D-Ranges – FillAcrossSheets Method
By using FillAcrossSheets you can copy the Range of one worksheet to other multiple worksheets.
Steps:
- Create an array and assign multiple worksheets names ( in which the data to be copied), as an array elements.
- Copy the range of main worksheet and paste it to the other sheets using FillAcrossSheets.
Function FnFillAcrossSheets()
         arrCombinedArray = Array("Sheet2", "Sheet3", "Sheet4")
         Sheets(arrCombinedArray).FillAcrossSheets.Worksheets("Sheet1").Range("A1:B5")
End Function 
This function will copy the A1 to B5 Range of data from sheet1 and fill the same data in "Sheet2", "Sheet3", "Sheet4"
Also Read:
- VBA Excel – Looping Through a Range of Cells
- VBA-Excel: Create Array using Array() Function
- VBA-Excel: Copy/Paste data - Copy the Entire row data and paste it to another row
- VBA-Excel: Clear data from Excel Sheet(WorkSheet)
- VBA-Excel: String Functions – Replace()
 
    