I have used following code in a form to change a text box on another form's default value to change.
Code is working fine but when I convert the .accdb file to .accdr, it says "Error 7802 This command is not available in .mde, .accde"
I understand it might be due to I am opening another form in design view, but then without doing that how I can accomplish this.
Many thanks for your help.
Code is working fine but when I convert the .accdb file to .accdr, it says "Error 7802 This command is not available in .mde, .accde"
I understand it might be due to I am opening another form in design view, but then without doing that how I can accomplish this.
Many thanks for your help.
If Not IsNull(Me.txtNewDefault) Then
DoCmd.OpenForm "frmMarkFinished", acDesign, , , , acHidden
Forms!frmMarkFinished.txtContainerWeight.DefaultValue = Me.txtNewDefault
DoCmd.Close acForm, "frmMarkFinished", acSaveYes
DoCmd.Close acForm, "frmChangeDefault"
Else
MsgBox "Please enter a value to proceed.", vbInformation, "No value to save"
Me.txtNewDefault.SetFocus
End If