How do I link two text boxes?

Stromm · Apr 7th, 2002, 01:08 PM

I have two sheets in one workbook. When I type text in a textbox on one sheet, I need it duplicated in a textbox on the other sheet.
I just can't figure this out.

Anyone?

Thanks.

Ricky Morris · Apr 7th, 2002, 02:15 PM

Try using the camera feature to take a picture of any area within a workbook and displaying as a picture somewhere else.

From the menu click View > Toolbar > Customize. Click the Command tab. Click Tools in the category box. Scroll down to the end of the end of the commands box, third icon from the bottom is a camera. Place it on your toolbar by click and dragging it.

Now highlight the range that contains the text box to be displayed on another worksheet. Click the camera icon on the tool bar. Navigate to the new sheet and click on the location to display the picture of the text box.

I hope this helps. Let me know.

Tom Schreiner · Apr 7th, 2002, 02:52 PM

Hi
Put your workbook into design mode
Choose View, Toolbars, Control ToolBox.
On your Control Toolbox Menu, choose the design triangle.(probably in the upper-left corner)
Double-click your textbox.
Note the name of your textbox in the upper left corner of the new window.
Close the window.
Also note the name of your active worksheet on the worksheet tab.
Now go to the sheet containing the second text box.
Double-click on this textbox and a window should pop up. This is the code module for your worksheet. The "Change" event should be on your screen already, if not, choose it by clicking the combo box on the upper right.

Type this inside the change sub procedure

Sheets("YourOtherSheetName").TextBoxNameOnFirstSheet.Text = CurrentTextBoxName.Text

Should look something like this:

Private Sub TextBox1_Change()
Sheets("Sheet1").TextBox1.Text = TextBox1.Text
End Sub

Repeat this process for the other sheet.

If you cannot accomplish what you need done
with the following instruxtions then post the following:

SheetName 1
Textbox Name 1

SheetName 2
Textbox Name 2

Thanks,
Tom

[ This Message was edited by: TsTom on 2002-04-07 13:53 ]

Apr 7th, 2002, 02:15 PM	#2
Ricky Morris Board Regular Join Date: Mar 2002 Posts: 363	Try using the camera feature to take a picture of any area within a workbook and displaying as a picture somewhere else. From the menu click View > Toolbar > Customize. Click the Command tab. Click Tools in the category box. Scroll down to the end of the end of the commands box, third icon from the bottom is a camera. Place it on your toolbar by click and dragging it. Now highlight the range that contains the text box to be displayed on another worksheet. Click the camera icon on the tool bar. Navigate to the new sheet and click on the location to display the picture of the text box. I hope this helps. Let me know. __________________ It's never too late to learn something new. Ricky

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Apr 7th, 2002, 01:08 PM	#1
Stromm New Member Join Date: Apr 2002 Posts: 1	I have two sheets in one workbook. When I type text in a textbox on one sheet, I need it duplicated in a textbox on the other sheet. I just can't figure this out. Anyone? Thanks.

Apr 7th, 2002, 02:52 PM	#3
Tom Schreiner Board Regular Join Date: Mar 2002 Location: Cincinnati, Ohio, USA Posts: 6,824	Hi Put your workbook into design mode Choose View, Toolbars, Control ToolBox. On your Control Toolbox Menu, choose the design triangle.(probably in the upper-left corner) Double-click your textbox. Note the name of your textbox in the upper left corner of the new window. Close the window. Also note the name of your active worksheet on the worksheet tab. Now go to the sheet containing the second text box. Double-click on this textbox and a window should pop up. This is the code module for your worksheet. The "Change" event should be on your screen already, if not, choose it by clicking the combo box on the upper right. Type this inside the change sub procedure Sheets("YourOtherSheetName").TextBoxNameOnFirstSheet.Text = CurrentTextBoxName.Text Should look something like this: Private Sub TextBox1_Change() Sheets("Sheet1").TextBox1.Text = TextBox1.Text End Sub Repeat this process for the other sheet. If you cannot accomplish what you need done with the following instruxtions then post the following: SheetName 1 Textbox Name 1 SheetName 2 Textbox Name 2 Thanks, Tom [ This Message was edited by: TsTom on 2002-04-07 13:53 ]