انتخاب و کپی برداری از محدوده های چند بعدی (FillAcrossSheets)

با استفاده از FillAcrossSheets می توانید محدوده یک کاربرگ را در دیگر کاربرگهای مختلف کپی کنید.

مراحل:
     یک آرایه ایجاد کنید و به عنوان عناصر آرایه ، چندین برگه کاری (که در آن داده ها را کپی کنید) اختصاص دهید.
     طیف وسیعی از برگه اصلی را کپی کرده و با استفاده از FillAcrossSheets آن را به سایر برگه ها بچسبانید.

Function FnFillAcrossSheets()
         arrCombinedArray = Array("Sheet2", "Sheet3", "Sheet4")
         Sheets(arrCombinedArray).FillAcrossSheets.Worksheets("Sheet1").Range("A1:B5")
End Function

این تابع داده های A1 تا B5 را از برگ 1 کپی می کند و همان داده ها را در "Sheet2" ، "Sheet3" ، "Sheet4" پر می کند.