抛砖引玉，VBA编写的简单VBA程序解释器，期待您的进一步完善与改进(最新：进化5)

lbl016 · 发表于 2010-4-7 14:52

你给我发到这儿吗

lbl016 · 发表于 2010-4-7 15:02

你有邮箱吗？我把完整附件发给你好吗？

kevinchengcw · 发表于 2010-4-7 15:04

我无法理解清楚你讲的内容，所以把大于和小于30时的两种情况做成例子发上来，我自己再理解一下，因为你的代码跟你说的好像不符

lbl016 · 发表于 2010-4-7 15:18

好的，你先把修改的代码发过来我看

lbl016 · 发表于 2010-4-7 15:24

你先发过来我看下好吗

kevinchengcw · 发表于 2010-4-7 15:28

我没打算改你的，因为你的我更看不明白，你的需要链接另外几个工作表测试，可是你没有提供，所以我打算自己给你写一个

lbl016 · 发表于 2010-4-7 15:41

原帖由 kevinchengcw 于 2010-4-7 15:28 发表
我没打算改你的，因为你的我更看不明白，你的需要链接另外几个工作表测试，可是你没有提供，所以我打算自己给你写一个

我已经把完整附件发到你的邮箱了。密码：1111

kevinchengcw · 发表于 2010-4-7 15:42

好的，我现在就看

kevinchengcw · 发表于 2010-4-7 15:57

如.Range("f" & 2 + n)小于10就在F2-F12显示Range("m" & j)数据，如果.Range("f" & 2 + n)大于10就在F3-F12显示Range("m" & j)前10个单元格数据，在F16-F25显示Range("m" & j)10以后的单元格数据

我到目前为止最大的困惑就是上面这句，你用一个.Range("f" & 2 + n)这样的变动判断来修改F2-F12这样一个固定区域，则数值可能变动多次，你只能剩下最后的数据，你指的本意是不是一对一个关系，即当前的n对就当前的j

而且，这个.Range("f" & 2 + n)和这个Range("m" & j)都是哪指的哪个页面的数据，封2中M列没有数据

[ 本帖最后由 kevinchengcw 于 2010-4-7 16:09 编辑 ]

lbl016 · 发表于 2010-4-7 16:15

原帖由 kevinchengcw 于 2010-4-7 15:57 发表
如.Range("f" & 2 + n)小于10就在F2-F12显示Range("m" & j)数据，如果.Range("f" & 2 + n)大于10就在F3-F12显示Range("m" & j)前10个单元格数据，在F16-F25显示Range("m" & j)10以后的单元格数据

我到目前为止最大 ...

你要把我的软件完整看下后你就知道了，在楠木表中如果补缴超过11年，就在封2表中显示出错了，我给你发的附件中已经通过公式解决了

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

[分享] 抛砖引玉，VBA编写的简单VBA程序解释器，期待您的进一步完善与改进(最新：进化5)