need help with seeting an activecell in VBA

[GregJG]

this is the code i have so far......

Dim rng As Range
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Set wb = Workbooks.Open("f:\Bidditjobs.xls")
Set rng = wb.Worksheets("jobs").Columns(1).find(cobOpenPro.Value)
ActiveCell.Select
Biddit.txtJobNumber.Value = ActiveCell.Value
Biddit.cobRep.Value = ActiveCell.Offset(0, 1).Value
Biddit.txtMainPrice.Value = ActiveCell.Offset(0, 2).Value
Biddit.txtMainPercent.Value = ActiveCell.Offset(0, 3).Value
.....

How could I have the ActiveCell.Select begin in the row it finds the
cobOpenPro.value? right not is is only pulling in from row 1

 

[Frank Kabel]

Hi
try:

Dim rng As Range
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Set wb = Workbooks.Open("f:\Bidditjobs.xls")
Set rng = wb.Worksheets("jobs").Columns(1).find
(cobOpenPro.Value)

Biddit.txtJobNumber.Value = rng .Value
Biddit.cobRep.Value = rng .Offset(0, 1).Value
Biddit.txtMainPrice.Value = rng .Offset(0, 2).Value
Biddit.txtMainPercent.Value = rng .Offset(0, 3).Value

 

[GregJG]

Thanks again!