hoangtrong_vbnd
Thành viên hoạt động
- Tham gia
- 14/1/11
- Bài viết
- 156
- Được thích
- 7
- Giới tính
- Nam
Chào các bác,
Nhờ sự giúp đỡ của các bác trên diễn đàn, e có làm được một file sổ cái giúp ích cho công việc về việc phân tích và kết xuất số liệu ra sổ cái. Tuy nhiên e còn một vướng mắc nho nhỏ nhờ các bác giúp đỡ đó là: E không biết đặt công thức tính " số dư cuối kỳ " hiện tại e đang đặt trong VBA
.Offset(sR + 2, 7).Value = "=$H$1"
.Offset(sR + 2, 8).Value = "=$I$1"
Tuy nhiên e muốn tính tổng trực tiếp số dư cuối kỳ khi nhập tài khoản, sửa thế này mà không được số liệu theo ý muốn
Tong = .Range("H10") - .Range("I10") + .Range("H" & sR + 1) - .Range("I" & sR + 1)
If Tong > 0
Then .Range("H" & sR + 2) = Tong
Else .Range("I" & sR + 2) = Abs(Tong)
(Nghĩa là: Tổng số dư cuối kỳ = H10 - I10 + H_phát sinh trong kỳ nợ - I_phát sinh trong kỳ có)
Mong các bác giúp để File sổ cái này được hoàn thiện!
Nhờ sự giúp đỡ của các bác trên diễn đàn, e có làm được một file sổ cái giúp ích cho công việc về việc phân tích và kết xuất số liệu ra sổ cái. Tuy nhiên e còn một vướng mắc nho nhỏ nhờ các bác giúp đỡ đó là: E không biết đặt công thức tính " số dư cuối kỳ " hiện tại e đang đặt trong VBA
.Offset(sR + 2, 7).Value = "=$H$1"
.Offset(sR + 2, 8).Value = "=$I$1"
Tuy nhiên e muốn tính tổng trực tiếp số dư cuối kỳ khi nhập tài khoản, sửa thế này mà không được số liệu theo ý muốn
Tong = .Range("H10") - .Range("I10") + .Range("H" & sR + 1) - .Range("I" & sR + 1)
If Tong > 0
Then .Range("H" & sR + 2) = Tong
Else .Range("I" & sR + 2) = Abs(Tong)
(Nghĩa là: Tổng số dư cuối kỳ = H10 - I10 + H_phát sinh trong kỳ nợ - I_phát sinh trong kỳ có)
Mong các bác giúp để File sổ cái này được hoàn thiện!
