ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Find 4.75 and Replace with 12.75 ( Rowheight ) (https://www.excelbanter.com/excel-discussion-misc-queries/190065-find-4-75-replace-12-75-rowheight.html)

Steved

Find 4.75 and Replace with 12.75 ( Rowheight )
 
Hello from Steved

Please is there away to Find 4.75 and Replace with 12.75 ( Rowheight ).

I have other row heights in the same worksheet.

I thankyou.

Bobt

Find 4.75 and Replace with 12.75 ( Rowheight )
 
Are you willing to write a macro to do this? If so:

while activecell.row <= 100

if (selection.rowheight = 4.75) then
Selection.RowHeight = 12.75
end if
ActiveCell.Offset(1, 0).Select

wend

This assumes you want to scan through 100 rows. If you have a column that
is complete full of text/values, you can change the while line to:

while activecell.value < ""

Bob Tulk
MOUS (XP/97)

"Steved" wrote:

Hello from Steved

Please is there away to Find 4.75 and Replace with 12.75 ( Rowheight ).

I have other row heights in the same worksheet.

I thankyou.


Steved

Find 4.75 and Replace with 12.75 ( Rowheight )
 
Hello BobT

Yes and Thankyou

Steved

"BobT" wrote:

Are you willing to write a macro to do this? If so:

while activecell.row <= 100

if (selection.rowheight = 4.75) then
Selection.RowHeight = 12.75
end if
ActiveCell.Offset(1, 0).Select

wend

This assumes you want to scan through 100 rows. If you have a column that
is complete full of text/values, you can change the while line to:

while activecell.value < ""

Bob Tulk
MOUS (XP/97)

"Steved" wrote:

Hello from Steved

Please is there away to Find 4.75 and Replace with 12.75 ( Rowheight ).

I have other row heights in the same worksheet.

I thankyou.



All times are GMT +1. The time now is 11:51 PM.

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