tuyen2806
Thành viên mới
- Tham gia
- 17/4/20
- Bài viết
- 40
- Được thích
- 7
Chào các Bác,
Em chỉ học lõm về VBA không có căn bản, đoạn code em viết bị lỗi Run-time error'424'; object required
Nhờ Bác nào chỉ giúp em với ạ
Cảm ơn
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("D12:I1000")) Is Not thing And Range("D" & Target.Row).Value <> Empty Then
Range("B3").Value = Target.Row
End If
End Sub
Sorry các Bác ,em tìm ra lỗi rồi hihi
Em chỉ học lõm về VBA không có căn bản, đoạn code em viết bị lỗi Run-time error'424'; object required
Nhờ Bác nào chỉ giúp em với ạ
Cảm ơn
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("D12:I1000")) Is Not thing And Range("D" & Target.Row).Value <> Empty Then
Range("B3").Value = Target.Row
End If
End Sub
Bài đã được tự động gộp:
Sorry các Bác ,em tìm ra lỗi rồi hihi
Lần chỉnh sửa cuối: