-1

(Stimulsoft) レポートを Excel にエクスポートしていますが、一部のセルのテキストが長くなり、セル間の水平方向の配置が失敗します。単語の折り返しがセルの高さを拡大することは明らかですが、同じ行の他のすべてのセルには広がりません。

すべてのセルでより信頼性の高い設定CanGrowを false にすることができましたが、そのようにして、ユーザーは Excel を開いた後に列幅を手動で自動調整する必要があります。

すべての列幅を自動的に合わせるように Excel に指示する方法はありますか?

4

4 に答える 4

1

あり、かなり単純です。

Private Sub AutoFitCols()

        Worksheets("Sheet1").Columns.AutoFit

End Sub

Sheet1列を自動調整するワークシートの名前に置き換えるだけです。

ワークブックを開いたときにこれを自動的に実行したい場合は、次のWorkbook_Openようにイベントにコードを配置できます。

Private Sub Workbook_Open()

        Worksheets("Sheet1").Columns.AutoFit

End Sub

ThisWorkbookコードがコード モジュール内にあることを確認してください。

于 2015-08-24T12:53:32.377 に答える
0

Excel ですべてのシート (左上) を選択し、列 b と列 c の間の行をダブルクリックします。VBで：

Cells.Select
    Cells.EntireColumn.AutoFit
于 2015-08-24T12:53:40.373 に答える
0

スプレッドシートのすべての列を自動調整するキーボード ショートカット

Ctrl+A (すべて選択)

Alt+H+O+I (列幅の自動調整)

于 2015-08-24T14:44:32.973 に答える