Excel 修改代码

格子社区

阅： 1390 | 回： 2

修改代码全部 , 编号:05983

Chenwenke

发表于2024/11/23 15:44:42 楼主

回复楼主

等级:初学者

积分:0

财富值:2.00

身份:普通用户

var a=Worksheets.Item("Sheet2").Cells(Rows.Count,1).End(3).Row;

Worksheets.Item("Sheet1").Range("b2，c2").Copy(Worksheets.Item("Sheet2").Cells(a+1,1));

就是Cells(a+1,1));只能固定在a列，不能修改需要修改成b列或c列自动向下添加数据

经过修改 Cells(a+1,"b")) 在表1 录入数据表2 数据录入可以成b列或c列显示没有问题问题：数据连续输入表2又不能自动向下添加数据

我的个性签名

信步

发表于 2024/11/25 8:40:17

回复2楼

等级:传说级人物

积分:2734

财富值:4

身份:普通用户

vba代码定制 http://www.ffcell.com/Wo/index.aspx

<<<1>>>

快速回复

目前不允许游客发表，请登录注册后再发贴。