Hướng dẫn cách tạo UserForm tra cứu nhập liệu bằng VBA (Macro) Trên Excel
[Học VBA] Hướng dẫn cách tạo ra User Form tra cứu nhập dữ liệu trên bảng tính Excel, giúp khai thác tìm nhập dữ liệu hiệu quả trên bảng tính Excel
►►►Đăng ký theo dõi kênh Youtube►►► cập nhật những bài giảng mới nhất:
============================================
TẢI FILE THỰC HÀNH: “Tài liệu thuộc bản quyển chương trình đào tạo VBA tại Bluesofts”
CÀI ĐẶT ADD-IN A-TOOLS:
============================================
CÁC KHÓA HỌC ĐẶC BIỆT CHỈ CÓ TẠI BLUESOFTS:
(1) Khóa học Excel nâng cao cho người đi làm:
(2) Khóa học lập báo cáo động trên Excel:
(3) Khóa học lập trình VBA cơ bản:
(4) Khóa học lập trình VBA nâng cao:
(5) Đào tạo doanh nghiệp theo yêu cầu:
THÔNG TIN LIÊN HỆ
►CÔNG TY CỔ PHẦN BLUESOFTS
Tel: 096.1368.661
Web:
Email: baoninh@bluesofts.net
Nguồn: https://zaia.vn
Xem thêm bài viết khác: https://zaia.vn/mobile/
Xem thêm Bài Viết:
- Bài 10 hàm trong python def trong python | Học lập trình python
- [khóa học lập trình PHP] Thực hiện đăng nhập tài khoản sử dụng php mysql – khoá học PHP căn bản
- Lập trình Delphi cơ bản Bài 01 Tạo chương trình đầu tiên
- Bỏ túi tuyệt chiêu chơi Gunny trên Zing me siêu hay biến bạn thành cao thủ
- Bật mí kinh nghiệm chơi Idle Heroes hay nhất tại sàn đấu chiến thuật đỉnh cao
Em viết y hệt sao nó báo lỗi ạ
Public Arr As Variant
Private Sub TextBox1_Change()
Dim BN As New BSFunctions
Dim a As Variant
a = BN.bs_vlookup("*" & TextBox1 & "*", Arr)
If IsArry(a) Then
ListBox1.List = a
Else
ListBox1.Clear
End If
Set BN = Nothing
End Sub
Private Sub UserForm_Activate()
Arr = Range("DATA").Value2
TextBox1_Change
End Sub
Private Sub OK_Click()
X1 = Selection.Address
Range(X1) = HANGMUC.Text
End Sub
sao không thây add in anh
Dạ em chào anh ạ, trước tiên em chân thành cảm ơn những chia sẻ rất bổ ích của anh ạ. Hiện em đã xem và thực hiện được theo những gì anh đã hướng dẫn. Tuy nhiên, cái bước quan trọng nhất là thêm nút nhấn và lập trình để nhập liệu dữ liệu tìm kiếm đó vào file excel thì lại không thấy anh đề cập ạ, thực sự em đang rất cần cái này nên mong được anh hướng dẫn thêm ạ. Nếu được anh cho em xin code viết tiếp đoạn này qua mail tucuong90@gmail.com nhé! Mong nhận được hồi âm của anh. Một lần nữa em xin chân thành cảm ơn ạ.
chào thầy Bảo Ninh, e có tạo lập trình thành công , cám ơn thầy, nhưng lần sau e làm thì vào phần add in a tool chọn BSFUNCTIONS nhưng không có hiển thị hàm vlookup là sao v ạ, chỉ có hàm dlookup,hlookup, cám ơn ạ
Cho minh xin AddinTools.dll
thầy có thể hướng đẫn em cách tạo nút nhập liệu. Mail: taiks1993@gmail.com
Private Sub TextBox1_Change()
Dim bn As New BSFunctions
Dim a As Variant
a = bn.bs_Vlookup(Me.TextBox1.Text, Arr)
'- báo lỗi -2147221231 (80040111)
If IsArray(a) Then
ListBox1.List = a
Else
ListBox1.Clear
End If
Set bn = Nothing
End Sub
Nhờ Anh Ninh Giúp đỡ, cảm ơn anh nhiều
Tôi làm tương tự excel báo lỗi: "automation error classfactory cannot supply requested class vba" rất mong giúp đỡ. thank
Xin code của phần tạo nút Nhập liệu đi thầy. Mail: thanhhui1000@gmail.com
Thầy cho xin code của phần tạo Nút "Nhập liệu". Mail: hailam233@gmail.com. Cảm ơn thầy!
Thầy có video hướng dẫn nhập liệu thì cho mình xin link hoặc tài liệu vào email: ngochiep.me@gmail.com nhé. Thanks thầy vì video bổ ích!
Thầy ơi, hướng dẫn em cách tạo nút nhập liệu với ạ.
bảng của em có hàng nghìn sản phẩm, nhưng làm đúng theo anh hướng dẫn thì chỉ hiện được 200 sản phẩm, tại sao vậy ạ?
Thầy hướng dẫn nốt phần nhập liệu đi ạ. Thanks thầy.
Cảm ơn bạn, nhưng listbox không tự cập nhập khi mình nhập dữ liệu mới từ sheet, nó chỉ cập nhập khi mình khởi động lại userform. Mình đã tìm trên google nhưng không giải quyết được vấn đề này. Bạn có thể giúp mình không
anh Ninh ơi, tại sao em cài office 2010, mà không thấy hiện công cụ BSfunctions và công cụ bs_vlookup, anh chỉ giúp em với ạ
em chạy code của a thì bị lỗi "method of data member not found" tại vùng ".List" của sub textbox1. Giúp e với!
video rất hay và bổ ích, hóng video hàm nhập liệu của a
thầy cho em hỏi em muốn tìm kiếm với BSlistview thì chỗ gắn mảng kia phải dùng ntn ạ.
ủa cái nút thêm đấy viết code như thế nào để nhập nhiều dòng từ trong list vậy bạn
Bsfuntions có phải là mảng có chứa giá trị a không ạ? Nếu không dùng atools thì mình khai báo nó như khai báo một bảng bình thường theo dữ liệu của mình đúng không anh?
cho e hoi sao chọn dc nhieu dòng trong listbox vậy
Anh Ninh ơi, code để nhập liệu vào bảng tìm kiếm như thế nào vậy ạ?
NHẬP SỐ LIỆU HÀNG HÓA LỚN RẤT TIỆN LỢI VÀ TIẾT KIỆM THỜI GIAN TÌM KIẾM, NHẬP CHÍNH XÁC.
Cho em hỏi: Tại sao trong bảng dữ liệu của em có rất nhiều hàng (phần tử) mà khi hiển thị trong ListBox số phần tử chỉ có 200 hàng (phần tử)?
Em xin cảm ơn Thầy!!!!!
Thiếu chữ nhập liệu để nhập liệu thầy ơi.
Sao trong bảng Add-in A-Tool free không có BS_VLOOKUP anh!?
Cho mình hỏi muốn làm Form giống như thế mà không cần tới a toos thì code viết như thế nào ạ
Cho em xin cái BSFunction