[算表] VB选取原档案之资料复制贴上 andy4624 PTT批踢踢实业坊

[算表] VB选取原档案之资料复制贴上

楼主: andy4624 (æ‰¾å·¥ä½œ) 2022-10-27 15:02:51

软件:excel
版本:office 365
我是VB新手，在录制宏，想要用宏将 A档案的库存资讯存入 B档案之中
库存资讯大概是两个资讯，料号及数量
料号数量
100-100-100 50
100-100-200 49
100-100-300 30
因为随着新产品开发，会有新的料号产生，但是若执行宏
只会将原本录制的三列复制到B档案之中 (以上面的例子就是 B2:B4)
想要请问VB有办法写出找到 A栏最后有值的字段 (例如我又进了两个货)
料号数量
100-100-100 50
100-100-200 49
100-100-300 30
100-100-400 20
100-100-500 25
以这个例子，是B2:B6的值复制到 B档案去吗？
不然每次有新产品，我就得进VB去修改，就没有宏的方便性了

作者: suaveness (éœå¤) 2022-10-27 16:50:00

UsedRange 参考看看?如果是新手我觉得先复制全部列数的内容然后把复制后的"料号数量"那列删掉可能比较简单

作者: waiter337 (给开司一罐苏格登) 2022-10-27 20:50:00

r = Columns("A:E").Find("*", , -4163, , 1, 2).Rowr = Columns("B:B").Find("*", , -4163, , 1, 2).Rowdebug.print r

作者: oldbottle (oldbottle) 2022-10-28 11:09:00

〔A65536〕.end (xlup).row先定义A栏最后一列

楼主: andy4624 (æ‰¾å·¥ä½œ) 2022-11-15 15:52:00

后来直接写入B2:B1000 比较符合我现在的能力 XD

继续阅读

[问题] 格式化条件的公式td1139 [算表] EXCEL某栏多列同值筛选出特定栏资讯带出Rita0149 [问题] office365个人版可更换使用者吗JCC [问题] 另存新档后枢纽分析表资料来源问题agaboy1102 [问题] 关于Outlook自动转信设定g8toobig LINE自动大批传送文字及图片southknight Re: [文件] EXCEL 撷取特定位子数字问题ilf0121 [问题] excel多一个删不掉的储存格lohh [问题] index与match的合体，怎么学都学不会asd810208 [问题] Excel 跨表加总Export

[算表] VB选取原档案之资料 复制 贴上

[算表] VB选取原档案之资料复制贴上