excel vba how to copy the value of multiple non-contiguous ranges into an array

by

Don’t know what was wrong with your union, but it would have created the same range, which you stated in your first attempt.

The problem is, you have now multiple areas. Which you can, and as far as I know, has to address now.

Here is an example, which will resolve in an array of all areas, without adding each cell individually, but adding each area individually to the summary array:

Public Sub demo()
  Dim summaryTempArray() As Variant
  Dim i As Long

  With Tabelle1
    ReDim summaryTempArray(1 To .Range("A2:D9,A11:D12,A14:D15").Areas.Count)

    For i = 1 To .Range("A2:D9,A11:D12,A14:D15").Areas.Count
      summaryTempArray(i) = .Range("A2:D9,A11:D12,A14:D15").Areas(i)
    Next i
  End With

End Sub

Hope this helps.

More Related Contents:

  1. Print function selecting wrong Type of Change option excel vba
  2. Format Cell Contents
  3. Excel formula checklist in employees
  4. How do I put double quotes in a string in vba?
  5. What is the difference between .text, .value, and .value2?
  6. How can I URL encode a string in Excel VBA?
  7. What is the difference between “Form Controls” and “ActiveX Control” in Excel 2010?
  8. How can I create a progress bar in Excel VBA?
  9. VBA rounding problem
  10. VBA – Write all possible combinations of 4 columns of data [duplicate]
  11. Pasting an Excel range into an email as a picture
  12. Remove duplicates from array using VBA
  13. 2 ways for “ClearContents” on VBA Excel, but 1 work fine. Why? [duplicate]
  14. Excel 2013 VBA Clear All Filters macro
  15. How to automatically insert a blank row after a group of data
  16. Rounding in MS Access
  17. Sum function in VBA
  18. Excel error 1004 “Unable to get …. property of WorksheetFunction class” appearing inconsistently
  19. How can I install/use “Scripting.FileSystemObject” in Excel 2010 for MAC?
  20. How to save Excel Workbook to Desktop regardless of user?
  21. Excel VBA User Defined Function that counts cells with conditional formatting
  22. How to add an attachment to an email using VBA in Excel
  23. Get Timezone Information in VBA (Excel)
  24. How to change Format of a Cell to Text using VBA
  25. Excel is calculating a formula with a VBA function as an error unless it is re-entered
  26. Excel VBA Run-time error ’13’ Type mismatch
  27. ThisWorkbook.FullName returns a URL after syncing with OneDrive. I want the file path on disk
  28. Importing Excel spreadsheet data into another Excel spreadsheet containing VBA
  29. How to highlight selected text within excel
  30. How to fix a VBA “type mismatch” error after switching to 64-bit Excel

Leave a Comment