Check Box for Same Billing/Shipping Address

  • Thread starter Thread starter Brook
  • Start date Start date
B

Brook

I have a form that is based on my customer table. When I
add a new customer I have a check box for my
Shipping/Billing Address, and if the check box is Checked
(True) then the Shipping Address Fields are populated with
the Billing Address Fields. Below are the fields and I
appreciate any help I can get. Brook

BillingAddr1
BillingAddr2
BillingCity
BillingState
BillingZip
ShippingAddr1
ShippingAddr2
ShippingCity
ShippingState
ShippingZip
 
Brook:

You do not ask a question here. What is it you want us to explain?

Rick B


I have a form that is based on my customer table. When I
add a new customer I have a check box for my
Shipping/Billing Address, and if the check box is Checked
(True) then the Shipping Address Fields are populated with
the Billing Address Fields. Below are the fields and I
appreciate any help I can get. Brook

BillingAddr1
BillingAddr2
BillingCity
BillingState
BillingZip
ShippingAddr1
ShippingAddr2
ShippingCity
ShippingState
ShippingZip
 
Sorry about that,

What I cannot figure out is the code for when the Check
Box is true then the fields are populated from Billing to
the Shipping Address.

Brook
 
In the AfterUpdate event of the checkbox put code such as the following.
Note: you did not tell us the name of your checkbox field.

Private Sub CheckBoxField_AfterUpdate()
If CheckBoxField Then
ShippingAddr1 = BillingAddr1
ShippingAddr2 = BillingAddr2
ShippingCity = BillingCity
ShippingState = BillingState
ShippingZip = BillingZip
End If
End Sub


Rick B



Sorry about that,

What I cannot figure out is the code for when the Check
Box is true then the fields are populated from Billing to
the Shipping Address.

Brook
 
Great.. thanks for your help!

Brook



-----Original Message-----
In the AfterUpdate event of the checkbox put code such as the following.
Note: you did not tell us the name of your checkbox field.

Private Sub CheckBoxField_AfterUpdate()
If CheckBoxField Then
ShippingAddr1 = BillingAddr1
ShippingAddr2 = BillingAddr2
ShippingCity = BillingCity
ShippingState = BillingState
ShippingZip = BillingZip
End If
End Sub


Rick B



Sorry about that,

What I cannot figure out is the code for when the Check
Box is true then the fields are populated from Billing to
the Shipping Address.

Brook




.
Click to expand...
 
Back
Top