2007 - [решено] EXCEL Заполнить выделенный столбец

Iska · Отправлено: **07:11, 07-12-2019** | #2

Profile, сам документ, упаковав его в архив, я полагаю, Вы не выложите, так?

Что именно из этого:

Скрытый текст

Вы подразумеваете под «заполнить»?

Самое простое (но не единственное): быстрая навигация по Рабочему листу — Ctrl-стрелки, с одновременным выделением — Ctrl-Shift-стрелки. А так:
Keyboard shortcuts in Excel - Office Support
Excel Spreadsheets: Navigation, shortcut keys, data sort and filter, formulas and functions | PCWorld
The Complete Guide on Navigation Shortcut Keys In Excel
и т.п.

Ну, и, до кучи: 7 Excel tips for huge spreadsheets: Split Screen, Freeze Panes, Format Painter and more | PCWorld.

Profile · Отправлено: **14:26, 07-12-2019** | #3

ну конечно же Ctrl+D!!!!!
Спасибо вам большое.

Iska · Отправлено: **14:50, 07-12-2019** | #4

Profile, честно говоря, не понял, как Вам поможет Ctrl-D вместо таскания ползунков:

Цитата Profile:

таскать ползунок вниз - вообще не вариант, самое меньшее тысяч 10 строк, »

Я полагал, что у Вас проблема именно с выделением потребных диапазонов, а так-то Ctrl-D/Ctrl-R вроде как общеизвестные сочетания.

Profile · Отправлено: **00:21, 08-12-2019** | #5

Эх рано радовался.
...пока "ctrl+shift-стрелкавниз" не начала упирается в какие нибудь данные в столбце.
Просто я использую фильтры и мне надо выделить столбец и забить его числами, не обращая внимания на то есть там какие-нибудь другие данные или нет, т.е. другими словами перезаписать весь столбик вместе с пустыми строками и с данными, если есть.
У меня получается так - если столбец пустой, то данные записываются от начала до конца, если есть хоть какое-то число, где-нибудь по середине, то данные заполняются до этого места, где стоит это число.

Цитата Iska:

честно говоря, не понял, как Вам поможет Ctrl-D вместо таскания ползунков: »

...вот как я делаю: данные ввожу всегда во второй ячейке сверху (первая у меня используется для названий), потом "ctrl+shift+стрелкавниз" (происходит выделение), потом ctrl+d (вставляются данные, которые я вводил во вторую ячейку). Но вся проблема в том, что выделение происходит до первого значения вниз, а мне нужно, что бы выделялся весь столбец до самого низа, без разницы - есть там значения или нету.
Так же "ctrl+стрелкавниз/стрелкавверх" - тоже упирается в значения на своем пути, мне просто надо что бы выделение было с места курсора и до самого низа. ...и перемещение только: "самый верх" и "самый низ".

Цитата Iska:

а так-то Ctrl-D/Ctrl-R вроде как общеизвестные сочетания. »

...да я как-то таблицами раньше и не пользовался. А тут вот пришлось работать, приходится параллельно учиться.
В сети нашел разные примеры как выделять и вставлять, но ни один не подходит.

Profile · Отправлено: **00:42, 08-12-2019** | #6

Очень хорошо выделяется и перезаписывается весь столбец, когда кликаешь по горизонтальным буквенным координатам, тогда во все строки записывается данные из первой ячейки столбца, но это не подходит тоже, так как там у меня названия.

Profile · Отправлено: **01:24, 08-12-2019** | #7

Вроде вопрос решился вот таким образом:

Код:

Sub Select1()
    With ActiveCell.Parent
        Range(ActiveCell, Cells(Rows.Count, ActiveCell.Column)).Select
    End With
End Sub

столбик выделяется от позиции курсора до самого низа,
соответственно назрел следующий вопрос, как все это еще больше улучшить?
как сделать, что бы при выполнении макроса, сразу же заполнялась данными выделенная область?

Еще помогите решить вопрос с перемещением курсора, у меня закреплена первая строка, и если я нахожусь внизу листа, то "ctrl+стрелкавверх" просто перепрыгивает на первую строчку, т.е. на экране фактически остается нижняя область листа.

Iska · Отправлено: **10:15, 08-12-2019** | #8

Profile, то есть, на самом деле речь не про 10000 строк, а про весь столбец — так получается?! Странно это всё.

Цитата Profile:

как сделать, чтобы ~~при выполнении макроса,~~ сразу же заполнялась данными выделенная область? »

Ввели данные в ячейку, затем нажали не Enter, а Ctrl-Enter.

Цитата Profile:

Еще помогите решить вопрос с перемещением курсора, у меня закреплена первая строка, и если я нахожусь внизу листа, то "ctrl+стрелкавверх" просто перепрыгивает на первую строчку, т.е. на экране фактически остается нижняя область листа. »

У меня — нет.

bredych · Отправлено: **23:02, 08-12-2019** | #9

Если надо заполнить весь, а мешают данные, то что мешает кликнуть на верхнюю таблетку, выделив столбец до конца времён, и нажав del удалить все оттуда перед ctrl+d?

Iska · Отправлено: **23:42, 08-12-2019** | #10

bredych, в первой строке заголовок. Он и мешает.

Проще тогда уж макрос изменить на:

Код:

Sub Sample()
    With ActiveCell
        Intersect(.EntireColumn, .Parent.Range("2:" & CStr(.Parent.Rows.Count)).EntireRow).Select
    End With
End Sub

или зараз на:

Код:

Sub Sample()
    With ActiveCell
        Intersect(.EntireColumn, .Parent.Range("2:" & CStr(.Parent.Rows.Count)).EntireRow).FormulaR1C1 = "Value"
    End With
End Sub