Hi All,
I am using this code to bring up my userform and it populates textboxes within the userform every time I click a value in column "A" and this seems to work fine,
But everything below "TextBox1" seems to come through slower, making the data inaccurate,
It could be the way I have set this up because the values from "Data 3" are taken from a Vlookup,
I will attach images hopefully showing what I'm trying to achieve,
Any help is appreciated,
I am using this code to bring up my userform and it populates textboxes within the userform every time I click a value in column "A" and this seems to work fine,
But everything below "TextBox1" seems to come through slower, making the data inaccurate,
It could be the way I have set this up because the values from "Data 3" are taken from a Vlookup,
I will attach images hopefully showing what I'm trying to achieve,
Any help is appreciated,
VBA Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A3000")) Is Nothing Then
userform1.Show
userform1.TextBox1.Value = Range(Target.Address).Value
userform1.Loosefig.Value = Sheets("Data 3").Range("C5").Value
userform1.Loosedays.Value = Sheets("Data 3").Range("D5").Value
userform1.Willmake.Value = Sheets("Data 3").Range("E5").Value
Worksheets("Data 3").Range("B5") = Range(Target.Address).Value
Worksheets("Data 3").Range("B6") = Range(Target.Address).Value
End If
End Sub