Passing Object reference in Visual Basic (VBA)

Question

How to pass Form TextBox reference to method?

Following code is issuing exception.

Private Sub DoSmthWithTextBox(ByRef txtBox as TextBox)
    txtBox.BackColor = vbRed
End Sub

Private Sub TextBox1_Change()
    DoSmthWithTextBox Me.TextBox1
End Sub

Problem appears when'DoSmthWithTextBox Me.TextBox1' passes string from TextBox1 insead of object reference. How to pass TextBox object to method DoSmthWithTextBox?

Thanx

Answer 1

Rewrite for Excel:

Private Sub DoSmthWithTextBox(txtBox As MSForms.TextBox)
    txtBox.BackColor = vbRed
End Sub

As far as I know, this is because Excel has an object textbox that is a shape, whereas userforms use the ActiveX control textbox, so you need an explicit reference to the MSForms library.