Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Toggling autofit
Hi I have a simple to do list with a cell that i am using to take notes - I'm trying to use the following macro to toggle autofit on and off for a particular cell. I have assigned the macro to a shape on the worksheet. Problem is I often have to click the shape multiple times in order for the macro to run. Any ideas why the following macro isn't working? - I think it must have something to do with my using a shape on the wks because the macro works fine when I run it from the vba editor. Sub RowAutoFit() Dim StandardHeight StandardHeight = 29 If Not Selection.RowHeight = StandardHeight Then Selection.RowHeight = StandardHeight Else Selection.Rows.AutoFit End If End Sub Thanks Richard -- rgarber50 ------------------------------------------------------------------------ rgarber50's Profile: http://www.excelforum.com/member.php...o&userid=11350 View this thread: http://www.excelforum.com/showthread...hreadid=401721 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can one adjust Format Row Autofit to ensure WYSIWYG when printing | Excel Discussion (Misc queries) | |||
Autofit makes rows too tall | Excel Discussion (Misc queries) | |||
Autofit makes rows too tall | Excel Discussion (Misc queries) | |||
Need code to Autofit Row Height on recalculation | Excel Discussion (Misc queries) | |||
Row Autofit Problem | Excel Discussion (Misc queries) |