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:

1. VBA-Excel: Delete Blank Rows from Excel Work Sheet
2. VBA-Excel: Convert Numbers (Rupees) into Words OR Text - Updated Till 1000000 Crore With Decimal Numbers
3. VBA-Excel: Array Functions – Split()
4. VBA-Excel: String Functions – String()
5. Introduction to Excel WorkBook