web-dev-qa-db-ja.com

Microsoft.Office.Interop.Excelを使用してExcel 2010からデータを読み取る

Excelでデータを読み取ることができません。私が使用しているコードは次のとおりです。

using Excel = Microsoft.Office.Interop.Excel;

Excel.Application xlApp = new Excel.Application();
Excel.Workbook xlWorkbook = xlApp.Workbooks.Open(@"Book1.xlsx", 0, true, 5, "", "", true, Excel.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);
Excel._Worksheet xlWorksheet = (Excel._Worksheet)xlWorkbook.Sheets[1];
Excel.Range xlRange = xlWorksheet.UsedRange;

int rowCount = xlRange.Rows.Count;
int colCount = xlRange.Columns.Count;

for (int i = 1; i <= rowCount; i++)
{
    for (int j = 1; j <= colCount; j++)
    {
        MessageBox.Show(xlWorksheet.Cells[i,j].ToString());
    }
}

値の代わりにSystem.__ComObjectについてのメッセージボックスが表示されます。
これを修正するにはどうすればよいですか？

c#.netexceloffice-interop
14
Coolenough

上記の解決策を見つけました、ここにコードがあります：

string temp = (string)(xlRange.Cells[i, j] as Excel.Range).Value2;
MessageBox.Show(temp);
16
Coolenough

テストしていないが、読むべきだと思う

MessageBox.Show(xlRange.Cells[i,j].ToString());

または代わりに

MessageBox.Show(xlRange.Cells[i,j].Value.ToString());
5
user1204121

これを試して：

MessageBox.Show(xlRange.Cells[i][j].Value);
3
neverwinter

次の関数を使用して、N番目のシートのDATATABLEオブジェクトとしてデータを取得します。

public DataTable GetWorkSheet(int workSheetID)
    {
        string pathOfExcelFile = fileFullName;
        DataTable dt = new DataTable();

        try
        {
            Excel.Application excelApp = new Excel.Application();

            excelApp.DisplayAlerts = false; //Don't want Excel to display error messageboxes

            Excel.Workbook workbook = excelApp.Workbooks.Open(pathOfExcelFile, 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); //This opens the file

            Excel.Worksheet sheet = (Excel.Worksheet)workbook.Sheets.get_Item(workSheetID); //Get the first sheet in the file

            int lastRow = sheet.Cells.SpecialCells(Excel.XlCellType.xlCellTypeLastCell, Type.Missing).Row;
            int lastColumn = sheet.Cells.SpecialCells(Excel.XlCellType.xlCellTypeLastCell, Type.Missing).Column;

            Excel.Range oRange = sheet.get_Range(sheet.Cells[1, 1], sheet.Cells[lastRow, lastColumn]);//("A1",lastColumnIndex + lastRow.ToString());

            oRange.EntireColumn.AutoFit();


            for (int i = 0; i < oRange.Columns.Count; i++)
            {
                dt.Columns.Add("a" + i.ToString());
            }

            object[,] cellValues = (object[,])oRange.Value2;
            object[] values = new object[lastColumn];

            for (int i = 1; i <= lastRow; i++)
            {

                for (int j = 0; j < dt.Columns.Count; j++)
                {
                    values[j] = cellValues[i, j + 1];
                }
                dt.Rows.Add(values);
            }

            workbook.Close(false, Type.Missing, Type.Missing);
            excelApp.Quit();
        }
        catch (Exception ex)
        {
            System.Windows.Forms.MessageBox.Show(ex.Message, "Error", System.Windows.Forms.MessageBoxButtons.OK, System.Windows.Forms.MessageBoxIcon.Error);

        }
        return dt;

    }
0
Malek Tubaisaht

このコードを試してください：

MessageBox.Show(((Excel.Range)xlRange.Cells[i,j]).Value2.ToString());

このコードは私にとってはうまく機能しています。

0
Rakesh