使用VBA复制和粘贴公式

-1

我是VBA的新手。我有一个文件，它有一个公式，并希望在不同的工作簿上复制相同的文件。包含公式的文件具有固定名称，而其他文件将具有不同的文件名。公式复制后，我也想将它移动到另一个文件夹。使用VBA复制和粘贴公式

我有超过300个excel文件来执行这个任务，我想知道如果VBA可以帮助我做到这一点。

请帮忙!! 事先感谢您。

2016-02-28 Navin

@ David912谢谢你的时间和耐心。我仍然失去了我的朋友。让我解释。假设我有一个文件夹，其路径为C：\ Users \ navinc \ Desktop \ test，其中包含我的所有文件名为1到300的excel文件。我有一个文件Book1，它包含范围内的公式（“E1：G1”），它是保存在路径C：\ Users \ navinc \ Desktop \ master \ Book1.xlsxm中。我想将Book1中范围E1：G1中的公式复制到文件夹C：\ Users \ navinc \ Desktop \ test中的所有文件中。你怎么做呢？我很抱歉打扰你... – Navin

试试看看这个代码。

Sub LoopThroughFiles() 

'DECLARE AND SET VARIABLES 
Dim wbk As Workbook 
Dim Filename As String 
Dim Path As String 
Path = "C:\..." 'Enter path of XLS direcroty 
Filename = Dir(Path & "*.xlsm") 
'-------------------------------------------- 
'OPEN EXCEL FILES 
Do While Len(Filename) > 0 'IF NEXT FILE EXISTS THEN 
Set wbk = Workbooks.Open(Path & Filename) 
' 
' CODE GOES HERE 
' 
wbk.Close True 
Filename = Dir 
Loop 
End Sub

来源

2016-02-28 10:05:08 David912

912谢谢你的时间和耐心。 – Navin

使用VBA复制和粘贴公式

回答

相关问题