Быстрое чтение из Excel

            #region Открываем книгу, из которой будем брать прайс
            
            openFileXLS.ShowDialog();
            
            Excel.Application xlsApp = new Microsoft.Office.Interop.Excel.Application();
            //xlsApp.Visible = true;
            Excel.Workbook wrBok = xlsApp.Workbooks.Open(
                @openFileXLS.FileName,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing,
                Type.Missing
                );
 
            Excel.Worksheet wrSheet = (Excel.Worksheet)wrBok.Worksheets.get_Item(2);            
    
            #endregion
 
            MessageBox.Show(Search_k(wrSheet, "1000142396").ToString());

        private double Search_k(Excel.Worksheet wrSheet, string key)
        {
            for (int i = 1; i < 15000; i++)
            {
                if (wrSheet.get_Range("D" + i, Type.Missing).Value2 != null)
                {
                    if (key == wrSheet.get_Range("D" + i, Type.Missing).Value2.ToString())
                    {
                        return Convert.ToDouble(
                            wrSheet.get_Range("I" + i, Type.Missing).Value2);
                    }
                }            
            }
 
            return 0;                
        }