Copy data from another Workbook through VBA

by

The best (and easiest) way to copy data from a workbook to another is to use the object model of Excel.

Option Explicit
Sub test()
    Dim wb As Workbook, wb2 As Workbook
    Dim ws As Worksheet
    Dim vFile As Variant

    'Set source workbook
    Set wb = ActiveWorkbook
    'Open the target workbook
    vFile = Application.GetOpenFilename("Excel-files,*.xls", _
        1, "Select One File To Open", , False)
    'if the user didn't select a file, exit sub
    If TypeName(vFile) = "Boolean" Then Exit Sub
    Workbooks.Open vFile
    'Set targetworkbook
    Set wb2 = ActiveWorkbook

    'For instance, copy data from a range in the first workbook to another range in the other workbook
    wb2.Worksheets("Sheet2").Range("C3:D4").Value = wb.Worksheets("Sheet1").Range("A1:B2").Value
End Sub

More Related Contents:

  1. to make this code simpler
  2. VBA code takes long time to execute in excel
  3. Find text and show value if condition is met
  4. Excel VBA deleting rows in a for loop misses rows
  5. VBA – destroy a modeless UserForm instance properly
  6. What is the lifetime of a global variable in excel vba?
  7. Download attachment from Outlook and Open in Excel
  8. What is the most efficient/quickest way to loop through rows in VBA (excel)?
  9. Embed picture in outlook mail body excel vba
  10. Excel VBA Load worksheet in Function
  11. Searching an excel with two search words (multiple lookup) using vba macro [closed]
  12. Excel VBA – Combine rows with duplicate values in one cell and merge values in other cell
  13. Load csv file into a VBA array rather than Excel Sheet
  14. Insert line break in wrapped cell via code
  15. Change color of certain characters in a cell
  16. Combine multiple Excel workbooks into a single workbook
  17. Want VBA in excel to read very large CSV and create output file of a small subset of the CSV
  18. Copy filtered data to another sheet using VBA
  19. VBA Macro crashes after 32000 rows
  20. How to create dynamic variable names VBA
  21. How to break a long string into multiple lines
  22. Read VBA macros (or vbaProject.bin) of an Excel file without opening it in MS Excel [closed]
  23. simple vba code gives me run time error 91 object variable or with block not set
  24. Calling regasm without administrative rights for COM interop in Excel VBA
  25. Is there a way for DIR(path) in VBA to handle strings longer than 260?
  26. How do I activate a specific workbook and a specific sheet?
  27. Start VBA macro when editing a cell
  28. VBA Run-time error 438 appears when “paste” runs
  29. If Not function proceeds when value *is* the one specified
  30. Copy an entire worksheet to a new worksheet in Excel 2010

Leave a Comment