1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie. Узнать больше.

Ищу помощь по VBA в Excel

Тема в разделе "Программирование", создана пользователем DJ_SAN_, 02.10.10.

  1. DJ_SAN_

    DJ_SAN_ Активный участник

    763
    0
    Всем доброго времени суток. Решил написать простенький макрос в экселе и встретился с проблемой. Никак не могу найти функцию, которая перемещала бы курсор с выделенной ячейки на нижнюю или верхнюю.
    Сама программа не сложная. Имеется таблица, в ней столбец, заполнен не полностью, то есть заполнена строчка, а под ней три-четыре пустые, опять заполнена строчка и под ней снова несколько пустых и так далее. Макрос должен копировать название в строчке и вставлять его во все пустые под ними. Вот что у меня вышло:
    Sub Макрос1()
    '
    ' Макрос1 Макрос
    ' Макрос записан 30.09.2010 (1)
    '
    ' Сочетание клавиш: Ctrl+s
    '


    Selection.Copy
    Range(Selection, Selection.End(xlDown)).Select

    ActiveSheet.Paste
    Selection.End(xlDown).Select

    End Sub

    Проблема заключается в том что макрос вставляет скопированное значение не только в пустые ячейки но и в следующую заполненную.
    Помогите пожалуйста решить проблему, заранее огромное спасибо :)
     
  2. panda-34

    panda-34 Активный участник

    1.589
    0
    Range(ActiveCell, ActiveCell.End(xlDown).Offset(-1)).FillDown
    Не сработает, если снизу непустые (они тоже заполнятся) - таково поведение режима END.
     
  3. DJ_SAN_

    DJ_SAN_ Активный участник

    763
    0
    panda-34, громадное спасибо!!!! все работает :)))
    Очень очень благодарен :)