VBA Code to import Multiple column fron one sheet to another

[Smoulder]

Hi,
I am trying to import a few columns from one excel spreadsheet to another. Below is the code that I have found on a forum which is working fine. the only problem I am facing is it is importing only one column.can someone please guide how I can edit the code so that I can importing multiple columns

Importing single Column
Sub CopyColumnToWorkbook()
Dim sourceColumn As Range, targetColumn As Range

Set sourceColumn = Workbooks("Source.xlsm").Worksheets("2017"). Columns(“A”)
Set targetColumn = Workbooks("Target.xlsm").Worksheets("Field WH Projections").Columns(“A”)

sourceColumn.Copy Destination:=targetColumn
End

Thanks

 

[bsquad]

are you looking to copy a fixed number of columns or the last column with data?
-if its fixed
--just change your last part of your first declarations from .Columns("A") to

.Columns("A:Z")

if its variable and need to take the last column with data

Set sourceColumn = workbooks("Source.xlsm").Worksheets("2017").Range("A1", Range("A" & Range("A" & Rows.Count).End(xlUp).Row).End(xlToRight))

I believe that should work, but let me know if you have issues