C# と VB.NET の質問掲示板

Windows 11 Home
C#
VS2019 .NET Framework 4.7.2
ClosedXML 0.87.0.0

Windowsフォームアプリを作成しています。
ClosedXMLで行の高さを自動調整する方法を教えてください。

値をセルに代入して、セルを結合しています。
値は、改行を含む文字列（日本語の文章）です。
セルの書式設定で折り返して表示を選択。

文字列が長くなると複数行になって表示され、
行数に合わせて行の高さを自動調整したいと思っています。
行を指定して、AdjustToContents で実行しているのですが、
行の高さが変わりません。

行の高さを自動調整する方法を教えてください。
よろしくお願いいたします。


// ClosedXMLを使ってxlsxファイルを作成する
xlPath = Application.StartupPath + "\\Excel\\Syukei.xlsx";
            
// エクセルオープン
ClosedXML.Excel.XLWorkbook workbook = null;
workbook = new XLWorkbook(xlPath);

IXLWorksheet tmpWS = workbook.Worksheet("sheet");

tmpWS.Cell(CopyRow, tCol3).Value = val;
tmpWS.Range(CopyRow, tCol3, CopyRow , tCol4).Merge();
tmpWS.Row(CopyRow).AdjustToContents();

■No102454 (河童 さん) に返信
> 行を指定して、AdjustToContents で実行しているのですが、
> 行の高さが変わりません。

これだと変わらないですね。なぜだろう。

> 行の高さを自動調整する方法を教えてください。

セルのプロパティ「折り返して全体を表示」にするとうまくいきます。
ただし。結合セルだとうまくいきませんでした。

const string filename = @"Z:\MergedRowHeight.xlsx";

using (var workbook = new XLWorkbook()) {
    var worksheet = workbook.Worksheets.Add("Sheet1");

    var A1 = worksheet.Cell("A1");
    A1.Value = "This is a long text that will be merged across multiple cells.";
    A1.Style.Alignment.SetWrapText(true);

    var A2_A3 = worksheet.Range("A2:A3");
    A2_A3.Merge();
    A2_A3.Value = "This is a long text that will be merged across multiple cells."; ;
    A2_A3.Style.Alignment.SetWrapText(true);
}

A1 は縦にひろがってくれたのですが、A2:A3 のほうはそのままです。
もっとも結合すると、Excel の操作でも広がらないのでどうしようもないかもしれません。
高さを調整しようと思ったのですが、行の高さは 15 のままでした。

保存した後、再オープンしても行の高さは 15 のままです。
ファイル自体には、行の大きさは記録されていないようですが、Excel で
開いて保存したあとで開くと行の高さが 120 に広がっていました。
Excel が開くときに大きさを調整しているようです。

なかなか面倒そう。:(

■No102457 (KOZ) に返信
> セルの幅やフォントを設定していろいろ試してみるしかないかと。
> TextRenderer.MeasureText メソッドの値が目安になるかもしれないですが、やってみないとわかりません。

イケたかも。

using ClosedXML.Excel;
using System;
using System.Drawing;
using System.Windows.Forms;

internal class Program
{
    static void Main(string[] args) {

        const string filename = @"Z:\MergedRowHeight.xlsx";
        const string longText = "This is a long text that will be merged across multiple cells.";

        using (var workbook = new XLWorkbook()) {
            var worksheet = workbook.Worksheets.Add("Sheet1");
            var A1 = worksheet.Cell("A1");
            A1.Value = longText;
            A1.Style.Alignment.SetWrapText(true);

            var A2_A3 = worksheet.Range("A2:A3");
            A2_A3.Merge();
            A2_A3.Value = longText;
            A2_A3.Style.Alignment.Vertical = XLAlignmentVerticalValues.Top;
            A2_A3.Style.Alignment.SetWrapText(true);
            worksheet.Row(2).Height = A2_A3.GetHeight(longText)
                                    - worksheet.Row(3).Height;

            workbook.SaveAs(filename);
        }
    }
}

internal static class ExcelUtl
{
    const int DPI = 96;
    const double PointsPerInch = 72.0;
    const double PixelsPerChar = 7;

    public static double GetHeight(this IXLRange range, string text) {
        return range.Cell(1, 1).GetHeight(text);
    }

    public static double GetHeight(this IXLCell cell, string text) {
        var font = CreateFont(cell.Style.Font);
        var width = (int)(PixelsPerChar * cell.WorksheetColumn().Width);
        using (var g = Graphics.FromHwnd(IntPtr.Zero)) {
            var size = new Size(width, short.MaxValue);
            TextFormatFlags flags =
                TextFormatFlags.Left | TextFormatFlags.Top | TextFormatFlags.WordBreak;
            size = TextRenderer.MeasureText(g, text, font, size, flags);
            return PixelsToPoints(size.Height);
        }
    }

    public static int PointsToPixels(double points) {
        return (int)(points * DPI / PointsPerInch);
    }

    public static double PixelsToPoints(int pixels) {
        return (int)(pixels * PointsPerInch / DPI);
    }

    public static Font CreateFont(IXLFont font) {
        FontStyle style = FontStyle.Regular;
        if (font.Bold) { style |= FontStyle.Bold; }
        if (font.Italic) { style |= FontStyle.Italic; }
        if (font.Underline != XLFontUnderlineValues.None) { style |= FontStyle.Underline; }
        if (font.Strikethrough) { style |= FontStyle.Strikeout; }
        return new Font(font.FontName,
                            (float)font.FontSize, style, GraphicsUnit.Point);
    }
}

まぁ試してみてダメだったら調整してください。