referencing the active cell

[Guest]

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

 

[Bob Phillips]

Do you mean?

Private Sub CommandButton1_Click()
Dim iRow as long
iRow = Application.Match(combobox1.value,Range("A1:A100"),0)
Cells(iRow,"A").Seelect
End Sub

 

[Guest]

--
Jim O

Do you mean?

Private Sub CommandButton1_Click()
Dim iRow as long
iRow = Application.Match(combobox1.value,Range("A1:A100"),0)
Cells(iRow,"A").Seelect
End Sub

--
HTH

Bob Phillips


Thank You
I was going about the task totally wrong manner