国产一区二区欧美精品免费-欧美国产日韩在线视频-欧美亚洲国语精品一区二区-欧美激情五月综合啪啪-国产69精品麻豆久久久久-亚洲人成精品久久久久桥网站-欧美刺激肥熟在线视频-十七岁日本免费完整版BD-黑夜在线拖拽不卡第一页

`
閱: 2226 | 回: 2
修改代碼 全部 , 編號:05983 快速回復(fù)
發(fā)表于2024/11/23 15:44:42 樓主 
頭像 等級:初學(xué)者
積分:0
財(cái)富值: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列自動向下添加數(shù)據(jù)

經(jīng)過修改 Cells(a+1,"b"))     在表1 錄入數(shù)據(jù)     表2 數(shù)據(jù)錄入可以成b列或c列顯示沒有問題       問題:數(shù)據(jù)連續(xù)輸入 表2又不能自動向下添加數(shù)據(jù)
我的個性簽名
發(fā)表于 2024/11/25 8:40:17   
頭像 等級:傳說級人物
積分:2734
財(cái)富值:4
身份:普通用戶
vba代碼定制 http://www.microgift.cn/Wo/index.aspx

快速回復(fù)

目前不允許游客發(fā)表,請 登錄 注冊 后再發(fā)貼。