2016-03-07 84 views
0

我有以下常用技术指标在文件夹AA中的多个excel文件: - 在工作表1中,单元格N10具有特定日期 - 在工作表2中,范围D10:F49有数据,但这个范围内的最后一个底部的单元格可能为空从Excel中的多个文件中的多个工作表中选择多个单元格

在现有工作表中,我需要复制第一列中的特定日期,并在接下来的三列中包含数据的范围中的单元格。日期必须位于相对于数据范围的每一行中。

例如,

我有这样的:

enter image description here

我需要这样的:

enter image description here

中的图像,你可以看到的1数据的示例文件,但我需要它几个... 我需要这个工作表来更新当我保存新AA文件夹中的文件。这可以做到吗?

+2

欢迎来到SO!由于唯一提出的问题是**可以这样做吗?** - 答案是肯定的!请阅读[如何提问](http://stackoverflow.com/help/how-to-ask)以获得对SO最有效的帮助。 –

+0

这些看起来像相同的图片 – Davesexcel

+0

请看单元格名称。图1是AA文件夹中包含的许多文件中的数据(N10来自另一张表)。图2是摘要文件应该调用那个文件的特定信息的方式。 – jcsp2000

回答

0

只需设置您的范围和工作簿。

Dim wkbk1 As Workbook 
Dim wkbk2 As Workbook 

' be sure to add the path if the workbook isn't in your working directory 
Set wkbk1 = workbooks("Workbook1.xlsx") 
Set wkbk2 = workbooks("Workbook2.xlsx") 

Dim range1 As Range 
Dim Range2 As Range 

Set Range1 = wkbk1.Range("A1:B234") 'or whatever 
Set Range2 = wkbk2.Range("A1:B234") ' you should get the picture by now... 

需要数据数组?试试这个..超级简单。现在,你有你的数据宣布

Dim data As variant 
data = Range1 

OK,参考这个职位在一个完整的电子表格的目录循环...... Loop through files in a folder using VBA?

你现在应该有工具来走了。如果您想获得更多帮助,请添加评论。

+0

thanx为您的答案,但即时通讯soo很多新手,我不太明白... – jcsp2000

+0

然后只是继续阅读源文件! :) –

相关问题