Добрый день! Столкнулся с проблемой макрос воспринимает текст как 0.
Пример: в 2 строках есть, итоговый бал и текущий. Текущий принимает значения 0,1,A а итоговый от 0 и далее. Итоговый увеличивается после того как текущий бал равен A, тут и ошибка
то что A видит как ноль и присваивает ему ноль
Sub main
Dim Doc As Object
Dim Sheet As Object
Doc = ThisComponent
Sheet = Doc.Sheets(0)
if Sheet.getcellbyposition(2,1).value=0 then
Sheet.getcellbyposition(2,1).value=1
else
if Sheet.getcellbyposition(2,1).value=1 then
Sheet.getcellbyposition(2,1).string="A"
else
if Sheet.getcellbyposition(2,2).value=0 or Sheet.getcellbyposition(2,2).value=1 and Sheet.getcellbyposition(2,1).string="A" then
Sheet.getcellbyposition(2,1).value=0
Sheet.getcellbyposition(2,2).value=0
Sheet.getcellbyposition(1,1).value=Sheet.getcellbyposition(1,1).value+1
endif
endif
endif
End Sub
Понимаю что дело в Sheet.getcellbyposition(2,1).value он распознает только число можно его заменить