做好了“1号”工作表，K1单元

只看楼主
收藏
回复

LLJ无帆的小船
见E勇为
7

做好了“1号”工作表，K1单元格填的是日期，然后用VBA跑出 2号至 31号，然后2号至 31号表头单元格K1跑出2016-7-2至2016-7-31 然后还有一个就是当前工作表C2:C98引用上一工作表的C2:C98. 求总的代码

xzk235
以E待劳
10

你这真是拿来主义了，你把前面的代码贴出来我也好改啊，懒的去翻前面的帖子

xzk235
以E待劳
10

Sub 宏1()
For i = 2 To 5
Sheets("1号").Copy After:=Sheets(i - 1 & "号")
ActiveSheet.Name = i & "号"
Sheets(i & "号").Range("k1") = Sheets(i - 1 & "号").Range("k1") + 1
Sheets(i & "号").Range("C2:C98").FormulaR1C1 = "=" & i - 1 & "号!rc"
Next
End Sub

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

贴吧页面意见反馈
违规贴吧举报反馈通道
贴吧违规信息处理公示

7回复贴，共1页

<<返回excel吧

分享到:

日	一	二	三	四	五	六