it's working :love::love::love:
Tnx
first you need
Public frm, objOldName, objNewName
''remember you cant use me.form.name''
Public Sub test1(frm As String, objOldName As String, objNewName As String)
DoCmd.OpenForm frm, acDesign
Forms(frm).Controls(objOldName).Name = objNewName...