vLookup来自突出显示的单元格

Question

我在列中有一些突出显示的单元格，我想根据这些单元格值打开新的工作簿。我可以这样做，但我想在新的工作簿中指定这些单元格的值。 （即小区（2,6））。我可以成功找到细胞，我将使用vlookup。我知道这太复杂了，但我必须解决它。 我用find方法;

Dim rFound As Range 
          With Sheets("Sheet1") 
          Set rFound = .Cells.Find(What:=ResimNo) 
end with 

Answer 1

Dim GCell As Range 

         Set GCell = ActiveSheet.Cells.Find(ResimNo) 




        'Vlookup 

           With twb.Sheets("Sheet1") 
           GCell.Offset(0, 1).Activate 
           GCell.Offset(0, 1).Value = Application.vLookup(ResimNo, tbl.Range, 2, False) 
           GCell.Offset(0, 3).Value = Application.vLookup(.Cells(p, 2), tbl.Range, 4, False) 
           GCell.Offset(0, 4).Value = Application.vLookup(.Cells(p, 2), tbl.Range, 5, False) 


                ActiveWorkbook.Close True 
           End With