Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Tạo Macro để tìm record nếu trùng báo "Đã có" và lưu con trỏ tại ô đang nhập
#1
Xin chào cả nhà
Minh có thắc mắc trong bài tập access 2003 có câu sau: Tạo một form nhập thông tin Mã CN và các thông tin liên quan. Yêu cầu trong ô Mã CN sẽ nhập một mã CN mới nào đó. Tạo một macro để khi nhập mã vào ô control đó nếu trùng với mã có sẵn sẽ hiện thông báo "Đã có mã CN này" và lưu con trỏ lại không cho nhảy qua ô kế tiếp. Rất mong các sư huynh cao kiến chỉ giúp. Chân thành cám ơn.
Ngốc Kinh
Chữ ký của ngockinh Xin chào, mình là ngockinh, Tham gia http://thuthuataccess.com/forum từ ngày 28-06 -12.
Reply
Những người đã cảm ơn
#2
Tham khảo ở đây http://thuthuataccess.com/forum/thread-2959.html
Lưu ý tìm kiếm trước khi hỏi
Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , ngockinh
#3
(04-07-12, 02:53 PM)Xuân Thanh Đã viết: Tham khảo ở đây http://thuthuataccess.com/forum/thread-2959.html
Lưu ý tìm kiếm trước khi hỏi
Thân mến

Đã vào tham khảo nhưng câu trả lời không giúp thêm được điều gì. Ở bài tập không bắt phải tạo một đoạn code, chỉ cần sử dụng macro bằng cách tạo những action và đặt các điều kiện cho arguments thôi. Có ai biết xin vui lòng chỉ giáo. Chân thành cám ơn.
Ngốc Kinh
Chữ ký của ngockinh Xin chào, mình là ngockinh, Tham gia http://thuthuataccess.com/forum từ ngày 28-06 -12.
Reply
Những người đã cảm ơn
#4
(07-07-12, 01:34 PM)ngockinh Đã viết: Đã vào tham khảo nhưng câu trả lời không giúp thêm được điều gì. Ở bài tập không bắt phải tạo một đoạn code, chỉ cần sử dụng macro bằng cách tạo những action và đặt các điều kiện cho arguments thôi. Có ai biết xin vui lòng chỉ giáo. Chân thành cám ơn.
Ngốc Kinh

Nếu thích dùng macro thì đây
1/ Cho hiện cột Condition. Macro được ghi trên hai dòng
2/ Dong 1 : Trong cọt Condition nhập Not IsNull(DLookUp("[MaCN]","ChiNhanh","[MaCN]=[MACN]"))
Trong cột Action chọn MsgBox. Phía dưới ghi câu MsgBox tùy thích
3/ Dòng 2 : Trong cột Condition nhập ... (dấu 3 chấm)
Trong cột Action chọn CancelEvent
Lưu lại và gọi khi cần thiết
Thân
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn ngockinh
#5
(07-07-12, 01:34 PM)ngockinh Đã viết:
(04-07-12, 02:53 PM)Xuân Thanh Đã viết: Tham khảo ở đây http://thuthuataccess.com/forum/thread-2959.html
Lưu ý tìm kiếm trước khi hỏi
Thân mến

Đã vào tham khảo nhưng câu trả lời không giúp thêm được điều gì. Ở bài tập không bắt phải tạo một đoạn code, chỉ cần sử dụng macro bằng cách tạo những action và đặt các điều kiện cho arguments thôi. Có ai biết xin vui lòng chỉ giáo. Chân thành cám ơn.
Ngốc Kinh

Thiết kế bảng sao cho trong bảng có cái trường MaNV làm khóa chính. Trong form bắt lỗi 3022 là được.

Ví dụ:
Mã PHP:
Private Sub Form_Error(DataErr As IntegerResponse As Integer)

If 
DataErr 3022 Then
    MsgBox 
"Ma nhan vien: " UCase([MaNV]) & " da co roi, vui long nhap lai"vbCritical"Stop"
    
MaNV.SetFocus
    Response 
acDataErrContinue

End 
If


End Sub 

Bạn xem file nhé


File đính kèm
.zip   NhapTrung.zip (Kích cỡ: 13.15 KB / Tải về: 32)
Chữ ký của domfootwear Xin chào Guest, nếu Guest biết thủ thuật nào thì nên chia sẻ cho cộng đồng nhé.
ღღღღღTài sản của domfootwear (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , ngockinh
#6
(07-07-12, 02:04 PM)Xuân Thanh Đã viết:
(07-07-12, 01:34 PM)ngockinh Đã viết: Đã vào tham khảo nhưng câu trả lời không giúp thêm được điều gì. Ở bài tập không bắt phải tạo một đoạn code, chỉ cần sử dụng macro bằng cách tạo những action và đặt các điều kiện cho arguments thôi. Có ai biết xin vui lòng chỉ giáo. Chân thành cám ơn.
Ngốc Kinh

Nếu thích dùng macro thì đây
1/ Cho hiện cột Condition. Macro được ghi trên hai dòng
2/ Dong 1 : Trong cọt Condition nhập Not IsNull(DLookUp("[MaCN]","ChiNhanh","[MaCN]=[MACN]"))
Trong cột Action chọn MsgBox. Phía dưới ghi câu MsgBox tùy thích
3/ Dòng 2 : Trong cột Condition nhập ... (dấu 3 chấm)
Trong cột Action chọn CancelEvent
Lưu lại và gọi khi cần thiết
Thân
Action 1 ok rồi nhưng khi enter thì con trỏ lại nhảy sang ô kế tiếp chứ không nằm trong ô Mã CN để ta nhập lại một mã mới không trùng với mã cũ. Xin cám ơn bạn Xuân Thanh rất nhiều. Cố giúp cho mình thêm vài chiêu nữa nhé.
Ngốc Kinh
Chữ ký của ngockinh Xin chào, mình là ngockinh, Tham gia http://thuthuataccess.com/forum từ ngày 28-06 -12.
Reply
Những người đã cảm ơn
#7
Thêm một hàng thứ 3 nữa chọn stopmacro xem sao
P/S Tôi chưa test
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn ngockinh
#8
Vẫn không thành công bạn ạ. Làm sao để con trỏ không nhảy qua ô control kế tiếp. Nhân đây Xuân Thanh có thể cho mình xin địa chỉ email để có thể gởi phần bài tập của mình và những thắc mắc nhờ Xuân Thanh giải đáp. Rất cám ơn bạn nhiều. Đúng là biển học vô bờ, nhưng sẵn sàng kiên nhẫn chờ Xuân Thanh giải đáp.
Ngốc Kinh
Chữ ký của ngockinh Xin chào, mình là ngockinh, Tham gia http://thuthuataccess.com/forum từ ngày 28-06 -12.
Reply
Những người đã cảm ơn
#9
Thay hàng thứ 3 : Cột Condition ghi [MCN], cột Action chọn Restore xem thử
Thân
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn ngockinh
#10
Không được bạn uiiiiii. Mình thử dùng Action Gotocontrol và ghi tên Field vào Argument nhưng máy báo không thấy tên field này nghĩa là làm sao nhỉ? Bó tay
Ngốc Kinh
Chữ ký của ngockinh Xin chào, mình là ngockinh, Tham gia http://thuthuataccess.com/forum từ ngày 28-06 -12.
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] Thiết kế form nhập và lưu trữ dữ liệu theo yêu cầu brianhuynh 16 624 20-10-16, 10:54 PM
Bài mới nhất: brianhuynh
  [Help] Nhờ tạo form lưu hóa đơn nhập, hóa đơn xuất, hàng nhập hàng xuất không cần tính tồn laxx_xxal 1 131 22-09-16, 02:35 PM
Bài mới nhất: Nguyen Hoang Diep
  [Hỏi] Về cách lưu file .doc đang mở toancvp 4 319 21-06-16, 11:39 AM
Bài mới nhất: toancvp
  phân quyền chọn lớp và nhập thông tin theo tên đăng nhập honglv157 10 517 18-05-16, 01:29 PM
Bài mới nhất: hungle2006
Lightbulb Hướng Dẫn Tắt Security Macro Warning Access 2007,2010 maidinhdan 0 158 28-04-16, 10:20 AM
Bài mới nhất: maidinhdan

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ