- == 系统问题，暂停聊天功能。==
- 【征集】西西河的经济学，及清流措施，需要主动参与者，『稷下学宫』新认证方式，24年网站打算和努力目标
主题：紧急求助 Excel VBA - 在线等 -- 燃起火烧云
共:💬14 🌺7 新:
code没问题，再花谢！
刚才我也逼着写了段代码，好像也行，都是从后倒着往前推：
Sub test()
For i = 400 To 2 Step -1
If Cells(i, 2) = 0 Then
Cells(i, 2).Offset(1, 0).Copy
Cells(i, 2).Select
ActiveSheet.Paste
End If
Next i
End Sub
这段code只是一个一个往前推，最笨的办法，还是兄台的code好。再花谢！
- 相关回复 上下关系8
🙂好像定义有问题 chela 字29 2006-11-29 14:06:28
🙂一般不会 燃起火烧云 字28 2006-11-29 14:08:40
🙂那你试试看这段代码吧 3 chela 字319 2006-11-29 14:12:36
🙂成功了，没问题！再花！
🙂突然想起来一个问题 chela 字58 2006-11-30 06:38:53
🙂是这样。。。 2 燃起火烧云 字112 2006-11-30 10:00:30
🙂呵呵,昨天偶看了以后顺手砸的 1 ☆☆☆ 字148 2006-11-30 10:25:33
🙂回砸 1 chela 字44 2006-11-30 11:01:36