Цитата:
Сообщение от Tresor
Посмотри там... может быть, натолкнёт на верное решение.
|
Да, именно оно! Только я чуточку переделал макрос под себя. Дата у меня в первом столбце, а заполняться начинает сразу второй. На вкладке листа (снизу) нажимаю правую клавишу и выбираю "Исходный текст". Открывается окно функций, привязанных к этому листу. Там ввожу
PHP код:
Private Sub Worksheet_Change(ByVal Target As Range)
For Each cell In Target 'проходим по всем измененным ячейкам'
If Not Intersect(cell, Range("B2:B999")) Is Nothing Then 'если изменененная ячейка попадает в диапазон B2:B999'
If VarType(cell.Offset(0, -1).Value) = vbEmpty Then 'проверка не стоит уже в соседней слева ячейке дата, чтобы не менять ее при редактировании'
With cell.Offset(0, -1) 'вводим в соседнюю слева ячейку дату'
.Value = Date
End With
End If
End If
Next cell
End Sub
Редактор макросов можно закрывать. Теперь при вводе нового клиента дата проставляется автоматически.