2013-07-25 54 views
0

搜索一系列連續的行單元格的工作表中的在工作表中搜索一系列連續的行單元格

h1 h2 h3 h4 h5    h1 h2 h3 h4 h5 
    1 2 3 6 7    1 2 3 8 9 
    2 2 2 4 5    3 3 3 2 1 
    table 1     table 2 

我如何編寫一個循環來搜索前三個單元格表2的每一行,在表1?因爲表格具有相同的格式。

範圍和細胞不似乎做的工作,因爲我不能使用他們

+0

您需要更具體的反 - 做所有三個單元格要匹配,還是什麼? –

+0

因此,我開始選擇1 2 3(只有這三個值),並在表1中的每一行中搜索它,如果它是完全相同的值和完全相同的順序(如表1中的第1行),則匹配@Tim Williams – user2600411

+0

然後我對錶2中的每一行都做同樣的事情@ Tim Williams – user2600411

回答

0
Dim tlb1 as range,tbl2 as range 
dim rw1 as range, rw2 as range 

set tbl1=Range("your table1 range here") 
set tbl2=Range("your table2 range here") 

for each rw1 in tbl1.rows 
    for each rw2 in tbl2.rows 
     if rw1.cells(1)=rw2.cells(1) and rw1.cells(2)=rw2.cells(2) _ 
      and rw1.cells(3)=rw2.cells(3) then 
      'do whatever you want to do on match... 
      'Exit For 'if you want to stop when you find the first match... 
     end if 
    next rw2 
next rw1 
+0

這看起來不錯。如果我比較的行不在同一行lvl上,我將如何修改它?就像在tbl1的row2中匹配表2中的row1一樣。@TimWilliams – user2600411

+0

你試過了嗎?表2中的每一行都應該已經檢查了表1中的每一行。 –

相關問題