从VBA

时间:2017-11-21 20:39:04

标签: excel vba excel-vba date

我有一个文件夹,我手动提取数据,但希望自动执行此任务。一个文件夹包含一年中每周的工作簿

PH每日DT WK47.xls
PH每日DT WK48.xls
PH每日DT WK49.xls

在此工作簿中,它具有看起来像这样的信息

日期(col1)值(col2)

星期一#

周二

星期三#

星期四#

星期五#

周六#

星期天#

如果我想从第47周的相应单元格中取出一个值,直到达到下一个星期一 - 在这种情况下是第48周 - 继续这个过程,我怎么能这样做呢?在我的脑海里,这就是我的想法

从PH每日DT WK47.xls中提取周一数据  从每日DT WK47.xls中提取周二数据 *
*
从PH Daily DT WK47.xls中提取周日数据 从PH每日DT WK(n + 1).xls

中提取星期一数据

但显然我们不能在目标文件夹的中间放置一个公式。 Thansk的帮助!如果不够清楚,请告诉我,我会尽力更深入地解释

1 个答案:

答案 0 :(得分:0)

您可以使用以下内容创建“PH Daily DT WK47.xls”:

 filename = "PH Daily DT WK" & weeknumber &".XLS"

其中weeknumber是变量

您可以使用

循环一系列值的周数
  For WeekNumber = 1 to 52

使用这两个想法编写代码,并在遇到问题时通知我们: