-
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:
- Code lọc dữ liệu trong excel
- đánh dấu "x" lọc dữ liệu qua một sheet khác
- Post bài excel
- Ai giúp mình viết code với
- tạo Pivot table giup mình với cả nhà!
- Lấy tên các sheet có chứa trong File
- Hộp thoại dialog open file
- Giúp mình với
- Chuyển kết quả bấm thẻ sang bảng chấm công
- Hàm chuyển số sang chữ trong excel
-
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é.
Khu dự án cao cấp Moonlight Avenue được phát triển bởi Tập đoàn Hưng Thịnh phù hợp khách hàng đẳng cấp nhất tiện ích phù hợp. Moonlight Thủ Đức phù hợp khách hàng khu an ninh phong cách nghỉ dưỡng....
Moonlight Avenue Dự án chung cư không gian thoáng mát thoải mái nhất