Adjust the size of a column/row using a macro in an excel report

A simple code to adjust the size of a row/column automatically or with a customized size so I can define the height and/or the width.

macro excel macro excel

 

When I use the macro ?

To put a personalized size to a column/row or in an automatic way.

 

How to create the macro ?

Read How to create, edit, hide and select a macro in an excel report

 

How to create the button to associate it with the macro ?

Read How to create a button and associated it to a macro in an excel report

 

How is the macro ?

Copy the code below and paste it into your macro. You will see my comments in green if exist so follow the help to adapt to your need.

For a row:

Sub test()
' change 1:6 by your row number reference and 20 by the size you want
' for an automatic size, replace the line by Range("A:A").EntireRow.AutoFit
Rows("1:6").RowHeight = 20
End Sub

For a column:

Sub test()
' change A:C by your column letter reference and 20 by the size you want
' for an automatic size, replace the line by Range("A:C").EntireColumn.AutoFit
Range("A:C").ColumnWidth = 20
End Sub
macro excel macro excel

Interesting Management