[已解决]我的本地窗口打不开了

zld0807

为什么我的本地窗口打不开了，如何解决？另外请帮忙修改下代码，把序号编编上在L列。

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2013-5-25 20:26

1. Sub test()
   
2.     Dim M, X
   
3.     M = 0
   
4.     X = 1
   
5.     Do While X < Range("A65535").End(xlUp).Row
   
6.         If Range("A" & X) = Range("A5") Then
   
7.             Range("J" & X) = M + 1
   
8.             M = M + 1
   
9.         End If
   
10.         X = X + 1
    
11.     Loop
    
12. End Sub

复制代码

跳转到最佳答案楼层

无聊的疯子

看不懂你要做啥。。。。

你所传的附件与 本地窗口打不开 没关系吧，附件中又没有说明。。。。

zld0807

帮忙把附件改改也行  老师

zld0807

我现在打不开本地窗口，不太好调试那个结果，只知道进入了一个死循环。

zld0807

最好两个问题能一起解决了最好。

hwc2ycy

这个题目我好像贴过答案嘛。

hwc2ycy

本地窗口如果看不到，在VBE中点菜单视图，本地窗口就OK了。

zld0807

主要是老师你的方法对我来说不太会用 ，自己整了一下。。。。。

zld0807

我就想用do loop进行循环判断，而且我对数组比较陌生。。。。。。。

无聊的疯子

zld0807 发表于 2013-5-25 18:27
我就想用do loop进行循环判断，而且我对数组比较陌生。。。。。。。

为何不直接说明你要达到一个什么效果呢？？