Cho mình hỏi, đọna code sau bị lỗi , hôg hiểu vì sao
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Set oCurrent = ActiveCell.Value
If Not IsEmpty(oCurrent) Then
Cells.Find(What:="oCurrent", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows...