MsgBox i & ": " & absent(i).Value
после absent(i).Value = myabsent
.boolean
, - не может быть mixed
. Вариантов не много. ТипДопРеквизита = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоНаименованию("ИмяДопРеквизита");
ЗначениеДопРеквизита = Контрагент.ДополнительныеРеквизиты.Найти(ТипДопРеквизита).Значение;