Deggasad Константин СочиПодскажет кто нибудь.
Есть Столбец J:J с пустыми ячейками
Необходимо запускать макрос как только в этом столбце
появится
цифровое значение?
В модуль Листа вставь
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim myRng As Range, iCel As Range
Set myRng = Intersect(Target, Columns( 10 ))
If Not myRng Is Nothing Then
For Each iCel In myRng
If iCel <> "" Then
MsgBox "ты меня запустил :)"
Exit For
End If
Next iCel
End If
End Sub
Наверное, описались.
Вместо
нужно вставить другую проверку.
Если тред-стартер не путает число с цифрой, то нужно проверять, не является ли iCell.Value цифрой.
