Vanlinhmt > 17-04-20, 10:03 PM
Xuân Thanh > 17-04-20, 10:25 PM
Vanlinhmt > 17-04-20, 10:33 PM
(17-04-20, 10:25 PM)Xuân Thanh Đã viết: Tôi tách bài viết của bạn qua đây để không loãng chủ đề khác
ongke0711 > 17-04-20, 10:33 PM
thuyyeu99 > 17-04-20, 10:35 PM
Vanlinhmt > 17-04-20, 10:41 PM
(17-04-20, 10:33 PM)ongke0711 Đã viết: Lỗi này nguyên nhân thì nó muôn hình vạn trạng, có thể lỗi code, lỗi Table, Form...không xác định được đâu.
Bạn thử cách này: mở file accdb mới, import từng phần qua, Table rồi tới Form... import mỗi phần xong mở lên xem có lỗi gì không.
ongke0711 > 17-04-20, 11:11 PM
(17-04-20, 10:41 PM)Vanlinhmt Đã viết: Em cũng thử cách như anh nói bên trên. Trên máy khác chạy bình thường.
Nhưng trên máy của mình thì chỉ chạy được lần đầu tiên mở file. Sau khi tắt file và mở lại thì bị lỗi như cũ
Sau đó nếu copy file lỗi này sang máy khác cũng sẽ bị lỗi như của mình. Khi kiểm tra thì đoán lỗi ở Combo_Longlist vì thấy Function đã add Row Source nhưng không chạy tiếp. nhưng không biết cách sửa ntn ?
File lỗi chỉ cần ấn mũi tên phải là bị báo lỗi và thoát luôn
Vanlinhmt > 18-04-20, 12:24 AM
(17-04-20, 11:11 PM)ongke0711 Đã viết:(17-04-20, 10:41 PM)Vanlinhmt Đã viết: Em cũng thử cách như anh nói bên trên. Trên máy khác chạy bình thường.
Nhưng trên máy của mình thì chỉ chạy được lần đầu tiên mở file. Sau khi tắt file và mở lại thì bị lỗi như cũ
Sau đó nếu copy file lỗi này sang máy khác cũng sẽ bị lỗi như của mình. Khi kiểm tra thì đoán lỗi ở Combo_Longlist vì thấy Function đã add Row Source nhưng không chạy tiếp. nhưng không biết cách sửa ntn ?
File lỗi chỉ cần ấn mũi tên phải là bị báo lỗi và thoát luôn
Bạn xem cài lại Office đi, có thể bị virus. Trong table báo lỗi là khi chạy Compact database. File bạn gửi, tôi download về chạy cũng đúng một lần rồi bị lỗi, xoá sạch code VBA.
ongke0711 > 18-04-20, 10:02 AM
(18-04-20, 12:24 AM)Vanlinhmt Đã viết: Em cũng nghĩ vậy. Theo em hiểu thì trước khi tắt file acc Compact database nên phát sinh các lần mở sau.
Có điều nếu giữ nguyên file của anh gửi dạng .mdb thì chạy không bao giờ bị lỗi bật tắt mấy trăm phát vẫn ok nên em nghĩ có vấn đề gì đó khi nén định dạng khi data mới accdb
từ đó test trên máy khác nhưng lại không bị ==> Chỉ có Máy em có vấn đề với định dạng file mới
Hiện đã cài lại office nhưng vẫn bị lỗi chưa khắc phục được. Em dùng office 2016-64bit
Đau đầu và nan giải. Để em thử thêm xem tn
#If VBA7 Then
Public Declare PtrSafe Function MessageBoxW Lib "user32" _
(ByVal hwnd As LongPtr, _
ByVal lpText As LongPtr, _
ByVal lpCaption As LongPtr, _
ByVal wType As Long) As Long
#Else
Public Declare Function MessageBoxW Lib "user32" _
(ByVal hwnd As Long, _
ByVal lpText As Long, _
ByVal lpCaption As Long, _
ByVal wType As Long) As Long
#End If
Public Function msgBoxUni(ByVal sMsgUni As String, Optional ByVal Buttons As VbMsgBoxStyle = vbOKOnly, Optional ByVal sTitleUni As String = vbNullString) As VbMsgBoxResult
msgBoxUni = MessageBoxW(0, StrPtr(sMsgUni), StrPtr(sTitleUni), Buttons)
End Function
Xuân Thanh > 18-04-20, 10:49 AM