Object Required
 

Ikeep getting an object required error on the rngDieLook line. Can anyone
help me.

Private Sub CommandButton1_Click()

strTarget = UserForm1.TextBox1.Value
rngTargetCell = Worksheets(2).Range("A:A").Find(strTarget).Address

rngDieLook = Range(rngTargetCell.Offset(1, 0), rngTargetCell.Offset(4,
0)).Find("Die").Address

MsgBox rngDieLook

Object Required
 

Do you want rngTargetCell to be a range or a string variable?
--
Gary's Student


"aftamath" wrote:

Ikeep getting an object required error on the rngDieLook line. Can anyone
help me.

Private Sub CommandButton1_Click()

strTarget = UserForm1.TextBox1.Value
rngTargetCell = Worksheets(2).Range("A:A").Find(strTarget).Address

rngDieLook = Range(rngTargetCell.Offset(1, 0), rngTargetCell.Offset(4,
0)).Find("Die").Address

MsgBox rngDieLook

Object Required
 

Yes, a range object. Same with rngDieLook.

"Gary''s Student" wrote:

Do you want rngTargetCell to be a range or a string variable?
--
Gary's Student


"aftamath" wrote:

Ikeep getting an object required error on the rngDieLook line. Can anyone
help me.

Private Sub CommandButton1_Click()

strTarget = UserForm1.TextBox1.Value
rngTargetCell = Worksheets(2).Range("A:A").Find(strTarget).Address

rngDieLook = Range(rngTargetCell.Offset(1, 0), rngTargetCell.Offset(4,
0)).Find("Die").Address

MsgBox rngDieLook