nniedzielski
Well-known Member
- Joined
- Jan 8, 2016
- Messages
- 598
- Office Version
- 2019
- Platform
- Windows
I am running the code below, the cell that should be activating is A2, somehow R1 keeps getting activated and the next steps are happening in the wrong spot.
what am i doing wrong here?
what am i doing wrong here?
Code:
Private Sub cmdOk_Click()
If chkdefective.Value = True And optPlastic.Value = True Then
With Worksheets("SealLog").Range("A:A")
Worksheets("SealLog").Activate
Cells.Find(txtSealnumberPlastic, LookIn:=xlValues).Activate
ActiveCell.Offset(0, 5) = "Defective"
ActiveCell.Offset(0, 6) = "y"
End With
End If
End Sub