Báo khi chưa nhập nhiệu đầy đủ

Liên hệ QC

lp0042019.dkdn

Thành viên mới
Tham gia
21/4/20
Bài viết
16
Được thích
2
Kính gửi các anh chị,
Nhờ các anh chị viết giúp em VBA để khi cột số lượng có dữ liệu mà cột giá chưa nhập thì báo " chưa nhập giá" theo file đính kèm giúp em ạ. Cảm ơn các anh chị.
 

File đính kèm

  • Bao loi nhap lieu.xlsm
    9.4 KB · Đọc: 6
Bạn gán 1 Name có tên là CNG với Refers to là "Chưa Nhập Giá"
& cho macro sau chạy:
PHP:
Sub ChuaNhapGia()
 Dim Cls As Range, Rng As Range
 
 If Cells(1, "C").Value <> "" Then
    Set Rng = Range([C1], [C65500].End(xlUp))
 Else
    Set Rng = Range([C1].End(xlDown), [C65500].End(xlUp))
 End If
 For Each Cls In Rng
    If IsNumeric(Cls.Value) And Cls.Value <> "" And Cls.Offset(, 1).Value = "" Then
        Cls.Offset(, 1).FormulaR1C1 = "=CNG"       '<=|  "
    End If
 Next Cls
End Sub
 
Upvote 0
Cái này dùng conditional formatting chứ tội gì phải dùng cốt kiếc.
 
Upvote 0
Web KT
Back
Top Bottom