作者cara5659 (傻傻)
看板Office
标题[问题] 程式码修正请教
时间Tue Nov 17 14:10:16 2020
(若是和其他不同软体互动之问题 请记得一并填写)
软体:excel2010
板大好~
A活页簿是流水帐
用B活页簿汇整特定资料
指定B活页簿J4爲条件指定,
A活页簿的日期与J4相同时则把该笔贴入B活页簿,目前修改程式码卡关,请求板大建议。
谢谢
https://i.imgur.com/VWsrhFY.jpg
https://i.imgur.com/cqGU9pK.jpg
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 27.242.191.59 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1605593418.A.BCE.html
1F:→ soyoso: 回圈以do while...loop的话,改do while bj<>"" 11/17 14:36
2F:→ soyoso: if bj = range("j4") then 11/17 14:36
3F:→ soyoso: set RNG... 11/17 14:36
4F:→ soyoso: workbooks(...).sheets("database")... 11/17 14:36
5F:→ soyoso: endif 11/17 14:36
6F:→ soyoso: i=i+1 11/17 14:36
7F:→ soyoso: .... 11/17 14:36
8F:→ soyoso: if..endif内的动作并没有修改任何地方 11/17 14:37
10F:→ soyoso: 另外,1.不是database分页,这是工作表,excel分页和工作 11/17 14:42
11F:→ soyoso: 表所指是不同的东西 11/17 14:42
12F:→ soyoso: 2.如果有栏列号或用於表示栏列号的话(如"A","J4",i=2),截 11/17 14:42
13F:→ soyoso: 图上就要截取到栏列号 11/17 14:42
14F:→ cara5659: 谢谢板大指导,程式码已可以如愿运行 11/17 16:34