Solved Conditional formatting record Edit (1 Viewer)

[smtazulislam]

I have use conditional formatting for criteria that, if cboStatus= Transfer then Visible false.
Its all working well, You can see attached image.

Now I want to add EDIT Button to edit record data.

I put cmdEdit button code:

 Private Sub cmdEdit_Click()
Me.cboStatus.Locked = True
End Sub

Its unlocked, but recored data and combo box dont shark and can't edit anything.
Any help...

 

[bastanu]

Can you show us the conditional formatting expression(s)? The code you show us LOCKS the combo, you need to set the .Locked=False to unlock it.
Where\how do you lock the record (as conditional formatting will not do that)?

Cheers,

 

[MajP]

I do not think I understand what you are saying, I do not see anything set to visible = false.
Do you mean in conditional formatting that you disable fields if cboStatus = transfer? Those looks possibly disabled.. If that is the case then...

If you would like to enable the disabled row, then I think you have to set that cboStatus to something like Null, and then probably a repaint to force the conditional formatting to update. If doing this in conditional formatting, you cannot override it.

me.cboStatus = Null
me.repaint

 

[smtazulislam]

Can you show us the conditional formatting expression(s)? The code you show us LOCKS the combo, you need to set the .Locked=False to unlock it.
Where\how do you lock the record (as conditional formatting will not do that)?

Cheers,

thank you so much.

Yes, my expression is [cboStatus]="Transfer"
then row will be lock (any Disable) .
But I want to edit previous row which already locked.

 

[smtazulislam]

Do you mean in conditional formatting that you disable fields if cboStatus = transfer? Those looks possibly disabled.. If that is the case then...

Yes, disable fields.
But some time we need to edit.
so that, I like to add a Edit button to correction data.
How can possible to enable those fields ?

 

[arnelgp]

 Private Sub cmdEdit_Click()
Me.cboStatus.Locked = (Me.cboStatus & "" = "Transfer")
End Sub

 

[smtazulislam]

 Private Sub cmdEdit_Click()
Me.cboStatus.Locked = (Me.cboStatus & "" = "Transfer")
End Sub

Thank you so much.
its field is Enable, but combo box not shark. I can't edit.

 

[arnelgp]

then, you just remove the code from cmdEdit button entirely.
then change you Conditional format to Only change the Font Color and Background Color and
and not use the Enable button.

 

[smtazulislam]

then, you just remove the code from cmdEdit button entirely.
then change you Conditional format to Only change the Font Color and Background Color and
and not use the Enable button.

If dont lock those rows, user member any time edit data easily.

Have any others ways to lock and Unlock
Or Disable and Enable when needed.

 

[arnelgp]

see this demo database.
the Format Condition is based on txtHidden (see the Format Condition).
see also the Load / AfterUpdate event of the form
that manipulate txtHidden textbox.

 

[smtazulislam]

see this demo database.
the Format Condition is based on txtHidden (see the Format Condition).
see also the Load / AfterUpdate event of the form
that manipulate txtHidden textbox.

omg !
I dont thinking that my edit buttom take your lots of times. Lots of code you are created for me. Really I appreciated for that.
Than you somuch Mr. @arnelgp.
You are genius man.