Автор Terraman задал вопрос в разделе Другие языки и технологии
Кто может помочь с работой в Excel с макросами? и получил лучший ответ
Ответ от Алексей Матевосов (AlexM)[гуру]
Макрос запускается на событие изменения данных на листе.
КОД.
Private Sub Worksheet_Change(ByVal Target As Range)
St = ""
If Target.Value < 0 Then St = "Число меньше допустимого" & Chr(10)
If Target.Value >= 100 Then St = "Число больше допустимого" & Chr(10)
If Target.Column = 1 And Target.Value <> "" And Target.Offset(0, 1) = "" Then St = St + "Колона B пустая" & Chr(10)
If Target.Column = 1 And Target.Value <> "" And Target.Offset(0, 3) <> "" Then St = St + "Колона D не пустая" & Chr(10)
If St <> "" Then Target.Select: Target.Value = "": MsgBox St
End Sub
Alt+F11. Вставить код в модуль Лист1. Закрыть окно VBA
Теперь можно проверить как работает.
В Экселе есть мощное средство, по-английски называется validation. Описывать здесь долго, нудно и переводчик юзверских мануалов из меня никакой. Надо почитать хелп или зайти к Мистеру Экселу (w w w . mrexcel . c o m - пробелы ликвидировать как класс) . Будет нирвана.
VBA Excel
код
Private Sub Worksheet_Change(ByVal Target As Range)
adr = Target.Address
MsgBox
подробнее...
VBA EXcel ActiveCell..
в модуле нужного листа вставьте код:
Private Sub Worksheet_Change(ByVal Target As
подробнее...
У меня вопрос по Excel 2010, выделение цветом ячеек при поиске в документе
Макрос, код которого ниже окрашивает выделенную ячейку. Код поместить в модуль "Эта книга"