Private Sub UserForm_Activate()
txbProjName.Value = Range("A" & Activecell.Row).Value
End Sub


--
---
HTH

Bob

(change the xxxx to gmail if mailing direct)


"PW11111" wrote in message
...

Hi,

I need to change the below code so instead of looking for the cell A1 (and
putting the value in a userform textbox) - it looks for the value in
column A
of the row that the user has selected.

Private Sub UserForm_Activate()
txbProjName.Value = Range("A1").Value
End Sub

This will allow the user to select a row - run the userform and view the
data for that specific row (record).

Any help would be great.

Phil