作者AirRider (又怎麽了)
看板Office
标题[算表] 如何跨档案存取?
时间Mon Oct 15 17:54:04 2018
软体:excel
版本:2016
有两个excel档案
A档案会从资料库取资料(该VBA档无法编辑...)
B档案有参数
将参数输入至A档案特定位置(在此为特定日期)
执行A的VBA取资料动作
再将特定位置所计算的答案回存至B档案
A档案内容
A B C D E F
1
20181015 11 22 33
=average(B1:D1) =sum(B1:D1)
在A1输入B档案的A行日期,执行A档案VBA更新取得最新的B1 C1 D1
E1,F1 是特定公式计算後的答案,回传至B档案对应位置
B档案内容
A B C
1 20181011 18 54
2 20181012 19 57
3 20181013 20 60
4 20181014 21 63
5
20181015 22 66
有很多笔日期,请问有无办法在不变动A档案VBA的状况下
从B档案抓日期--更新资料--回传E F资料回B
这要写巨集?还是?麻烦各位高手了
亦或是...
在A档案手动输入日期,答案回存至B
每在A输入一次後就在B新增一列回传值
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.34.235.142
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1539597246.A.366.html
※ 编辑: AirRider (114.34.235.142), 10/15/2018 17:58:18
1F:→ soyoso: 不动a档案vba下,写个程序来抓b档日期,如是最後一笔有值 10/15 18:04
2F:→ soyoso: 值资料range.end、range.find,如连续的话工作表函数 10/15 18:05
3F:→ soyoso: count、counta;取得後,call(或省略) a档原vba(如果是程 10/15 18:06
4F:→ soyoso: 序)的话;如是触发事件的话则可能不用。最後再将运算後的 10/15 18:07
5F:→ soyoso: 值写入b档指定的储存格内 10/15 18:08
6F:→ soyoso: 其他如开启活页簿(b档)workbook.open,取得列号range.row 10/15 18:09
7F:→ AirRider: 有点超出能力范围的解答,仍然感激您的回覆 10/15 19:44