如何从字典中向电子表格添加值？

Question

我有一个模板电子表格文档,它有两列,服务器名称和IP地址.如何填充电子表格,以便每个字典键都位于"服务器"列中自己的单元格中,相应的值将进入IP列旁边的单元格中？

我正在使用EPPlus库但无法找到有关该主题的任何内容.

以下是我发现和尝试的内容,但是它用于列表

using (ExcelPackage package = new ExcelPackage(_fileInfo))
{
    ExcelWorksheet worksheet = package.Workbook.Worksheets[1];

    for (int i = 0; i < listOfIPs.Count; i++)
    {
        worksheet.Cells[i + 2, 1].Value = listOfIPs[i];
    }

    package.Save();
}

Answer 1

我不熟悉EPPlus,因此我不确定你是如何获得对活动表的引用 - 你需要弄清楚这一点,虽然这是完成纯C#与VBA模型的一点知识,你可以轻松避免任何迭代将字典的内容添加到电子表格中:

// create a sample dictionary and fill it
Dictionary<string, string> myCol = new Dictionary<string, string>();
myCol.Add("server1", "ip1");
myCol.Add("server2", "ip2");

// grab a reference to the active Sheet
// this may vary depending on what framework you are using
Worksheet ws = Globals.ThisWorkbook.ActiveSheet as Worksheet;

// create a Range variable
Range myRange;

// Transpose the keys to column A
myRange = ws.get_Range("A1");
myRange.get_Resize(myCol.Keys.ToArray().Count(),1).Value = 
                 ws.Parent.Parent.Transpose(myCol.Keys.AsEnumerable().ToArray());

// transpose the Values to column B
myRange = ws.get_Range("B1");
myRange.get_Resize(myCol.Values.ToArray().Count(), 1).Value = 
               ws.Parent.Parent.Transpose(myCol.Values.AsEnumerable().ToArray());

按预期调试结果

有了EPPlus,我想你可以这样做(未经测试)

using (ExcelPackage package = new ExcelPackage(file))
{
    ExcelWorksheet worksheet = package.Workbook.Worksheets.Add("test");

    worksheet.Cells["A1"].LoadFromCollection(myColl, true, OfficeOpenXml.Table.TableStyles.Medium);

    package.Save();
}

有关VBA集合迭代和打印到Sheet @ vba4all.com的更多详细信息