Не хочет искать число 286,45 в диапазоне. Кричит с ошибкой №91.
- Код: Выделить всё
Public Sub ww()
Dim decc As Double
Dim ssss As Double
decc = 0.45
ssss = 286 + decc
Range("A1:A30").Find(What:=ssss, LookIn:=xlValues, LookAt:=xlWhole).Select
End Sub
Нашел выход только если в последней строчке после What:=
написать не ssss, а
- Код: Выделить всё
CStr(ssss)
Не могу понять что ему не нравиться. В хелпе написано что поле What может содержать любой тип данных экселя. В книжке прочитал про ошибку. Сказано, что "переменная блока With не установлена или когда создается ссылка на объект рабочего листа, а в это время активен лист диаграммы". Но как это с моим случаем соотносится, не могу понять. Помогите плиз разобраться.