Уже пол года не могу решить вопрос с журналом заказов(дата, менеджер,номер заказа, клиент, описание слуги, сумма, оплата) - нужно сделать так, что бы данные в таблицу можно было добавить только 1 раз(как на бумагу) и после внесения не поддавались корректировке. Или хотя бы отображалась дата редактирования строк или что бы можно было блокировать самостоятельно отдельно столбцы выборочно(а не всю страницу). ОГРОМНАЯ ПРОСЬБА, подскажите, что можно придумать?
Добрый день!
Уже пол года не могу решить вопрос с журналом заказов(дата, менеджер,номер заказа, клиент, описание слуги, сумма, оплата) - нужно сделать так, что бы данные в таблицу можно было добавить только 1 раз(как на бумагу) и после внесения не поддавались корректировке. Или хотя бы отображалась дата редактирования строк или что бы можно было блокировать самостоятельно отдельно столбцы выборочно(а не всю страницу). ОГРОМНАЯ ПРОСЬБА, подскажите, что можно придумать?Vladimir953
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target(1).Column > 5 Then Exit Sub If [R1] = "пороль" Then Exit Sub If Target(1).Value = "" Then Exit Sub Application.ScreenUpdating = 0 Target.Offset(1).Select End Sub
[/vba] Пока Вы не введете в R1 слово "пороль" (для особо грамотных ), заполненные ячейки в первых пяти столбцах недоступны.
Примерно так можно [vba]
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target(1).Column > 5 Then Exit Sub If [R1] = "пороль" Then Exit Sub If Target(1).Value = "" Then Exit Sub Application.ScreenUpdating = 0 Target.Offset(1).Select End Sub
[/vba] Пока Вы не введете в R1 слово "пороль" (для особо грамотных ), заполненные ячейки в первых пяти столбцах недоступны._Boroda_