A
accesshacker
Hello,
I am trying to reposition Textboxes if a Textbox has a null value based on a
selection from a form. Doesn't look like they move. Here is my code.
Private Sub GroupHeader3_Format(Cancel As Integer, FormatCount As Integer)
Dim a As Variant
a = Forms!POC_PO_CREATE_A!POP5
If IsNull(a) Then
Me.POP3.Top = 2.9688
Me.POP4.Top = 3.2708
Me.POP5.Top = 3.5729
End If
End Sub
Want to move POP3 to where POP5 was and POP4 to where POP3 was and finally
POP5 to where POP4 was. When I go to 'View', none have moved. In Print
Preview, all 3 are gone.
Not sure what I am doing wrong. Thanks in advance for any insights!
I am trying to reposition Textboxes if a Textbox has a null value based on a
selection from a form. Doesn't look like they move. Here is my code.
Private Sub GroupHeader3_Format(Cancel As Integer, FormatCount As Integer)
Dim a As Variant
a = Forms!POC_PO_CREATE_A!POP5
If IsNull(a) Then
Me.POP3.Top = 2.9688
Me.POP4.Top = 3.2708
Me.POP5.Top = 3.5729
End If
End Sub
Want to move POP3 to where POP5 was and POP4 to where POP3 was and finally
POP5 to where POP4 was. When I go to 'View', none have moved. In Print
Preview, all 3 are gone.
Not sure what I am doing wrong. Thanks in advance for any insights!