VBE313
Well-known Member
- Joined
- Mar 22, 2019
- Messages
- 686
- Office Version
- 365
- Platform
- Windows
I have 10 pages of all the same textboxes but named "Page1Reg1.Text" or "Page10Reg.Text" for example. I would like to know if you could have the multiselect values paste in each page.
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg1.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg2.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg3.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg4.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg5.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg6.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg7.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg8.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg9.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg10.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg1.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg2.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg3.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg4.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg5.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg6.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg7.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg8.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg9.Text
ListBox1.List(ListBox1.ListIndex).Value = .Page1Reg10.Text