แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - SSukHaveq

หน้า: [1]
1
พอสร้าง listbox ขึ้นมา

1. อยากตั้งค่าให้ตัวหนังสือใน listbox อยู่ตรงกลางทั้งหมดนะครับพอจะมีวิธีการตั้งค่าไหมครับ
2. อยากตั้งค่าให้ตัวหนังสือใน listbox บางช่องอยู่ตรงกลาง บางช่องอยู่ชิดขวานะครับพอจะมีวิธีการตั้งค่าไหมครับ
3. อยากตั้งค่าให้ตัวหนังสือของ column heads นะครับพอจะมีวิธีการตั้งค่าไหมครับ

คือเคยลองค้นหาข้อมูลเเล้วพบว่าใช้โค้ด ชื่อlistbox.LabelAlign  เเต่ไม่พบตัวอย่างการเขียน vba นะครับ เลยไม่ทราบว่าสามารถใช้ตั่งค่า listbox ได้หรือเปล่า ขอคำเเนะนำด้วยครับ   :cry: :cry:

2
ขอบคุณสำหรับคำเเนะนำครับ จะลองนำไปใช้ดูครับ  :miao: :yuush:

3
คือ ผมทราบว่าปกติเราสามารถ นำข้อมูลเข้าออก จาก access ไป excel ได้โดยการเลือก external data เเละไปที่ excel
เเต่อยากทราบว่าเราสามารถสร้างปุ่มไว้ใน ฟอร์ม เเล้วเขียน VBA ให้นำข้อมูลเข้าหรือออก จาก access ไป excel ได้รึเปล่าครับ

ถ้าสามารถทำได้ต้องเขียนโค้ดยังไงบ้างครับ ขอคำเเเนะนำด้วยครับ :dizzy: :dizzy:

4
ผมก็เขียน accessไม่ค่อยเก่งเหมือนกัน เเต่พอจะเเนะนำได้ดังนี้ครับ

1. ไปกำหนด vba ที่ปุม search

Private Sub Command83_Click()
ประกาศตัวเเปร
Dim strseach As String
Dim strText As String

    If IsNull(Me.txtSearch) Then
    strsearch = "SELECT * from Qpart" (ตอนที่ช่องค้นหาว่างจะขึ้นมาทั้งหมด เเต่กรณีของผมเป็นเเบบ continuous form ครับ)
    Else
    strText = Me.txtSearch.Value (เก็บค่าจากช่องค้นหาไปในตัวเเปร strtext)
    strsearch = "SELECT * from ( ฟอร์มหรือQueryที่ต้องการให้เลือกข้อมูล ) where ((............LIKE ""*" & strText & "*"")
     or(........ LIKE ""*" & strText & "*"") or (....... LIKE ""*" & strText & "*"") ) "
    Me.RecordSource = strsearch
    End If
    (ให้เลือกข้อมูลทุกอย่างจากฟอร์ม หรือ คิวรี่ โดยตรง ...... คือ ชื่อ filed ที่ต้องการให้ค้นหาครับ )
End Sub

2.ผมจะสร้าง Query ที่รับค่าจากฟอร์มโดยการไปกำหนดที่ Criteria ของ ฟอร์ม เช่น [Forms]![ชื่อฟอร์ม]![textboxที่เราต้องการให้query รับค่า] เพื่อให้เวลาเปลี่ยน record ที่ค้นหา จะได้ปริ้นได้ถูกต้อง

3.สร้าง Report จาก Query ในข้อสอง ที่นี้เวลาเราค้นหา record ใหม่ report จะเปลี่ยนไป

4.ไปกำหนดในปุ่ม report   โดยใช้โค้ด vba ---> DoCmd.OpenReport " ชื่อ report  "  เมื่อกดปุ่มนี้เเละเชื่อมกับ printer อยู่       
    จะสามารถปริ้นท์ได้ครับ

ถ้าเป็นผมจะทำประมานนี้ครับ ไม่เเน่ใจว่ามีวิธีง่ายกว่านี้รึเปล่านะครับ ถ้าท่านอื่นสามารถทำได้ดีกว่าก็ช่วยเเนะนำด้วยนะครับ  :spook:
ถ้าไม่เข้าใจ หรือ ทำไม่ได้ก็ขออภัยด้วยครับ :zzz: :zzz:


5
ทำได้เเล้วครับ ขอบคุณมากครับ  :miao:

6
ขอคำเเนะนำครับ
คือผมต้องการสร้างฟอร์ม เพื่อใข้ในการค้นหา Record ต่างๆ เเละใน Record นั้นมีการเก็บ ที่อยู่ของไฟล์รูปภาพด้วย
ซึ่งผมต้องการสร้างฟอร์มเเบบ Continuous Forms เเล้วมีรูปภาพปรากฎในฟอร์มด้วย ซึ่งผมไม่สามารถกำหนดให้ภาพตรงกับข้อมูลที่ต้องการได้
 
ผมจึงทำการออกเเบบใหม่โดยการสร้าง icon รูปกล้องขึ้นมา เเล้วหวังว่า เมื่อกดไอคอนรูปกล้อง(เป็น picture นะครับ) ภาพที่ตรงกับข้อมูลจะปรากฎขึ้นเเบบ pop up
เเต่ผมก็ไม่สามารถเขียน vba ได้ครับ จึงอยากขอคำเเนะนำในการเขียนโค้ด vba ครับ (หรือ ถ้ามีวิธีกำหนดรูปใน Continuous Forms  ได้ก็ยินดีรับฟังครับ)



ขอบคุณทุกท่านที่เข้ามาตอบล่วงหน้าครับ ขอบคุณครับ

7
ขอสอบถามผู้รู้ครับ

คือผมต้องการสร้างฐานข้อมูล้เกี่ยวกับการเก็บข้อมูลชิ้นส่วนอุปกรณ์ , เลข PN (Part Number) เเละรูปภาพ
โดย Form สามารถอัปโหลดรูปภาพลงไปใน table ได้ด้วย  attachment (ต้องการให้รูปถูกเเนบลงฐานข้อมูลเพื่อไปเเสดงใน Form หรือ Report ได้ในภายภาคหน้า) เเละ เมื่อมีเลข PN ที่เคยบันทึกเอาไว้ถูกเลือกลงไปใน combo box   ภาพที่เคยบันทึกไว้กับเลข PN นั้นๆต้องเเสดงออกมาโดยทันที่

ผมควรเขียนโค้ดในการบันทึกรูปเเละเรียกรูปตามเลข PN อย่างไรดีครับ ????  :cry: :cry:

ปล.เป็นกระทู้เเรกถ้าเขียนไม่รู้เรื่องก็ขออภัยด้วยครับ


หน้า: [1]