Em muốn các giá trị cột A + ô B1 ghi vào từng ô trên cột C(vd:A1,A2,A3=2,5,7+8 thì ô C1,C2,C3=10,13,15) nếu giờ em xóa ô A3 thì ô C3 không có giá trị chứ không phải là 8,nếu thêm ô A4 thì ô C4 phải có giá trị. Xin các Anh/Chị giúp em.Xin cám ơn.BUI CHI THANH nói:Ở Ô C1 em lập công thức như sau =iF(A1<>0,(A1+$B$1),"") sau đó em copy kéo xuống các Ô C1->C22.
Các Anh/Chị có thể dùng VBA để giải quyết trường hợp này ko?. Em ko muốn sao chép công thức xuống.Xin cám ơn các Anh/Chị.gacon0904 nói:Em muốn các giá trị cột A + ô B1 ghi vào từng ô trên cột C(vd:A1,A2,A3=2,5,7+8 thì ô C1,C2,C3=10,13,15) nếu giờ em xóa ô A3 thì ô C3 không có giá trị chứ không phải là 8,nếu thêm ô A4 thì ô C4 phải có giá trị. Xin các Anh/Chị giúp em.Xin cám ơn.
Sao em làm khó vấn đề thêm vậy ! Nó hết sức đơn giãn mà . Nhưng bạn muốn dùng VBA làm cũng được nhưng Bạn có hiểu nhiều về VBA không ?gacon0904 nói:Các Anh/Chị có thể dùng VBA để giải quyết trường hợp này ko?. Em ko muốn sao chép công thức xuống.Xin cám ơn các Anh/Chị.
Cám ơn Anh Bình nhiều. Chúc một tuần mới vui và mọi thứ tốt đẹp.Bình_OverAC nói:Đoạn code mà ban yêu cầu đây. Bạn phải chép nó vào code của sheet mà bạn muốn. Chúc bạn thành công.
---------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
If Target.Value = "" Or Not IsNumeric(Target.Value) Then
Range("C" & Target.Row).Value = ""
Else
Range("C" & Target.Row).Value = Range("A" & Target.Row).Value + Range("B1")
End If
End If
End Sub
---------------------------