Hàm DSUM không cho ra kết quả ? (1 người xem)

[saomai6692]

Em kính chào các anh, các chị!
Em gửi file bảng tính nhờ các anh chị GPE giúp đỡ khi em sử dụng hàm DSUM trong bảng tính Excel không cho kết quả,
Trân trọng cảm ơn

 

[hoamattroicoi]

Xem file đính kèm nhé, DSUM sai vì trong Data của bạn dữ liệu số tài khoản tại cột NỢ và CỘT có dạng number khi đó điều kiện lại là dạng TEXT nên DSUM không tính được.
Dấu * đại diện cho một chuỗi ký tự, tôi chỉnh lại cho bạn bằng cách chuyển 2 cột đó thành text (tất nhiên là dùng CODE chứ k thể ngồi gõ tay từng TK lại đc) DSUM sẽ chạy.

 

[saomai6692]

không biết các anh chị dùng code chuyển đổi lại dạng TEXT nào cho em biết được không. Cảm ơn

 

[hoamattroicoi]

không biết các anh chị dùng code chuyển đổi lại dạng TEXT nào cho em biết được không. Cảm ơn

Trong file đính kèm mình có để đó, bạn bấm Alt+F11 để xem, thực ra code rất đơn giản mà chỉ là mình thêm dấu " ' " vào trước cái tài khoản của cột NỢ và CÓ thôi saomai6692 ạ! Mình tính chạy xong rồi bỏ luôn cái CODE đó đi vì chỉ dùng có 1 lần!

 

[ChanhTQ@]

Macro đó chỉ mới chuyển 1 cột số liệu mà thôi.

Trong file đính kèm mình có để đó, bạn bấm Alt+F11 để xem, thực ra code rất đơn giản mà chỉ là mình thêm dấu " ' " vào trước cái tài khoản của cột NỢ và CÓ thôi saomai6692 ạ! Mình tính chạy xong rồi bỏ luôn cái CODE đó đi vì chỉ dùng có 1 lần!

Option Explicit
Sub chuyen()
Dim i As Long
For i = 3 To 1151
5    Cells(i, 4).Value = "'" & Cells(i, 4).Value
Next
End Sub

Câu lệnh đánh số 5 đó chứng tỏ code chỉ chuyễn số liệu ra chuỗi ở cột 4 mà thôi
Còn chuyển 1 lúc 2 cột thì thêm 1 dòng lệnh tương tự vô ngay trước hay sau dòng lệnh số 5 này
Nói là tương tự vì bạn dùng số 3 cho những nơi có số 4.

Bạn thử đi & Chúc thành công!

 

[saomai6692]

Chào các anh chị
Em vẫn chưa thao tác được, các anh chị hướng dẫn cụ thể cho em với, em còn bỡ ngỡ với Excel lắm, mong thông cảm và trân trọng cảm ơn

 

[ChanhTQ@]

Cầm tay, chỉ việc nha:

Bạn thấy macro trong file của cô Còi chưa?

Nếu có thì lấy chuộc tô chọn dòng lệnh mà mình có đánh số đó & chép xuống dưới (hay lên trên dòng đó cũng được)
Sau đó chỉ việc nơi nào trong dòng lệnh mới chép có số 4 ta sửa thành số 3
Cho chạy macro. Xong!

 

[hoamattroicoi]

Bạn đã làm như thế nào mà làm không được ạ, bấm AlT+F11 / Vào menu Insret/ Module
Nếu chưa biết cách chèn code vào Module thì search cách làm trên diễn đàn nhé.
Copy đoạn code này vào module file của bạn :

Sub chuyen()
Dim i As Long
For i = 3 To 1151
    Cells(i, 3).Value = "'" & Cells(i, 3).Value
    Cells(i, 4).Value = "'" & Cells(i, 4).Value
Next
End Sub

Chú ý rằng dữ liệu của bạn phải bắt đầu từ dòng số 3 và kết thúc ở dòng số 1151
Bạn có thế thay 2 chỗ đỏ trên sao cho phù hợp với dữ liệu trong file thật của bạn.
Cột tài khoản NỢ và CÓ phải là cột C và cột D trong bảng tính!!!

 

[saomai6692]

Anh chị thông cảm, em cũng đã làm như vậy sao lại ko được nhỉ, không biết còn thiếu chữ nào trong code hoặc sai sót thao tác nào, mong được chỉ giúp, em gởi file lên đây này. Trân trọng cảm ơn

 

[hoamattroicoi]

Anh chị thông cảm, em cũng đã làm như vậy sao lại ko được nhỉ, không biết còn thiếu chữ nào trong code hoặc sai sót thao tác nào, mong được chỉ giúp, em gởi file lên đây này. Trân trọng cảm ơn

Trời ạ, chèn code vào bấm RUN hoặc F5 thì code mới chạy chứ cứ để yên sao mà tự nó chạy được, hix hix. Gửi bạn file này nhé, thích thì có thể thao tác lại - tùy bạn. Tìm hiểu thêm cách chạy code để áp dụng khi muốn chạy macro khác nhé!

 

[saomai6692]

Nó chạy rồi các anh các chị à, em cảm ơn nhé. Thế còn code chuyển từ dạng Text sang dạng số (ngược lại) thì sao ạ.

 

[hoamattroicoi]

Nó chạy rồi các anh các chị à, em cảm ơn nhé. Thế còn code chuyển từ dạng Text sang dạng số (ngược lại) thì sao ạ.

Ngược lại thì bạn dùng code này nhé :

Sub chuyenlai()
Dim i As Long
For i = 3 To 1151
    Cells(i, 4).Value = Val(Replace(Cells(i, 4).Value, "'", ""))
    Cells(i, 3).Value = Val(Replace(Cells(i, 3).Value, "'", ""))
Next
End Sub

 

[saomai6692]

Em cảm ơn các anh chị rất nhiều. Kính chào và trân trọng GPE