首页 > 解决方案 > excel中的中心列或整个页面

问题描述

我想让我的细胞居中,但我做不到。

我有这个在特定单元格上写 X。

xlWorkSheet.Cells(BDTOTAL.Rows(linhaColaborador).Item(1), 2 + Linhas) = "X"

对于中心,我使用这个:

xlWorkSheet.Range(GetExcelColumnName(BDTOTAL.Rows(linhaColaborador).Item(1)) + "" & Linhas & ":" + GetExcelColumnName(BDTOTAL.Rows(linhaColaborador).Item(1)) + "" & 2 + Linhas & "").VerticalAlignment = Excel.Constants.xlCenter

GetExcelColumnName函数返回列名

    Private Function GetExcelColumnName(columnNumber As Integer) As String
    Dim dividend As Integer = columnNumber
    Dim columnName As String = String.Empty
    Dim modulo As Integer

    While dividend > 0
        modulo = (dividend - 1) Mod 26
        columnName = Convert.ToChar(65 + modulo).ToString() & columnName
        dividend = CInt((dividend - modulo) / 26)
    End While

    Return columnName
End Function

有人能帮我吗?

标签: excelvb.net

解决方案


推荐阅读