Как настроить макрос Excel для автозаполнения переменной длины

Question

Я записал макрос ниже, но я не знаю, как настроить его так, чтобы он работал с переменными длинами строк.

Sub AutoFillVariableLength()
'
' AutoFillVariableLength Macro
'
' Keyboard Shortcut: Ctrl+Shift+L
'
    Selection.AutoFill Destination:=ActiveCell.Range("A1:A16")
    ActiveCell.Range("A1:A16").Select
    Selection.End(xlDown).Select
End Sub