انتقال اطلاعات از آرایه تک بعدی به اکسل

[f_g1348]

سلام دوستان
من در برنامه ام یک آرایه تک بعدی دارم که میخواهم به اکسل انتقالش بدهم
ممنون میشم اگه کسی کمک کنه

[f_g1348]

دوستان کسی نیست راهنمایی کنه !؟

[f_g1348]

با سلام
من کد زیر رو امتحان کردم و جواب داد

double[] up = new double[sen_conter-1 ];

            for (int i = 0; i < sen_conter-1; i++)

            { 

                    up[i] = matrix_mojaverat[i+1, i];

                

            }  

            //خروجی آرایه بالای قطر به اکسل

           Microsoft.Office.Interop.Excel .Application oExcel = new Microsoft.Office.Interop.Excel.Application();

           Microsoft.Office.Interop.Excel._Workbook oWorkBook;

           Microsoft.Office.Interop.Excel._Worksheet oSheet;



           GC.Collect();



           oExcel = new Microsoft.Office.Interop.Excel.Application();



           oExcel.Visible = false;

           oWorkBook = (Microsoft.Office.Interop.Excel._Workbook)(oExcel.  Workbooks.Add(Missing.Value));

           oSheet = (Microsoft.Office.Interop.Excel._Worksheet)oWorkBo  ok.ActiveSheet;

         



           for (int j = 0; j < up.GetLength(0); j++)

           {

               oSheet.Cells[j + 1] = up.GetValue(j);



           }

           if (sfd.ShowDialog() == DialogResult.OK)

           {

               string strFile = ".xls";

               sfd.Title = "ذخیره بردار مقادیر بالای قطر اصلی";



               string destName = sfd.FileName;

               oWorkBook.SaveAs(destName + strFile, Microsoft.Office.Interop.Excel.XlFileFormat.xlWork  bookNormal, null, null, false, false, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.  xlExclusive, false, false, null, null, null);

               oWorkBook.Close(null, null, null);

               oExcel.Workbooks.Close();

               oExcel.Quit();

               System.Runtime.InteropServices.Marshal.ReleaseComO  bject(oExcel);

               System.Runtime.InteropServices.Marshal.ReleaseComO  bject(oSheet);

               System.Runtime.InteropServices.Marshal.ReleaseComO  bject(oWorkBook);

               oSheet = null;

               oWorkBook = null;

               oExcel = null;

           }

           GC.Collect();