Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Tìm và tự động nhập dự liệu từ excel và table hoặc query
#11
Bạn thiếu thư viện VB nhé !
Bạn hãy mở cửa sổ VBA (Ctrl+G) vào References... chọn Microfoft Excel Object Library 12.0 (Nếu Acc2007 hoặc thự viện tương thích với Acc của bạn), tick vào Checkbox (True) là OK.
Chúc bạn thành công !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn
#12
Nếu như dùng Excel thì có 2 methods:
1- Highlight Column B, click vào Condition và dùng Countif
2- Dùng VBa, paste code Envent này vào ThisWorbook

Private Sub Workbook_SheetChange(ByVal sh As Object, ByVal Target As Range)
If Target.Column = 2 Then
If Application.CountIf(Columns(2), Target) > 1 Then
'//If duplicate found notify user
intResponse = MsgBox(Prompt:="DUPLICATE Value !!!!!", Title:="DUPLICATES NOT ALLOWED")
End If
End If
End Sub

Sở dĩ dùng Event là để mỗi khi ai type vàp cột B mà trùng thì nó báo liền, ko phải đợi check mới biết
Chữ ký của DustWind Xin chào, mình là DustWind, Tham gia http://thuthuataccess.com/forum từ ngày 09-11 -13.
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
Lightbulb [Hỏi] Tạo màu , hình , link cho dữ liệu form toidjtjmtoi 4 218 04-02-18, 12:09 PM
Bài mới nhất: tranthanhan1962
  Hướng Dẫn Cập nhật dữ liệu để sao lưu qua file access khác mrtoanbin 7 263 10-01-18, 08:46 AM
Bài mới nhất: cpucloi
  [Hỏi] Lệnh Docmd chỉ mở bảng mà không tự động mở bảng đó` killitmore 3 191 13-12-17, 04:22 PM
Bài mới nhất: duynamvnn1208
  [Hỏi] merge table từ nhiều file giống nhau amazonvn82 1 180 12-12-17, 12:50 PM
Bài mới nhất: jeck09nt
  [Lỗi] bound Column trong phần Lookup table hiển thị không đúng minhtungph 5 342 14-10-17, 12:23 PM
Bài mới nhất: minhtungph

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ơ