Извините, но, похоже, нет встроенной функции для подобного действия.
Ваши варианты:
Для формул или серий
Перетащите из угла вместо двойного щелчка.
Для формул
Используя заливку
Выделите первую ячейку, расширьте выделение до конца, нажав CTRL+SHIFT+RIGHT,
затем заполните CTRL+R.
Использование копирования / вставки
Выделите первую ячейку, скопируйте с помощью CTRL+C, расширьте выделение до конца с помощью CTRL+SHIFT+RIGHT, затем вставьте с помощью CTRL+V.
Для seires Выберите первую ячейку, расширьте выделение до конца с помощью CTRL+SHIFT+RIGHT,
затем используйте меню заполнения и выберите серию и нажмите OK.
При желании вы можете написать функцию как макрос
И назовите это с пользовательским ярлыком.
На вкладке разработчика запишите макрос и дайте ему правильное имя и ярлык.
Остановите запись и измените макрос следующим образом:
Sub Fill()
Selection.AutoFill Destination:=Range(ActiveCell, Selection.End(xlToRight).Address), Type:=xlFillDefault
End Sub
Затем вместо того, чтобы дважды щелкнуть по углу, вы используете вместо этого ярлык, чтобы заполнить строку.