作者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