Запишите макрорекордером автоподбор высоты строки и поместите этот код в событие Worksheet_Change, изменив его с учетом, что нужная строка получается из переменной Target

Макрос запишу, а в VBA не силен. Поможете?

как в итоге должен выглядеть макрос со всеми изменениями?

Макрос на выравнивание высоты строк выглядит так  
Sub Подбор_высоты_стр()  
   Columns("B:B").Select  
   Selection.Rows.AutoFit  
End Sub  
 
Неудобно, что после его работы остается выделенный диапазон. И снимать выделение в макросе не очень хотелосьбы - курсор будет постоянно уходить в другую ячейку

Выделять не нужно.  
Вы не совсем то записали. Точнее не те действия, которые должны бы происходить.  
Еще раз перечитал первый пост темы. Ушли немного не туда.  
Вам нужен автоподбор высоты в той ячейке, которая изменилась или в той, которая пересчитала и ссылается на измененную?  
Если изменяемая ячейка, то  
Private Sub Worksheet_Change(ByVal Target As Range)  
Target.EntireRow.AutoFit  
End Sub  
если там где формулы пересчитались, то событие другое.  
пусть формулы в диапазоне A1:C10, тогда    
Private Sub Worksheet_Calculate()  
Range("A1:C10").EntireRow.AutoFit  
End Sub  
А макрорекордером производите минимум действий - только необходимые, например вот что у меня получилось:  
Sub Макрос1()  
'  
'  
   Rows("17:17").EntireRow.AutoFit  
End Sub  
 
Никакого выделения нет

Всем добрый! Предложенное решение как я понял не распространяется на объединенные ячейки. Для этого случая можно что-нибудь придумать?