How to assign text to forms
Is there a way to assign the active or selected cell on a worksheet to a
TextBox on a form? This is what I have to far but it is not working.
Private Sub txtSiteRw_Change()
txtSiteRw.Value = Application.ActiveCell.Address
If txtSiteRw.Value = "" Then
Me.cmdFillForm.Enabled = False
ElseIf txtSiteRw.Value < "" Then
Me.cmdFillForm.Enabled = True
End If
End Sub
Any help will be greatly appreciated.
|