taip escape'inant gaunasi taip:

ThisWorkbook.Names("Projektas").Value = "'" & lBCC.List(l, 1) & "'"
print ThisWorkbook.Names("Projektas").Value
="'--'"
print ThisWorkbook.Names("Projektas").Value = "--"
False

Zodziu i stringa itraukia ir viengubas kabutes :(


"Laimis" <wiela@centras.lt> wrote in message 
news:mmbnnn$5nn$1@trimpas.omnitel.net...

> Reikia escape'int, kaip jau rašei.
>
> ThisWorkbook.Names("Projektas").Value = "'" & lBCC.List(n, 1) & "'"