Page 1 of 1
ขอ code VBE ค้นหาsheetที่ต้องการครับ
Posted: Tue Jan 18, 2011 4:07 pm
by sdmania
มาขอcode VBE ที่ใช้ค้นหา Sheet ที่เราตั้งชื่อไปน่ะครับ
ขอแบบสำหรับสอนมือใหม่นะครับอาจารย์
Re: ขอ code VBE ค้นหาsheetที่ต้องการครับ
Posted: Wed Jan 19, 2011 9:58 am
by sdmania
ต้องการให้ผลลัพธ์เป็นประมาณว่า ผมจะเก็บข้อมูลลูกค้า โดยตั้งชื่อSheet เป็นรหัสลูกค้า น่ะครับ แล้วเราก็เปิดโปรแกรม VBE
เพื่อที่ว่า เมื่อเรา ค้นหาข้อมูลลูกค้าโดยรหัส ก็จะเปิดข้อมูลในSheetนั้นเลยครับ
Re: ขอ code VBE ค้นหาsheetที่ต้องการครับ
Posted: Wed Jan 19, 2011 11:59 am
by snasui
การค้นหา Sheet ด้วย VBA ทำไม่ยากครับ แต่การที่จะให้ชื่อลูกค้าเป็นชื่อชีทนั้นน่าจะปรับใหม่ครับ
เราควรทำข้อมูลให้เป็นฐานข้อมูลการค้นหาจะได้ง่าย ๆ หากต้องการ โดยมีชีทสำหรับแสดงผลการค้นหาไว้ต่างหากก็ได้
สำหรับตัวอย่าง Code เพื่อค้นหา Sheet ตามด้านล่างจะเป็นการหาชีทที่ชื่อ Menu หากพบก็จะแสดงขึ้นมาให้ครับ
Code: Select all
Sub FindSheet()
Dim i As Integer
For i = 1 To Worksheets.Count
If Worksheets(i).Name = "Menu" Then
Worksheets(i).Select
End If
Next
End Sub