So we are clear this is blind leading blind so forgive me if I'm not that helpful, here's a picture of my screen with the text entered.

VB Row_Sizer.jpg


If thats not helpful here's the long version of how I got this to work for me.

I started by first recording a macro I called row_sizer. Click record macro select the rows to autofit and double click in between rows, then stop recording. I also gave it a keyboard shortcut of Ctrl+s. Your workbook needs to be save as a macro-enabled workbook as well.


Then go into the macro and trim down the scrolling commands and select commands until you just have something like this:
Try this:

Private Sub Worksheet_Change(ByVal Target As Range)
'
' Row_Sizer Macro
' Adjust Row Height based on text
'
' Keyboard Shortcut: Ctrl+s
'
Rows("9:100").EntireRow.AutoFit

End Sub

Select everything between private sub... and end sub including the spaces and copy and paste into the worksheet change area I previously suggested. It works for me with all of the spaces and text in there and also with only the Rows("9:100").EntireRow.AutoFit

Please let me know if either works for you.