作者foolpchome (无乐不做)
看板Visual_Basic
标题[VBA ] Excel新手发问
时间Mon Apr 6 23:32:09 2009
我是刚接触VB的新手，自己看书学的，现在有个问题不知道怎麽解决...
我想做一个小程式，可以一层一层筛选东西（Excel的资料）
Ex：
A B C
1 10 9 3
2 12 7 5
3 15 5 4
↑（这是Excel表格）
1.2.3.列各是一项
A.B是由使用者输入
我的目标是，先从A条件筛选，小於A的，然後从B条件筛选，小於B的，
最後跑出的是3这项，但要显示出C那行的数据，也就是4
我一开始的想法是：（初学，请大家帮忙指正）
Dim X,Y As Integer
X = InputBox("请输入限制一")
Y = InputBox("请输入限制二")
For i = 1 to 3
If sheet.cell(1,i) <= X Then
For j = 1 to 3
If sheet1.cell(2,j) <= Y Then
Print ╴╴╴╴ →这里不知道要怎麽表达4那格
Next j
Else
╴╴╴╴ →这里不知道怎麽表达Do nothing
End if
Next i
Else
╴╴╴╴ →这里不知道怎麽表达Do nothing
End if
我想了很久，看书上只有
If..Then..Else
Select..Case
For..Next
Do..Loop
这几种写法
真的转不太过来...
可以麻烦高手指教一下吗？
感谢您<(_ _)>
若是成功，小弟用微薄的1000P当成谢礼：）
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.119.135.183
1F：→ taylore:看不懂你的条件 但是if直接接end if那else就是do nothing 04/07 22:58
2F：→ foolpchome:哦感谢楼上解了一个疑惑！ 04/07 23:24
3F：→ foolpchome:我的意思是，有三份资料要过滤，而过滤的两项条件是由 04/07 23:27
4F：→ foolpchome:使用者输入，当过滤完以後，跑出全部通过的那项 04/07 23:27
5F：→ foolpchome:但是那项不是被过滤资料的那个数据，而是被过滤资料的 04/07 23:28
6F：→ foolpchome:注解 04/07 23:28
7F：→ foolpchome:不知道这样清楚吗？ 04/07 23:28
8F：推 diolin:修正为.cells(i,1) 和 .cells(j,2), 你要的是 .cells(j,3) 04/09 01:33
9F：→ foolpchome:感谢楼上 04/11 01:17