-
10-19-2011, 09:20 AM #1
Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Tạo Form, sử dụng ListBox và dùng hàm Find để tìm.
Tạo Form, sử dụng ComboBox và dùng hàm Find để tìm.
Thực hiện như sau:
Bước 01. Tạo Name động:
a. Đặt tên sheet có tên DataList chứa danh sách.
b. Tạo Name động: chọn vùng chứa dữ liệu (ví dụ B6:B25), từ menu click Insert > Name > Define.. xuất hiện cửa sổ Define Name.
Trong khung Name in Book: và đặt tên Name động là Danhsach, khung Refers to gõ hàm
=OFFSET(DataList!$B$6:$B25,,,COUNTA(DataList!$B6:$ B25)-5)
Nhấn nút Add xong nhấn nút OK .
Bước 02: Tạo Form.
Tạo 1 Form đặt Name là Search, caption là SEARCH FORM.
Đặt các đối tượng lên Form :
- Dùng 04 Label để tạo tiêu đề.
- Dùng 01 ComboBox: có Name là cboTim, TabIndex là: 1
- Dùng 02 List box:
* List box1: Name là: LstDanhsach, TabIndex là: 0
*List box2: Name là: LstKetqua, TabIndex là: 2
Bước 03: viết code.
- Code cho Form:
Private Sub cboTim_Change()
LstKetqua.Clear
LstKetqua.List = Filter(WorksheetFunction.Transpose _
(Range("Danhsach")), cboTim.Text, True, vbTextCompare)
If cboTim = "" Then LstKetqua.Clear
End Sub
- Code cho Module1:
Sub ShowForm()
Search.Show
End Sub
- Code cho nút Hiện Form:
Private Sub CommandButton1_Click()
Search.Show
End Sub
Tải File tham khảo theo Link sau: Tao Form va ComboBox.xls - File Shared from Box.net - Free Online File Storage
Chúc thực hiện thành công
---------- Post added at 02:20 ---------- Previous post was at 01:29 ----------
Sửa tiêu đềView more random threads:
- Bổ Sung Dùm Code Lập Cân Đối Kế Toán
- Các loại hàm tự tạo tổng hợp các loại công trong tháng
- PIVOT TABLE Bảng tổng hợp 3 chiều
- Chơi games = excel
- Hỏi cách thiết lập nut enter và tab
- Hỗ trợ code tạo mục lục.
- Giúp mình lỗi file excel này với.
- Bài giảng ứng dụng Solver giải bài toán tối ưu
- Hàm chuyển số sang chữ trong excel
- Sửa lỗi code giúp mình
QUAN HỆ NHANH RA Ở NAM GIỚI LÀ GÌ? Quan hệ nhanh ra hay còn gọi là xuất tinh sớm, là hiện tượng xuất tinh trong khoảng thời gian quá ngắn bình thường là dưới 3 phút, nam giới không thể làm chủ, điều...
"Quan hệ nhanh ra" phái mạnh có nên kiêng rượu bia không?