I have a user form with 2 pages "invoice address" and "delivery address" the
user enters details into some text boxes which then sends info to the
spreadsheet.

On occasion the invoice details and the delivery details are the same so i
added a check box at the bottom of the form end entered the following code:

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
TextBox11.Value = TextBox1.Value
textbox12.value=textbox2.value
End If
end sub

thh problem id when you click the box it only filles in textbox11 to get it
to fill in textbox12 you have to click the checkbox again.

Can anyone help?

Your code looks fine. Is this your actual code? It looks like you typed it
in, and I suspect your actual code is different.

I would put a breakpoint on the first line of code and then step through
the code when you click the button. I particular, I would put watches on
the different parts. For example, a watch on textbox2.value to see if it
truely has a value when one clicks the button.

Bob Flanagan
Macro Systems
144 Dewberry Drive
Hockessin, Delaware, U.S. 19707

Phone: 302-234-9857, cell 302-584-1771
http://www.add-ins.com
Productivity add-ins and downloadable books on VB macros for Excel

"Jim" <(E-Mail Removed)> wrote in message
news:64EC3E89-4B40-4325-BA64-(E-Mail Removed)...
>I have a user form with 2 pages "invoice address" and "delivery address"
>the
> user enters details into some text boxes which then sends info to the
> spreadsheet.
>
> On occasion the invoice details and the delivery details are the same so i
> added a check box at the bottom of the form end entered the following
> code:
>
> Private Sub CheckBox1_Click()
> If CheckBox1.Value = True Then
> TextBox11.Value = TextBox1.Value
> textbox12.value=textbox2.value
> End If
> end sub
>
> thh problem id when you click the box it only filles in textbox11 to get
> it
> to fill in textbox12 you have to click the checkbox again.
>
> Can anyone help?

Jim,

The code below won't cause that problem, it works perfectly provided
checkboxes 1 & 2 are populated. Have a look at how you are doing that.

Mike

"Jim" wrote:

> I have a user form with 2 pages "invoice address" and "delivery address" the
> user enters details into some text boxes which then sends info to the
> spreadsheet.
>
> On occasion the invoice details and the delivery details are the same so i
> added a check box at the bottom of the form end entered the following code:
>
> Private Sub CheckBox1_Click()
> If CheckBox1.Value = True Then
> TextBox11.Value = TextBox1.Value
> textbox12.value=textbox2.value
> End If
> end sub
>
> thh problem id when you click the box it only filles in textbox11 to get it
> to fill in textbox12 you have to click the checkbox again.
>
> Can anyone help?

ok i've found out what the problem is but it's caused another.

if i remove the control source from each of the text boxes on the delivery
address the code works fine but the information now no longer transfers onto
the spreadsheet.

"Mike H" wrote:

> Jim,
>
> The code below won't cause that problem, it works perfectly provided
> checkboxes 1 & 2 are populated. Have a look at how you are doing that.
>
> Mike
>
> "Jim" wrote:
>
> > I have a user form with 2 pages "invoice address" and "delivery address" the
> > user enters details into some text boxes which then sends info to the
> > spreadsheet.
> >
> > On occasion the invoice details and the delivery details are the same so i
> > added a check box at the bottom of the form end entered the following code:
> >
> > Private Sub CheckBox1_Click()
> > If CheckBox1.Value = True Then
> > TextBox11.Value = TextBox1.Value
> > textbox12.value=textbox2.value
> > End If
> > end sub
> >
> > thh problem id when you click the box it only filles in textbox11 to get it
> > to fill in textbox12 you have to click the checkbox again.
> >
> > Can anyone help?