Код |
---|
Private Sub App_sheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Column = 2 Then Application.EnableEvents = False For Each x In Target.Cells x.Value = Application.Proper(x.Value) Next x Application.EnableEvents = True End If End Sub |
Пустая ячейка определяется в VBA как непустая
11.08.2020 14:45:57
inseption, а покажите файл-пример с этой пустой не пустой ячейкой
Не бойтесь совершенства. Вам его не достичь.
|
|
|
|
11.08.2020 14:58:05
|
|
|
|
11.08.2020 15:21:05
|
|
|
|
11.08.2020 15:32:40
Изменено: |
|
|
|
11.08.2020 15:38:14
Mershik, вот это наверное имеется ввиду пока делетте не сделаешь в ячейке она пуста ЕПУСТО ИСТИНА, как только очищаешь ячейку она становится не пуста ЕПУСТО ЛОЖЬ
Лень двигатель прогресса, доказано!!!
|
|
|
|
11.08.2020 15:41:15
inseption,
Не бойтесь совершенства. Вам его не достичь.
|
|
|
|
11.08.2020 15:42:19
результат функции Application.Proper(x.Value) это текст, даже если x.Value = Empty
сделайте проверку на пустоту перед конвертацией
F1 творит чудеса
|
|
|
|
11.08.2020 17:38:51
ведь проблема появляется уже ПОСЛЕ. Значит надо делать что-то именно ДО. Вместо
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
|
|||||||
|
|
12.08.2020 08:36:37
Дмитрий(The_Prist) Щербаков, Спасибо Всем!
|
||||
|
|
|||