Local mName, oCol, oControl FOR EACH oCol IN this.Columns for each oControl in oCol.controls if Upper(oControl.class) == 'TEXTBOX' mName = oControl.name && Keep same name oCol.RemoveObject(mName) oCol.NewObject(mName,[cTextBox],[vjctrl.vcx]) oCol.CurrentControl = mName store .t. to ('oCol.' + mName + '.visible') EndIf endfor ENDFOR