You can do that w/o macro substitution.

STORE createobject(lcClassName) TO ("this." + lcObjectName)

>
>Victor,
>Isn't this a duplication of createobject() or newobject(). If you could provide why you need to do it we can have better ideas. Macro substitution and eval() would work :
>

>procedure createObject
>lparamaters lcClassName, lcObjectName
>  this.&lcObjectName = createobject(lcClassName)
>*  this.oMyobject = this.&lcObjectName
>  with evaluate('this.'+lcObjectName)
>     .enabled = .t.
>  endwith
>endproc
>

Cetin