Copy Columns from one Workbook into another, looping through sheets 6 to the last in the worksheet. Error message Compile Error: Duplicate declaration in current scope Sub CopyaColumnToWorkbook() Dim SourceWkb As Excel.Workbook Dim TargetWkb As Excel.Workbook Set SourceWkb = Workbooks.Open("I:\Documents\Transactional FX\Michael Kyte Projects\VBA.xlsm") Set TargetWkb = Workbooks.Open("I:\Documents\Transactional FX\Michael Kyte Projects\VBA1.xlsm") Dim SourceColumn As Range Dim TargetColumn As Range Set SourceColumn = SourceWkb.Worksheets(s).Columns("e:g") Set TargetColumn = TargetWkb.Worksheets(t).Columns("e:g") Dim ws_sourcecount As Integer
This question generated 9 answers. To proceed to the answers, click here.
This thread is current as of October 23, 2017.
For more resources for Microsoft Excel:
This article includes the following tags:
- Microsoft Excel