David,

Thanks for the tip. I guess that I don't understand the EVALUATE() Function that well as it has helped me twice in the last few weeks to get something to work like your example.
The help file said :
"Evaluates a character expression and returns the result."
If User.Name = "Column1" does loColumn get replaced with the text "This.Column1" ?

Thanks

>John,
>
>Try code like this to get rid of the macros:
>
>

loColumn = eval( "this." + alltrim( user.name ) )
>with loColumn
>   .ColumnOrder = user.ColumnOrder
>   .Width = user.Width
>endwith

>
>>John,
>>
>>I solved the problem using the following syntax
>>
>>SELECT User
>>
>>LOCATE FOR User.FormName = ThisForm.Name
>>DO WHILE FOUND( )
>> lcColOrder = "This." + ALLTRIM(User.Name) + ".ColumnOrder"
>> &lcColOrder = User.ColumnOrder
>> lcColOrder = "This." + ALLTRIM(User.Name) + ".Width"
>> &lcColOrder = User.Width
>> CONTINUE
>>ENDDO