B
Bob Vance
My Form is used for 2 Me.Caption
1 Me.Caption = "Distribute Through Owner.."
2 Me.Caption = "Holding Invoices"
I want this AfterUpdate only to work with , Me.Caption = "Holding Invoices"
and not with the other
Is this possible to code?
Private Sub lstModify_AfterUpdate()
Me.cmdEmail.Visible = IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.lblEmailOption.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.cmbEmailOption.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.lblEmailAvailable.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
End Sub
1 Me.Caption = "Distribute Through Owner.."
2 Me.Caption = "Holding Invoices"
I want this AfterUpdate only to work with , Me.Caption = "Holding Invoices"
and not with the other
Is this possible to code?
Private Sub lstModify_AfterUpdate()
Me.cmdEmail.Visible = IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.lblEmailOption.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.cmbEmailOption.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
Me.lblEmailAvailable.Visible =
IIf(IsOwnerWithEmail(Nz(Me.lstModify.Column(2), 0)) _
And IsEmailOn, True, False)
End Sub