Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8086

Профиль | Отправить PM | Цитировать


Цитата Profile:
…но в обе стороны, т.е. вверх и вниз. »
Так и задумывалось — весь столбец, за исключением первой строки с заголовком.

Цитата Profile:
что бы заполняло/выделяло только в низ от позиции курсора. »
Код: Выделить весь код
Sub Sample()
    With ActiveCell
        Intersect(.EntireColumn, .Parent.Range(CStr(.Row) & ":" & CStr(.Parent.Rows.Count)).EntireRow).FormulaR1C1 = "Value"
    End With
End Sub
Это сообщение посчитали полезным следующие участники:

Отправлено: 19:37, 11-12-2019 | #12