Excel - Tính toán một ô

Vấn đề
Dung dịch
chú thích

Vấn đề

Cần một chương trình tính tổng mỗi lần tôi đặt vào một ô một số. Ví dụ: trong ô A1 để đặt số: 1, 1200, 0, 50 và trong ô B1 để tính tổng (1, 1200, 0, 50)

Nếu ai có thể giúp tôi,

Cảm ơn bạn trước.

Dung dịch

Miễn là có 3 số và cấu hình giống nhau.

số thứ nhất dấu phẩy không gian số thứ hai dấu phẩy không gian số thứ ba

thì macro sau sẽ giúp bạn có kết quả trong B1

Một công thức có thể được xây dựng nhưng đối với tôi nó sẽ phức tạp.

Macro là:

 Kiểm tra phụ () Dim j, j1, k, k1, m, m1, nj = InStr (Phạm vi ("a1"). Giá trị, ", ") j1 = Trái (Phạm vi ("A1"). Giá trị, j - 1 ) k = InStr (j + 1, Phạm vi ("A1"). Giá trị, ", ") k1 = Mid (Phạm vi ("A1"). Giá trị, j + 2, k - 4) m1 = Phải (Phạm vi (" A1 "). Giá trị, Len (Phạm vi (" A1 "). Giá trị) - k) n = WorksheetFunction.Sum (j1, k1, m1) 'MsgBox n Range (" B1 ") = n End Sub