Tổng hợp lại số liệu và nhân với 1 hệ số cho trước

Liên hệ QC

heyhey1994

Thành viên chính thức
Tham gia
16/3/17
Bài viết
78
Được thích
18
Hi mọi người. Em có 1 file tính thế này, giờ em muốn + Các giá trị Fx Fy Fz lại sau khi nhân cho hệ số ứng với loại A B C D mà không biết xử lí thế nào. Nhờ anh chị giúp với ạ.
Em xin cảm ơn
 

File đính kèm

  • Test.xlsx
    11 KB · Đọc: 8
Hi mọi người. Em có 1 file tính thế này, giờ em muốn + Các giá trị Fx Fy Fz lại sau khi nhân cho hệ số ứng với loại A B C D mà không biết xử lí thế nào. Nhờ anh chị giúp với ạ.
Em xin cảm ơn
Kết quả mong muốn của bạn trong vùng màu vàng là bao nhiêu?

.
 
Upvote 0
Hi mọi người. Em có 1 file tính thế này, giờ em muốn + Các giá trị Fx Fy Fz lại sau khi nhân cho hệ số ứng với loại A B C D mà không biết xử lí thế nào. Nhờ anh chị giúp với ạ.
Em xin cảm ơn
Tôi tự sửa cái mà tôi nghĩ là sai trong file của bạn (Fz đầu thành Fx)
Làm bài này thêm một dòng phụ, xem file
 

File đính kèm

  • Test (4).xlsx
    11.6 KB · Đọc: 11
Upvote 0
Nhờ anh chị giúp với ạ.
Đăng ở box lập trình thì thử code này coi .
Mã:
Sub ABC()
Dim F, i&, j&, k&
With Sheet1
.Range("T3:V1000").ClearContents
F = Array(.Cells(2, 2).Value, .Cells(3, 2).Value, .Cells(4, 2).Value, .Cells(5, 2).Value)
    For i = 3 To 8
        k = -1
        For j = 4 To 18 Step 4
            k = k + 1
            .Range("T" & i).Value = .Range("T" & i).Value + .Cells(i, j) * F((k))
            .Range("U" & i).Value = .Range("U" & i).Value + .Cells(i, j + 1) * F((k))
            .Range("V" & i).Value = .Range("V" & i).Value + .Cells(i, j + 2) * F((k))
        Next
    Next
End With
End Sub
 
Upvote 0
Người ta hỏi "cách xử lý thế nào", tức là phải làm gì. Chứ đã hỏi code đâu?
Nếu bạn đi trước thì phải giải thích nó làm cái gì chứ!
Nhiều khi có cái bệnh cầm đèn chạy trước ô tô nên có khi còn bị mắng thêm ấy chú ạ. Kiểu rảnh quá. Nên chẳng biết làm gì. Hihi. Nhưng giúp được người khác là vui rồi chú ạ
 
Upvote 0
Người ta hỏi "cách xử lý thế nào", tức là phải làm gì. Chứ đã hỏi code đâu?
Nếu bạn đi trước thì phải giải thích nó làm cái gì chứ!
Nhiều khi có cái bệnh cầm đèn chạy trước ô tô nên có khi còn bị mắng thêm ấy chú ạ. Kiểu rảnh quá. Nên chẳng biết làm gì. Hihi. Nhưng giúp được người khác là vui rồi chú ạ
Đúng là em chỉ muốn hỏi hướng xử lí rồi tự mình tìm hiểu thêm mà các bác nhiệt tình quá. Em cảm ơn nhiều ạ :D
 
Upvote 0
Web KT

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

Back
Top Bottom