如何在电子表格C#的一页中适合所有列

时间:2019-05-10 06:01:59

标签: c# spreadsheet openxml export-to-excel

我已将报告导出到excel,并且工作正常,但问题是,当我打印excel时,excel的宽度无法将所有列都放入一页中,为此,我必须将页面布局更改为适合1的宽度和43的身高,我如何从代码中得到这个?


using (var workbook = SpreadsheetDocument.Create(Savepath, SpreadsheetDocumentType.Workbook))
{
    var workbookPart = workbook.AddWorkbookPart();
    workbook.WorkbookPart.Workbook = new Workbook();
    workbook.WorkbookPart.Workbook.Sheets = new Sheets();

    //declare our MergeCells here
    MergeCells mergeCells = null;

    foreach (DataRow dsrow in table.Rows)
    {
        int innerColIndex = 0;
        rowIndex++;
        Row newRow = new Row();
        foreach (String col in columns)
        {
            Stylesheet stylesheet1 = new Stylesheet();
            Cell cell = new Cell();
            cell.DataType = CellValues.String;
            cell.CellValue = new CellValue(dsrow[col].ToString());
            cell.CellReference = excelColumnNames[innerColIndex] + rowIndex.ToString();

            if (table.TableName == "Work Order Report")
            {
                string cellNameWorkOrder = dsrow[col].ToString();
                if (cellNameWorkOrder == "POSTER: 10% MUST HAVE APPROACH AND CLOSE-UP SHOTS - PHOTO OF EACH CREATIVE" || cellNameWorkOrder == "BULLETINS: 100% CLOSE-UP AND APPROACH OF EACH UNIT")
                {
                    if (mergeCells == null)
                        mergeCells = new MergeCells();

                    var cellAddress = cell.CellReference;
                    var cellAddressTwo = "I" + rowIndex.ToString();
                    mergeCells.Append(new MergeCell() { Reference = new StringValue(cellAddress + ":" + cellAddressTwo) });
                }
            }

            newRow.AppendChild(cell);
            innerColIndex++;
        }

        sheetData.AppendChild(newRow);
    }
    //add the mergeCells to the worksheet if we have any
    if (mergeCells != null)
        sheetPart.Worksheet.InsertAfter(mergeCells, sheetPart.Worksheet.Elements<SheetData>().First());
}

 workbook.WorkbookPart.Workbook.Save();
}

当我现在打印类似https://www.screencast.com/t/CCMR96Mw7u时,excel报告看起来像https://www.screencast.com/t/MkTpDc98RD0lhttps://www.screencast.com/t/MRyzpEiFICM的预期结果是https://www.screencast.com/t/ztgvm6mISSwp

1 个答案:

答案 0 :(得分:0)

要实现此目的,您需要做两件事。首先,您需要将一个PageSetupProperties实例添加到一个SheetProperties实例中,然后再将其添加到您的Worksheet中。 PageSetupProperties具有FitToPage属性,该属性是将Excel中的单选按钮设置为“适合”的部分。

接下来,您需要使用PageSetup类来设置所需的宽度和高度。这是通过FitToWidthFitToHeight属性完成的。还需要将PageSetup添加到Worksheet

请注意,元素的顺序很重要,您可以在ECMA规范中看到正确的顺序。

以下是一个自包含的示例,该示例添加一个单元格,然后按照所需方式设置属性:

using (SpreadsheetDocument myDoc = SpreadsheetDocument.Create(filename, SpreadsheetDocumentType.Workbook))
{
    WorkbookPart workbookpart = myDoc.AddWorkbookPart();
    workbookpart.Workbook = new Workbook();

    // Add a WorksheetPart to the WorkbookPart.
    WorksheetPart worksheetPart = workbookpart.AddNewPart<WorksheetPart>();

    SheetData sheetData = new SheetData();

    //add a row
    Row row = new Row();
    row.RowIndex = 1;

    //create a cell
    Cell cell = new Cell();
    cell.CellReference = "A1";
    CellValue cellValue = new CellValue();
    cellValue.Text = "123";
    cell.Append(cellValue);

    row.AppendChild(cell);

    sheetData.AppendChild(row);
    // Add a WorkbookPart to the document.
    worksheetPart.Worksheet = new Worksheet(sheetData);

    //this sets the "Fit to" radio in Excel.
    //note this must come before the SheetData
    SheetProperties sheetProperties = new SheetProperties();
    PageSetupProperties pageSetupProperties = new PageSetupProperties() { FitToPage = true };
    sheetProperties.Append(pageSetupProperties);
    worksheetPart.Worksheet.InsertBefore(sheetProperties, sheetData);

    // this changes the fit to width and height
    PageSetup pageSetup = new PageSetup() { FitToWidth = 1, FitToHeight = 43 };
    worksheetPart.Worksheet.AppendChild(pageSetup);

    //append the sheets / sheet
    Sheets sheets = myDoc.WorkbookPart.Workbook.AppendChild(new Sheets());
    sheets.AppendChild(new Sheet()
    {
        Id = myDoc.WorkbookPart.GetIdOfPart(myDoc.WorkbookPart.WorksheetParts.First()),
        SheetId = 1,
        Name = "Sheet1"
    });
}