Автоматическое заполнение столбца данными из одной ячейки

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Автоматическое заполнение столбца данными из одной ячейки (Нужно решение...)

SergejSor

Дата: Пятница, 31.08.2012, 12:28 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 49

Репутация: 0 ±

Замечаний: 0% ±

Добрый день. Проблема в следующем, есть столбец В, и ячейка D3. Как сделать чтобы при вводе времени в ячейку D3 текущего времени, столбец В автоматически заполнялся, то есть заполнялась последняя пустая ячейка и при этом не менялись значения предыдущих ячеек ?

К сообщению приложен файл: 2120061.xlsx (8.5 Kb)

Ответить

ABC

Дата: Пятница, 31.08.2012, 12:42 | Сообщение № 2

Группа: Друзья

Ранг: Обитатель

Сообщений: 397

Репутация: 112 ±

Замечаний: 0% ±

Excel 2007

[vba]

Code

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i&
i = Cells(Rows.Count, 2).End(xlUp).Row
If Target.Address <> "$D$3" Then Exit Sub
Cells(i + 1, 2).NumberFormat = "h:mm"
Cells(i + 1, 2).Value = Cells(3, 4).Value
Exit Sub
End Sub

[/vba]