Джеймс спросил, есть ли сочетание клавиш для перемещения вниз по строке и выбора всей строки. В Excel нет возможности сделать это одним нажатием клавиши, но есть способ сделать это двумя нажатиями клавиш. Все, что вам нужно сделать, это нажать стрелку вниз, а затем сразу же нажать Shift + пробел.

Однако, если вы часто перемещаетесь подобным образом, вас, вероятно, больше заинтересует макрос, который объединяет два шага в один шаг, который можно запустить с помощью сочетания клавиш. Следующий макрос будет работать:

Sub SelectRowDown1()

If ActiveCell.Row < 1048576 Then         ActiveCell.Offset(1, 0).Select         ActiveCell.EntireRow.Select     End If End Sub

Если вы назначите это сочетанию клавиш, например Ctrl + D, то каждый раз, когда вы нажимаете сочетание клавиш, вы перемещаетесь на строку вниз, и она выбирается. Однако проблема с этим подходом заключается в том, что после запуска макроса первая ячейка в строке всегда является активной. Это отличается от метода перемещения и выделения с помощью стрелок вниз, Shift + пробела.

По-видимому, именно метод CompleteRow.Select приводит к активации первой ячейки. Чтобы обойти эту проблему, все, что вам нужно сделать, это определить, в каком столбце вы были, а затем активировать эту ячейку. Следующая версия макроса делает именно это:

Sub SelectRowDown2()

If ActiveCell.Row < 1048576 Then         ActiveCell.Offset(1, 0).Select         iCP = ActiveCell.Column         ActiveCell.EntireRow.Select         ActiveCell.Offset(0, iCP - 1).Activate     End If End Sub

Если вас интересует макрос, который движется вверх, вы можете использовать этот макрос:

Sub SelectRowUp()

If ActiveCell.Row > 1 Then         ActiveCell.Offset(-1, 0).Select         iCP = ActiveCell.Column         ActiveCell.EntireRow.Select         ActiveCell.Offset(0, iCP - 1).Activate     End If End Sub

Вы можете назначить этот макрос сочетанию клавиш Ctrl + U, и тогда ваши макросы перемещения будут завершены.

Если вам нужно что-то более мощное, чем эти макросы, попробуйте надстройку RowLiner от Pearson Software Consulting Services:

http://www.cpearson.com/excel/RowLiner.htm

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (11473) применим к Microsoft Excel 2007, 2010, 2013, 2016, 2019 и Excel в Office 365. Вы можете найти версию этого совета для старого интерфейса меню Excel здесь:

link: / excel-Moving_and_Selecting_Rows [Перемещение и выбор строк].