Multipage Control in a Userform

Tech-Archive recommends: Speed Up your PC by fixing your registry



Hi

I have a Userform with a Multipage control on it with 2 pages setup. I
have several Textboxs on each page to be populated by a user. My
problem is i cannot get that infomation entered into the spread***.

text1 on page 1

text2 on page 2

Thanks

Addy



Private Sub CommandButton1_Click()
'On Error GoTo ErrorHandler:

Dim text1 As String
Dim text2 As String

Dim material1 As Range
Dim material2 As Range

text1 = UserForm8.TextBox1.Value
text2 = UserForm8.TextBox2.Value

ActiveCell.Offset(0, 1).Select
Set material1 = Selection

ActiveCell.Offset(0, 1).Select
Set material2 = Selection

material1.Value = text21
material2.Value = text22

end sub
.


Quantcast