แสดงกระทู้

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 - nonc31

หน้า: [1] 2 3 4 5
1

โพสต์นี้ได้รับคำขอบคุณจาก: PookPuy, Eik Q Sang, มาลี

2
สั่ง "พิมพ์" ออกด้วยไดรเวอร์ปริ๊นเตอร์ ของโปรแกรม Snagit   :cool: :cool: :cool: :cool:
โพสต์นี้ได้รับคำขอบคุณจาก: Eik Q Sang

3
ไม่รู้ใช่ป่าวแบบนี้
โพสต์นี้ได้รับคำขอบคุณจาก: Un

4
Private Sub Command13_Click()
On Error Resume Next
DoCmd.OutputTo acOutputReport, "rptSugarOrder", _
acFormatPDF, ""
End Sub
โพสต์นี้ได้รับคำขอบคุณจาก: Eik Q Sang

5
ไม่รู้ว่ามีฟังชั่นของ Access ในตัวมันเองหรือป่าว  แต่ทำฟังชั่นใช้เองก็ O ยุนะครับ  :cool: :cool: :cool: :cool:
โพสต์นี้ได้รับคำขอบคุณจาก: MAKI

6
ใช้โค๊ด Loopๆๆ  แกะดูนะครับ  ดูงงๆ หน่อย ผมก็ลอกมา  :shout: :shout: :shout: :shout: :shout:
โพสต์นี้ได้รับคำขอบคุณจาก: MAKI

7
ทั้ง 2 ค่า ABCDEFGHIJKLM  และ  ABCDEFGHIJ  M  มีความยาว  13 ตัวอักษรเท่ากัน  แต่อันนึงอยากตัดเอา 12 ตัวอักษร   อีกอันอยากได้  10 ตัวอักษร  ใช้เงื่อนไขอะไรดี มาแยกแยะให้มันแตกต่างกันน้อ   :cool: :cool: :cool:  ใช้ Instr([txtsticker]," ") หาตำแหน่งช่องว่าง แล้วใช้ Mid()เข้ามาช่วย ถ้าเกิดว่ามัน เป็น AB  CDEFGHIJM จะทำไงล่ะ
หรือจะ Replace([txtsticker]," ","") ลบช่องว่างก่อนดี ลบเสร็จความยาวก็จะหายไป 2 ตัว พอทำ =IIf(Len([txtsticker])=13,Left([txtsticker],12),Left([txtsticker],10))
โพสต์นี้ได้รับคำขอบคุณจาก: yot

8
กด shift ค้าง+เปิดโปรแกรม  ถ้าเข้าถึงได้  ก็ลองทำการซ่อมแซมฐานข้อมูลดูครับ
โพสต์นี้ได้รับคำขอบคุณจาก: MAKI

9
ห้อง MS Access / : ต้องใช้ query อย่างไงครับ
« เมื่อ: 01 มี.ค. 66 , 22:50:51 »
table สิครับ  แกะตัวอย่างดูครับ
โพสต์นี้ได้รับคำขอบคุณจาก: aphichet.p@gmail.com

10
ใช้เรื่องของ SubForm
โพสต์นี้ได้รับคำขอบคุณจาก: บังเลาะ มูดอ

11
ห้อง MS Access / : Export file to Excel แบบหลายชีท
« เมื่อ: 21 ก.พ. 66 , 15:48:12 »
ใช้สูตรใน Excel เลยครับ  อย่าให้เดือดร้อน Access เลย   :cool: :cool: :cool:
โพสต์นี้ได้รับคำขอบคุณจาก: attapong

12
สร้างฟิลด์ลำดับเพิ่ม แล้วใช้การ Loop เข้ามาช่วย
โพสต์นี้ได้รับคำขอบคุณจาก: aphichet.p@gmail.com, พีระณัฐ สุขกำเนิด

13
ห้อง MS Access / : Export file to Excel แบบหลายชีท
« เมื่อ: 20 ก.พ. 66 , 21:37:40 »
                            Dim expXLS, Sheet1, Sheet2, Sheet3, Sheet4, ไปเรื่อยๆ As String
                            expXLS = "D:\test.xls"
                            Sheet1 = "ตาราง/คิวรี่1"
                            Sheet2 = "ตาราง/คิวรี่2"
                            Sheet3 = "ตาราง/คิวรี่3"
                            Sheet4 = "ตาราง/คิวรี่4"
                            ไปเรื่อยๆ.............
                            DoCmd.TransferSpreadsheet acExport, เวอร์ชั่น Excel, Sheet1, expXLS, True
                            DoCmd.TransferSpreadsheet acExport, เวอร์ชั่น Excel, Sheet2, expXLS, True
                            DoCmd.TransferSpreadsheet acExport, เวอร์ชั่น Excel, Sheet3, expXLS, True
                            DoCmd.TransferSpreadsheet acExport, เวอร์ชั่น Excel, Sheet4, expXLS, True
                            DoCmd.TransferSpreadsheet acExport, เวอร์ชั่น Excel, ไปเรื่อยๆ, expXLS, True
โพสต์นี้ได้รับคำขอบคุณจาก: attapong

14
ลองทำผ่าน safe mode  และลงทะเบียน Comdlg32.dll ด้วย cmd commands ครับ

สำหรับ 32บิต
cd\
C:
cd C:\windows\sysWOW64
regsvr32.exe %systemroot%\SysWOW64\Comdlg32.dll

หรือ สำหรับ 64บิต
cd\
C:
cd C:\windows\System32
regsvr32.exe %systemroot%\System32\Comdlg32.dll
โพสต์นี้ได้รับคำขอบคุณจาก: Un

15
#If Win64 Or VBA7 Then    ก็  Win64
โพสต์นี้ได้รับคำขอบคุณจาก: Un

16

Left([ฟิลด์1],InStr([ฟิลด์1],"คำค้น")-1)
โพสต์นี้ได้รับคำขอบคุณจาก: aphichet.p@gmail.com

หน้า: [1] 2 3 4 5