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

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 Collections迭代和打印到Sheet @ vba4all.com

的更多详细信息

Answer 2

您只需访问字典的键并迭代它们，就像在迭代列表一样。

        var foo = new Dictionary<string, string>(); // populate your dictionary
        foreach(var key in foo.Keys)
        {
            var value = foo[key];
            // do stuff with 'key' and 'value', like put them into the excel doc
        }