Dùng VBA để lập bảng tiên lượng trong excel

[minhcong.tckt]

Giả sử tại
ô E1, trong excel em có công hàm sau:
2*10,35*3,3
Và cột E2 em có chuỗi sau:
Tam cấp: 10,35*0,15*0,3*3

Nhờ anh chị viết đoạn code VBA để sau khi em để dấu bằng đằng sau hàm và chuỗi trên thì có kết quả tại ô e1, e2 tương ứng như sau:
2*10,35*3,3 = 68,31
Tam cấp: 10,35*0,15*0,3*3 = 1,3973
Và cột F1, F2 chỉ có kết quả tương ứng như sau
68,31
1,3973

 

[anhsaodem245]

Cái Code nó thế này Bạn ạ

Sub Timdauthapphan()
    Dim Str As String, Str1 As String
    Str = Application.DecimalSeparator
    Str1 = Application.ThousandsSeparator
    MsgBox "ThousandsSeparator: " & Str1 & Chr(10) & "DecimalSeparator: " & Str
End Sub

Link: https://stackoverflow.com/questions...h-decimal-sign-the-computer-is-using/20652521

Mình copy code này rồi sử lý thế nào vào file excel hả bạn.

 

[♫ђöล♥ßล†♥†µ♫]

Mình copy code này rồi sử lý thế nào vào file excel hả bạn.

Thì tại phần diễn giải khối lượng mình thay dấu "." bằng "dấu tách thập phân được tùy chọn trong Excel " là đươc

 

[anhsaodem245]

Thì tại phần diễn giải khối lượng mình thay dấu "." bằng "dấu tách thập phân được tùy chọn trong Excel " là đươc

Sao của mình ở cột E lại mất số 0 đi hả bạn

 

[♫ђöล♥ßล†♥†µ♫]

Sao của mình ở cột E lại mất số 0 đi hả bạnView attachment 204128

Sao máy mình nó vẫn bình thường mà

​

 

[anhsaodem245]

Sao máy mình nó vẫn bình thường mà

View attachment 204129​

Bạn có teamview không

 

[violetfragrance]

Teamview xong không may máy nó bị sao, hay dữ liệu nó bị từ khi nào thì bạn có nghĩ là Teamview không

https://www.giaiphapexcel.com/diendan/threads/tôi-rất-ghét-teamviewer.86045/

 

[anhsaodem245]

Cái Code nó thế này Bạn ạ

Sub Timdauthapphan()
    Dim Str As String, Str1 As String
    Str = Application.DecimalSeparator
    Str1 = Application.ThousandsSeparator
    MsgBox "ThousandsSeparator: " & Str1 & Chr(10) & "DecimalSeparator: " & Str
End Sub

Link: https://stackoverflow.com/questions...h-decimal-sign-the-computer-is-using/20652521

Bạn sửa lại giúp mình code này nhé. để cùng chạy được nhé./.

 

[♫ђöล♥ßล†♥†µ♫]

Bạn sửa lại giúp mình code này nhé. để cùng chạy được nhé./.

Bạn thử xem

 

[anhsaodem245]

Bạn thử xem

Mình chỉnh lại code chỗ tính khối lượng ở cột D thì lại không ra kết quả nữa bạn ạ.

 

[♫ђöล♥ßล†♥†µ♫]

Mình chỉnh lại code chỗ tính khối lượng ở cột D thì lại không ra kết quả nữa bạn ạ.

Sao bây giừ lại chuyển sang cốt D rồi. Mai có chuyển sang cột khác không đóa

 

[anhsaodem245]

Sao bây giừ lại chuyển sang cốt D rồi. Mai có chuyển sang cột khác không đóa

Dòng kết quả của cột E. công thức Sum tự động nhảy dòng mà không cố định bạn à./.

 

[anhsaodem245]

Sao bây giừ lại chuyển sang cốt D rồi. Mai có chuyển sang cột khác không đóa

ở cột kết quả dòng tổng tự động sum hết các dữ liệu chứ không cố định lại bạn à./.

 

[♫ђöล♥ßล†♥†µ♫]

ở cột kết quả dòng tổng tự động sum hết các dữ liệu chứ không cố định lại bạn à./.

Mình không hiểu. Có cái Ảnh mẫu đang tính làm thì bị xóa mất rồi

 

[anhsaodem245]

Mình không hiểu. Có cái Ảnh mẫu đang tính làm thì bị xóa mất rồi

Bạn xem lại file đi. ở cột kết quả E7 thì E7 = sum(E8:E9) mới đúng nhưng E7 = sum(E8:E20) là sai.

 

[♫ђöล♥ßล†♥†µ♫]

Bạn xem lại file đi. ở cột kết quả E7 thì E7 = sum(E8:E9) mới đúng nhưng E7 = sum(E8:E20) là sai.View attachment 204424

Dạ. Đúng rồi ạ. Thành thật xin lỗi Bạn. Để mai mình hỏi Thầy mình them thao nha

 

[anhsaodem245]

Dạ. Đúng rồi ạ. Thành thật xin lỗi Bạn. Để mai mình hỏi Thầy mình them thao nha

Cảm ơn bạn nhiều nhé./.

 

[anhsaodem245]

Dạ. Đúng rồi ạ. Thành thật xin lỗi Bạn. Để mai mình hỏi Thầy mình them thao nha

Bạn xem giúp mình với.

 

[anhsaodem245]

Dạ. Đúng rồi ạ. Thành thật xin lỗi Bạn. Để mai mình hỏi Thầy mình them thao nha

Bạn xem giúp mình với./.