Hide control in Continuous form (1 Viewer)

Gismo

Registered User.
Local time
Today, 15:49
Joined
Jun 12, 2017
Messages
481
Hi All,

is it possible to hide a control per record on a continuous form?

and, can you use conditional formatting on a label?
 

Micron

AWF VIP
Local time
Today, 08:49
Joined
Oct 20, 2018
Messages
3,123
1 - yes and no; you have to fake it, but you didn't say when. There is post 4 here and several suggestions in the similar threads at the bottom of your thread. One of them might be the same.
2 - I think requires more fakery, such as using a textbox as a label. Labels don't have data so I'm fairly certain cf won't work on them, and if it did, it will probably cascade to all instances of that label in a continuous form.
 
Last edited:

Gismo

Registered User.
Local time
Today, 15:49
Joined
Jun 12, 2017
Messages
481
why would a form with multiple conditional formatting loose its format?
i have to go into the forms VB to compile to rectify
it happens quite often

This is what it should look like
1590509027933.png



and this is what it looks like every time I open the DB

1590509137122.png
 

Gismo

Registered User.
Local time
Today, 15:49
Joined
Jun 12, 2017
Messages
481
on the same form, I get an error when opening on the "on current" and "on Load"

#Private Sub Form_Current()
If Me.RecordsetClone.RecordCount = 0 Then
DoCmd.OpenQuery "Clear_Registration_File"
DoCmd.OpenQuery "Update_Registration_All"
Me.Requery
End If
End Sub

Private Sub Form_Load()
If Me.RecordsetClone.RecordCount = 0 Then
DoCmd.OpenQuery "Clear_Registration_File"
DoCmd.OpenQuery "Update_Registration_All"
Me.Requery
End If
End Sub#
 

Gismo

Registered User.
Local time
Today, 15:49
Joined
Jun 12, 2017
Messages
481
After debug / compile,, the conditional formatting does not work on all my controls

1590585881421.png
 

Gismo

Registered User.
Local time
Today, 15:49
Joined
Jun 12, 2017
Messages
481
I managed to get it fixed, I rebuild the form
thank you

but i am still getting errors when opening the form on the "on current" and "on Load"

#Private Sub Form_Current()
If Me.RecordsetClone.RecordCount = 0 Then
DoCmd.OpenQuery "Clear_Registration_File"
DoCmd.OpenQuery "Update_Registration_All"
Me.Requery
End If
End Sub

Private Sub Form_Load()
If Me.RecordsetClone.RecordCount = 0 Then
DoCmd.OpenQuery "Clear_Registration_File"
DoCmd.OpenQuery "Update_Registration_All"
Me.Requery
End If
End Sub#
 

MajP

You've got your good things, and you've got mine.
Local time
Today, 08:49
Joined
May 21, 2018
Messages
3,183
Is the error "no current record?" If so try.

if me.recordsetClone.eof and me.recordsetclone.bof then
end if
 

Users Who Are Viewing This Thread (Users: 0, Guests: 1)

Top Bottom