ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Formatting Questions (https://www.excelbanter.com/excel-programming/312385-formatting-questions.html)

Kevin

Formatting Questions
 
I am having trouble formatting a spreadsheet on the fly
for printing. Is there a way to programatically set the
row height to automatic through code. I would prefer this
to guessing using code like the following:

With Worksheets("Sheet1").Rows(39)
.RowHeight = .RowHeight * 2
End With

I would rather have it autoexpand depending on what is in
the row.

Thanks in advance for you help!

Kevin

Tom Ogilvy

Formatting Questions
 
Sub CCCC()
With Worksheets("Sheet1").Rows(39)
.AutoFit
End With
End Sub

--
Regards,
Tom Ogilvy

"Kevin" wrote in message
...
I am having trouble formatting a spreadsheet on the fly
for printing. Is there a way to programatically set the
row height to automatic through code. I would prefer this
to guessing using code like the following:

With Worksheets("Sheet1").Rows(39)
.RowHeight = .RowHeight * 2
End With

I would rather have it autoexpand depending on what is in
the row.

Thanks in advance for you help!

Kevin




Kevin

Formatting Questions
 
Tom,

Thanks!

Kevin
-----Original Message-----
I am having trouble formatting a spreadsheet on the fly
for printing. Is there a way to programatically set the
row height to automatic through code. I would prefer this
to guessing using code like the following:

With Worksheets("Sheet1").Rows(39)
.RowHeight = .RowHeight * 2
End With

I would rather have it autoexpand depending on what is in
the row.

Thanks in advance for you help!

Kevin
.



All times are GMT +1. The time now is 12:21 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com