-
04-12-2012, 05:41 PM #1Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Xin giúp đỡ code lệnh tìm kiếm vba
chào tất cả các bạn. mình vừa mới làm 1 file vba excel, nhưng đến phần tìm kiếm khách hàng thì mình không làm được, mình muốn khi điền vao khách hàng nếu có thì nó sẽ hiện lên thông tin khách hàng đó cho mình, mình không biết tại sao mình không thể điền vào rownsouce cbbkhachhang nữa. xin các bạn giúp đỡ
View more random threads:
- Tạo Form nhập liệu trong exel
- Video hướng dẫn VBA cho người mới bắt đầu
- Ai giúp mình viết code với
- Theo dõi thu học phí sinh viên
- làm dự toán
- Chỉnh Sửa Macro Tổ Hợp Giúp
- Hỏi về tìm kiếm dữ liệu từ nhiều Sheet và hiển thị kết quả trên form
- Cho e hỏi bài này với
- Xin giúp đỡ code lệnh tìm kiếm vba
- [help] xin code chuyển sheet
-
04-12-2012, 06:16 PM #2Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Xin giúp đỡ code lệnh tìm kiếm vba
hì
mình ko rành cái này lắm
mọi người ơi!!!!!!!!!!!
vào giúp bạn ý đi nào!!!
-
04-12-2012, 10:48 PM #3Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Xin giúp đỡ code lệnh tìm kiếm vba
Mã nguồn PHP:[COLOR=#000000]
Dim Khach [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Range Dim n [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Long Set n [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Sheets[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"THIETLAP"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"B65000"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]End[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]xlUp[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Row Set Khach [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Sheets[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"THIETLAP"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"B4:B" [/COLOR][COLOR=#007700]& [/COLOR][COLOR=#0000BB]n[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Me[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]CBBKHACHHANG[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]RowSource [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#DD0000]"Khach"[/COLOR]
Thân mến
-
04-13-2012, 01:25 PM #4Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Xin giúp đỡ code lệnh tìm kiếm vba
chào tất cả các bạn. mình vừa mới làm 1 file vba excel, nhưng đến phần tìm kiếm khách hàng thì mình không làm được, mình muốn khi điền vao khách hàng nếu có thì nó sẽ hiện lên thông tin khách hàng đó cho mình, mình không biết tại sao mình không thể điền vào rownsouce cbbkhachhang nữa. xin các bạn giúp đỡ
Mã nguồn PHP:[COLOR=#000000]
Dim Sh [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Object[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]Rng [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]sRng [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Range [/COLOR][COLOR=#DD0000]'Định Vùng để tìm ở trang '[/COLOR][COLOR=#0000BB]TongHop[/COLOR][COLOR=#DD0000]' & dữ liệu có tại cột 'B', như sau:' [/COLOR][COLOR=#0000BB]Set Sh[/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]ThíWorkBook[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]WorkSheets[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"TongHop"[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Set Rng [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Sh[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]Sh[/COLOR][COLOR=#007700].[[/COLOR][COLOR=#0000BB]B1[/COLOR][COLOR=#007700]], [/COLOR][COLOR=#0000BB]Sh[/COLOR][COLOR=#007700].[[/COLOR][COLOR=#0000BB]B65500[/COLOR][COLOR=#007700]].[/COLOR][COLOR=#0000BB]End[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]xlUp[/COLOR][COLOR=#007700])) [/COLOR][COLOR=#0000BB]Set sRng[/COLOR][COLOR=#007700]=[/COLOR][COLOR=#0000BB]Rng[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Find[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]MyTextBox[/COLOR][COLOR=#007700], , [/COLOR][COLOR=#0000BB]xlFormulas[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]xhWhole[/COLOR][COLOR=#007700]) If [/COLOR][COLOR=#0000BB]Not sRng Is Nothing then [/COLOR][COLOR=#DD0000]'Câu Lệnh của bạn' [/COLOR][COLOR=#007700]Else [/COLOR][COLOR=#0000BB]MsgBox [/COLOR][COLOR=#DD0000]"Nothing!"[/COLOR][COLOR=#007700],, [/COLOR][COLOR=#DD0000]"Xin Luu Í Ban!" [/COLOR][COLOR=#0000BB]End [/COLOR][COLOR=#007700]If . . . [/COLOR]
-
04-13-2012, 05:24 PM #5Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Xin giúp đỡ code lệnh tìm kiếm vba
mình làm được rồi cám ơn các bạn nhiều nhé.
Đó là mục tiêu cố gắng của tỉnh từ nay đến năm 2020 để góp phần phát triển kinh tế, xã hội và chuyển dịch cơ cấu kinh tế theo hướng tăng dần tỷ trọng tour du lịch, Trung tâm, tạo ra nhiều việc làm,...
Đưa Đắk Nông phát triển thành nơi đến quyến rũ của bạn