Автоматически изменять размер строки, если используется строка

Question

У меня есть код, который находит имя в диапазоне, затем копирует и вставляет строки с этим именем на другой лист, будь то 1 или более строк. Мне нужен код, который будет автоматически изменять размер только используемых строк, но каждый раз, когда я использую функции Autofit или RowHeight, он вообще ничего не делает. Нет ошибок, но также нет изменений в способе вставки или высоте строки. Я надеюсь, что кто-то здесь знает, как заставить это работать!

Я пробовал варианты Rows("5:6000").RowHeight = 15 и Rows("5:6000").AutoFit и With Sheet7 .Range("A5:Z6000").Select Selection.AutoFit End With

Answer 1

Попробуйте это

Private Sub Worksheet_Change(ByVal Target As Range)

Target.EntireColumn.AutoFit

End Sub

Answer 2

Убедитесь, что вы записали четкую ссылку на строки с листом.

Sheet7.Rows("5:6000").AutoFit

или

Sheet7.Rows("5:6000").RowHeight = 15

или

Sheet7.Range("A5:Z6000").EntireRow.AutoFit