VBA80集第12集作业上交贴：非空行

yydyzsh · 发表于 2017-11-4 21:40

学习学习

王者之剑 · 发表于 2017-11-5 22:20

我又来啦呵呵

liux2343 · 发表于 2017-11-6 21:15

hjqqq1995 · 发表于 2017-11-7 14:29

yan3li6juan9 · 发表于 2017-11-7 16:22

yan3li6juan9 · 发表于 2017-11-7 16:23

hicckiller · 发表于 2017-11-7 22:27

学习学习。。。。。。。。。。。。。。。。。

不会上树的鱼 · 发表于 2017-11-8 17:01

学习。。。。。。。。。。。。。。

xxyiahou · 发表于 2017-11-10 09:41

学习！！

男子指望 · 发表于 2017-11-15 10:08

Sub ceshi()
Range("b:b").SpecialCells(xlCellTypeConstants).Offset(0, -1) = 1
Columns("c").SpecialCells(xlCellTypeConstants).Offset(0, -2) = 1
Columns(4).SpecialCells(xlCellTypeConstants).Offset(0, -3) = 1
End Sub

		自动登录	找回密码
密码			注册