After making a selection within ComBoBox7 I would like to post data to the
row selected using Commandbutton1. Cell $a$4 contains the list index address

Code should look something like this

Private Sub CommandButton1_Click()
Dim rngcell As Excel.Range
If TypeName(ActiveSheet) = "Worksheet" Then
Set rngcell = ActiveSheet.Range("$A$4")
'Cell $A$4 contains a cell address
rngcell.Select
'make rngcell the active cell
End If
ActiveCell.Offset(0, 3) = TextBox13.Value
End Sub


--
Jim O