Galima paprasčiau:
Selection.NumberFormat = "@"
ActiveCell.Value = "--"
"toms"  wrote in message news:mmgm2g$j7t$1@trimpas.omnitel.net...
Matyt teks kitaip problema sprest. Vietoj "--" kazka kita naudot, tik
reikalu bus daugiau, tikejaus lengvai issisukt.
Anyway dekui uz mintis.
> Tai matyt apskritai neįmanoma. Naudok 'null' ar 'none' ar pan. prasminį 
> žodelį vietoje '--'. Arba escape'ink visas reikšmes, kurios yra pačios 
> savaime (nėra formulės, kintamieji), pradėdamas tokią reikšmę vienguba 
> kabute "'":
>
> ThisWorkbook.Names("Projektas").Value = "'" & lBCC.List(l, 1)
>