Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Textbox from 1st worksheet to textbox to other multiple sheets
I am trying to copy a textbox to another textbox in multiple sheets within
the workbook. Below is what I use to copy to one additional worksheet, but not multiple worksheets after the 2nd. Can anyone help? Thanks Worksheets(2).Range("A1") = Worksheets(1).TextBox1.Value Linda |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Textbox from 1st worksheet to textbox to other multiple sheets
Do you want to copy to Range("A1") of each sheet or to TextBox1 of each sheet?
If to Range("A1"): Sub cpyToRngA1() For i = 2 To Sheets.Count Worksheets(i).Range("A1") = Worksheets(1).TextBoxl1.Value Next End Sub If to TB1 on each sheet: Sub cpyToTB1() For i = 2 To Sheets.Count Worksheets(i).TextBox1.Value = Worksheets(1).TextBox1.Value Next End Sub "LRay67" wrote: I am trying to copy a textbox to another textbox in multiple sheets within the workbook. Below is what I use to copy to one additional worksheet, but not multiple worksheets after the 2nd. Can anyone help? Thanks Worksheets(2).Range("A1") = Worksheets(1).TextBox1.Value Linda |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Textbox from 1st worksheet to textbox to other multiple sheets
JLG, thanks for the input
The second scenario is what I am trying to do.....When copying the the code it highlights, on the Worksheets(i).TextBox32.Value = Worksheets(1).TextBox32.Value part..... This is the code I am using with your help (which is deeply appreciated) Sub TextBox32_LostFocus() For i = 2 To Sheets.Count Worksheets(i).TextBox32.Value = Worksheets(1).TextBox32.Value Next End Sub Can you assist once more. Thanks Linda "JLGWhiz" wrote: Do you want to copy to Range("A1") of each sheet or to TextBox1 of each sheet? If to Range("A1"): Sub cpyToRngA1() For i = 2 To Sheets.Count Worksheets(i).Range("A1") = Worksheets(1).TextBoxl1.Value Next End Sub If to TB1 on each sheet: Sub cpyToTB1() For i = 2 To Sheets.Count Worksheets(i).TextBox1.Value = Worksheets(1).TextBox1.Value Next End Sub "LRay67" wrote: I am trying to copy a textbox to another textbox in multiple sheets within the workbook. Below is what I use to copy to one additional worksheet, but not multiple worksheets after the 2nd. Can anyone help? Thanks Worksheets(2).Range("A1") = Worksheets(1).TextBox1.Value Linda |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
HELP! I Lost The Ability To Advance From TextBox To TextBox With the ENTER Or The TAB Keys | Excel Programming | |||
Textbox Bug? Missing/delayed update of textbox filled via VBA | Excel Programming | |||
Textbox Bug? Missing/delayed update of textbox filled via VBA | Excel Programming | |||
How to move cursor from one textbox control to another textbox con | Excel Programming | |||
UserForm TextBox to ActiveSheet TextBox over 256 characters | Excel Programming |