Cần giúp về hàm tính tổng xuất

Liên hệ QC

transangcb

Thành viên mới
Tham gia
20/3/14
Bài viết
12
Được thích
0
Chào anh(chị) !
ai cho em hỏi hàm tính tổng xuất này với ạ:
ex.jpg
giờ em muốn tính tổng xuất của ô màu đỏ(trong ảnh) thì dùng hàm gì ạ ???
VD:
giờ em nhập số
 
Lần chỉnh sửa cuối:
Chào anh(chị) !
ai cho em hỏi hàm tính tổng xuất này với ạ:
...
giờ em muốn tính tổng xuất của ô màu đỏ(trong ảnh) thì dùng hàm gì ạ ???
VD:giờ em nhập số "2" vào ô "M3" thì ô "M3" đổi thành "2"...khi em nhập thêm "3" nữa thì ô "M3" thành 5
-Tóm lại là hàm gì mà "chính nó công với 1 ô nữa" :)
Thanks!

khi dùng trực tiếp công thức cho chính nó + ... thì sẽ gặp lỗi CIRCULAR REFERENCES (bạn nhìn thanh Status sẽ thấy). Muốn được vậy mình nghĩ chỉ có thể Macro là làm được. :-=
 
khi dùng trực tiếp công thức cho chính nó ... thì sẽ gặp lỗi CIRCULAR REFERENCES (bạn nhìn thanh Status sẽ thấy). Muốn được vậy mình nghĩ chỉ có thể Macro làm được. :-=
em đã thử toàn lỗi thôi...macro thì làm như thế nào anh hướng dẫ thweer giúp em được k ???
 
Lần chỉnh sửa cuối:
em đã thử toàn lỗi thôi...macro thì làm như thế nào anh hướng dẫ thweer giúp em được k ???

bạn up file lên GPE đi (mình ko tải được link của Google #1), nếu file nặng thì nén lại, nếu ko được nữa thì giả lập 1 file rồi + yêu cầu rõ hơn 1 tí nữa.

'---
Lần đầu tiên Việt Nam có Ngày Quốc tế Hạnh phúc +-+-+-+
 
Lần chỉnh sửa cuối:
Sửa Bài không thêm được anh à..
Links Box nè:tải về

Thêm:giờ em nhập số "2" vào ô "J3" thì ô "M3"="2"...khi em nhập thêm "3" vào ô nữa thì ô "J3"=5...nhập thêm 2 nữa vào ô "J3", thì M3=7 (2+3+2=7)

bản tải file đính kèm, cho chạy Macro.

nhập giá trị vào ô J3 tại sheet NHẬP theo yêu cầu trên xem có đúng ko?

Link: https://www.mediafire.com/?4dcsx8mc326do67
 
Lần chỉnh sửa cuối:
Lần chỉnh sửa cuối:
ok. được rồi anh ơi...thanks anh nhiều nhé
cái này lập trình có khó không anh ???.hướng dẫn được k :P

cũng ko khó bạn ah, code chỉ có 1 đoạn ngắn thôi,
(code đặt tại sự kiện tại sheet đó, vào xem bằng cách Right_click tại tên sheet đó -> click View Code hoặc nhấn tổ hợp phím Alt+F11)
Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [[COLOR=#ff0000][B]J3:J65536[/B][/COLOR]]) Is Nothing Then
    If Target.Count = 1 Then
    If Target.Value <> "" Then
        If IsNumeric(Target.Value) Then
            With [B][COLOR=#ff0000]Target.Offset(, 3)[/COLOR][/B]
                .Value = .Value + Target.Value
            End With
        Else
            MsgBox ("Gia tri ban vua nhap vao ko phai la` 1 so'"), vbExclamation
        End If
    End If
    End If
End If
End Sub
nếu 1 trong 3 vị trí: row đầu tiên ko phải 3 hoặc cột J (SL xuất) hoặc cột M (tổng xuất) có thay đổi thì bạn để ý sửa lại 2 dòng đỏ đỏ bên trên.

- sự kiện WS_change chỉ có tác dụng trong vùng J3:J65536
- Target.offset(,3) là tính từ vị trí cột J di chuyển sang phải 3 cột (chính là cột M)

'- - -
các code còn lại bạn từ từ tìm hiểu sau cũng được -0-/.,
 
Web KT

Bài viết mới nhất

Back
Top Bottom