textbox help

[hail11]

Private Sub TextBox20_Change()
Sheets("Sheet1").Range ("b28")
End Sub

i want textbox20 to = cell b28 this isn't working?

 

[Gates Is Antichrist]

That seems like an odd thing to do but it's

Private Sub TextBox20_Change()
  TextBox20.Value = Range("b28")
End Sub

 

[hail11]

how do i get it so it auto populates when that vb screen comes up so i don't have to click on it. Also how can i change the number if it is wrong in the textbox

 

[Gates Is Antichrist]

In your ThisWorkbook code put

Private Sub Workbook_Open()
  Sheet1.activate
  Sheet1.TextBox20 = Range("b28")
End Sub

Did you really mean "that VB screen?"

 

[hail11]

...

 

[hail11]

Private Sub Workbook_Open()
Sheet1.activate
Sheet1.TextBox20 = Range("b28")
End Sub

i am using a userform1

so whenever it is open i need to have the textboxes filled in so i can see if they are correct

this isn't pulling it up............

 

[Gates Is Antichrist]

sheet1.activate
userform1.textbox20.value = activesheet.range("b28")
userform1.show

 

[hail11]

would it be like this then?


Private Sub UserForm_open()
sheet1.Activate
j.TextBox20.Value = ActiveSheet.Range("a1")
j.Show
End Sub

when i open it nuthing comes up

 

[hail11]

what can i do?