时间戳

首页 > 解决方案 > 在文件之间复制列的宏

excel - 在文件之间复制列的宏

问题描述

我正在尝试将列从一个文件复制到另一个文件，但不断收到运行时错误。我认为问题出在文件路径上。它位于共享工作站上，但我将文件保存到我的用户桌面。我需要对文件路径进行更改吗？谢谢

Sub PlatingSheet()

Dim sourceColumn As Range, targetColumn As Range

Set sourceColumn = Workbooks("\\in-ge-file\users\tbever\Desktop\VBA\Plating 
Sheets\Copy - 24605_17 QC Results and Notes.xlsm").Worksheets(1).Columns("A")

Set targetColumn = Workbooks("\\in-ge-file\users\tbever\Desktop\VBA\Plating 
Sheets\Copy - 1.1Unified_Plating_Template.xlsm").Worksheets(1).Columns("A")
sourceColumn.Copy Destination:=targetColumn

End Sub"

标签： excelvba

解决方案

工作簿被他们的Namenot there引用FullName。

Sub PlatingSheet()

    Dim sourceColumn As Range, targetColumn As Range

    Set sourceColumn = Workbooks("Copy - 24605_17 QC Results and Notes.xlsm").Worksheets(1).Columns("A")
    Set targetColumn = Workbooks("Copy - 1.1Unified_Plating_Template.xlsm").Worksheets(1).Columns("A")
    sourceColumn.Copy Destination:=targetColumn

End Sub

推荐阅读