EPPlus - 按索引而不是按字母表示法处理多个列

时间:2013-03-12 17:50:38

标签: c# vb.net excel epplus

我在.Net项目中使用EPPlus将一些数据输出到Excel工作表中。

假设我想格式化具有特定格式的列E-G。使用EPPlus,我知道我可以这样做:

wks.Cells("E:G").Style.Numberformat.Format = ...

现在,我想知道,假设我想做同样的事情,但是通过他们的索引号而不是字母表示来引用列 - 理论上看起来像这样:

wks.Columns("5:7").Style.Numberformat.Format = ...

现在,我知道如果我做了这样的话会有效:

wks.Cells(1,5,wks.Dimension.End.Row,7).Style.Numberformat.Format = ...

但我希望在EPPlus中有更好/更好的方法。有什么想法/建议吗?

谢谢!

2 个答案:

答案 0 :(得分:4)

作为我自己的问题的答案,为了帮助任何人,我最终创建了自己的扩展方法Columns,将列号转换为ExcelRange对象:< / p>

''' <summary>
''' Allows you to reference a column by its numeric index rather than its alphabetic representation
''' </summary>
''' <param name="colNum">The index of the column to reference on in the worksheet.</param>
<System.Runtime.CompilerServices.Extension()> _
Public Function Columns(ByVal wks As ExcelWorksheet, ByVal colNum As Integer) As ExcelRange
    Dim ColName As String = ReturnColumnName(colNum)

    Return wks.Cells(ColName & ":" & ColName)
End Function


''' <summary>
''' Allows you to reference a column by its numeric index rather than its alphabetic representation
''' </summary>
''' <param name="StartColNum">The start col num.</param>
''' <param name="EndColNum">The end col num.</param>
<System.Runtime.CompilerServices.Extension()> _
Public Function Columns(ByVal wks As ExcelWorksheet, ByVal StartColNum As Integer, ByVal EndColNum As Integer) As ExcelRange
    Dim StartColName As String = ReturnColumnName(StartColNum)
    Dim EndColName As String = ReturnColumnName(EndColNum)

    Return wks.Cells(StartColName & ":" & EndColName)
End Function



Private Function ReturnColumnName(ByVal colNum As Integer) As String
    Dim d As Integer
    Dim m As Integer
    Dim Name As String

    d = colNum
    Name = ""

    Do While (d > 0)
        m = (d - 1) Mod 26
        Name = Chr(65 + m) + Name
        d = Int((d - m) / 26)
    Loop

    Return Name
End Function

答案 1 :(得分:2)

我重写了@John Bustos在c#中给出的答案,然后意识到我想要使用列本身而不是单元格范围。 John的方法已在下面的代码中重命名为“GetColumnCells”。

public static List<ExcelColumn> GetColumns(ExcelWorksheet wks, int startColNum, int endColNum) {
    int d = startColNum;
    List<ExcelColumn> cols = new List<ExcelColumn>();

    while (d <= endColNum) {
        cols.Add(wks.Column(d));
        d++;
    }

    return cols;
}

public static ExcelRange GetColumnCells(ExcelWorksheet wks, int startColNum, int endColNum) {
    string startColName = GetColumnName(startColNum);
    string endColName = GetColumnName(endColNum);

    return wks.Cells[startColName + ":" + endColName];
}

public static string GetColumnName(int colNum) {
    int d, m;
    string name = String.Empty;

    d = colNum;
    while (d > 0) {
        m = (d - 1) % 26;
        name = ((char)(65 + m)) + name;
        d = (d - m) / 26;
    }

    return name;
}