ipbr21054
Well-known Member
- Joined
- Nov 16, 2010
- Messages
- 5,737
- Office Version
- 2007
- Platform
- Windows
Hi,
I have a userform which in the various Textboxes i have the following,
Example
TextBox2 NAME "customer in question value is taken from worksheet cell A"
TextBox3 ADDRESS "customer in question value is taken from worksheet cell R"
Etc etc
The userform is records on invoices.
I have a next & previos command button which steps through invoices to view.
The above all works fine.
I added a new Texbox being TextBox9 & "customer in question taken from worksheet cell AB"
My issue is that when i select next or previous all the Textbox values change according to customer in question BUT Textbox9 shows same value.
Code on next & previous is shown below.
I do also have this below BUT all the other textboxes change & ive only copied what is allready there so i dont se why Textbox9 stays the same ??
I have a userform which in the various Textboxes i have the following,
Example
TextBox2 NAME "customer in question value is taken from worksheet cell A"
TextBox3 ADDRESS "customer in question value is taken from worksheet cell R"
Etc etc
The userform is records on invoices.
I have a next & previos command button which steps through invoices to view.
The above all works fine.
I added a new Texbox being TextBox9 & "customer in question taken from worksheet cell AB"
My issue is that when i select next or previous all the Textbox values change according to customer in question BUT Textbox9 shows same value.
Code on next & previous is shown below.
Rich (BB code):
Private Sub NextRecord_Click()
Navigate Direction:=xlNext
End Sub
Private Sub PrevRecord_Click()
Navigate Direction:=xlPrevious
End Sub
I do also have this below BUT all the other textboxes change & ive only copied what is allready there so i dont se why Textbox9 stays the same ??
Rich (BB code):
Me.TextBox1.Value = ws.Range("Q" & Rw).Value
Me.TextBox2.Value = ws.Range("R" & Rw).Value
Me.TextBox3.Value = ws.Range("S" & Rw).Value
Me.TextBox4.Value = ws.Range("T" & Rw).Value
Me.TextBox5.Value = ws.Range("U" & Rw).Value
Me.TextBox6.Value = ws.Range("V" & Rw).Value
Me.TextBox7.Value = ws.Range("W" & Rw).Text
Me.TextBox9.Value = ws.Range("AB" & Rw).Value