:D snasui.com ยินดีต้อนรับ :D
ยินดีต้อนรับสู่กระดานถามตอบ Excel and VBA และอื่น ๆ ที่เป็นมิตรกับทุกท่าน มีไฟล์แนบมหาศาล ช่วยให้ท่านค้นหาและติดตามศึกษาได้โดยง่าย :thup: สมาชิกท่านใดที่ยังไม่ได้ระบุ Version ของ Excel ที่ใช้งานจริง สามารถทำตาม Link นี้เพื่อจะได้รับคำตอบที่ตรงกับ Version ของท่านครับ :arrow: ระบุ Version ของ Excel
:!: โปรดทราบ :!:
  1. กรุณาอ่านกฎการใช้บอร์ด (Forum rules) ในตำแหน่งด้านบนของแต่ละบอร์ด
  2. การสมัครสมาชิก การ Login การกู้คืนรหัสผ่าน
    1. สมัครสมาชิกดูขั้นตอนได้ที่ :arrow: สมัครสมาชิก
    2. Login เข้าระบบโดยคลิกปุ่ม Login ตรงมุมขวาบนของหน้านี้ :roll:
    3. การ Login ผ่าน Facebook ดูวิธีที่ :arrow: Login ผ่าน Facebook
    4. ลืมรหัสผ่านสามารถรับรหัสใหม่ได้ที่ :arrow: Reset รหัสผ่าน
  3. มีปัญหาการใช้งาน แจ้งผู้ดูแลระบบได้ที่ :arrow: ติดต่อผู้ดูแลระบบ
  4. กำหนดการตั้งค่าส่วนตัว เช่นตั้งค่าภาษาเป็นไทยหรืออังกฤษดูได้ที่ :arrow: ตั้งค่าส่วนตัว
  5. การตั้งและตอบกระทู้ดูได้ที่ :arrow: วิธีการตั้งและตอบกระทู้
  6. การจัดรูปแบบตัวอักษรด้วย bbcode ในช่องแสดงความคิดเห็นดูได้ที่ :arrow: จัดรูปแบบตัวอักษร
  7. กำหนดขนาดตัวอักษรใน Browser ดูได้ที่ :arrow: กำหนดขนาดตัวอักษรใน Browser
🪷 คำแสดงเจตนา
ขอผลแห่งการให้ความรู้นี้ จงกลับไปยังผู้ที่เป็นเจ้าของเดิม แม้ข้าพเจ้าจะไม่รู้จักท่านก็ตาม ขอให้แสงแห่งปัญญาที่ท่านเคยจุดไว้ ได้กลับไปเติมเต็มชีวิตของท่านอีกครั้ง และขอให้เจตนาของข้าพเจ้าเป็นการคืนความดีอย่างสงบ

แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

Forum rules
  1. ไม่อนุญาตให้ใช้ภาษาแชทในการถามและตอบปัญหา ไม่ใช้คำว่า "คับ" หรือ "อ่ะครับ" แทนคำว่า "ครับ" ไม่ใช้คำว่า "เด๋ว" แทนคำว่า "เดี๋ยว" เป็นต้น เนื่องจากเมื่อแปลเป็นภาษาต่างประเทศแล้วจะให้ความหมายผิดไปจากที่ควรจะเป็น
  2. ห้ามถามโดยระบุชื่อผู้ตอบและต้องตั้งชื่อกระทู้ให้สื่อถึงปัญหาที่จะถาม ไม่ตั้งชื่อว่า ช่วยด้วยครับ, มีปัญหามาปรึกษาครับ เป็นต้น
  3. กรุณาอธิบายปัญหาและระบุคำตอบที่ต้องการมาในกระทู้ด้วยเสมอถึงแม้จะอธิบายไว้ในไฟล์แนบแล้วก็ตาม ทั้งนี้เพื่ออำนวยความสะดวกแก่เพื่อนสมาชิกในการค้นหาข้อมูล
  4. กรุณาแนบไฟล์ตัวอย่างพร้อมแสดงคำตอบที่ถูกต้องมาในไฟล์ด้วยเพื่อให้ง่ายต่อการทำความเข้าใจและสะดวกต่อการตอบคำถาม (ขนาดไฟล์ไม่เกิน 500Kb ขนาดภาพไม่เกิน 800*600 Pixel) ไม่แนบเป็น Link มาจากแหล่งอื่นที่อาจจะถูกลบทิ้งไปโดยต้นทางในภายหลัง นอกจากนี้ไม่ควรแนบไฟล์ที่มีข้อมูลสำคัญอันก่อให้เกิดความเสียหายกับตนเองและผู้อื่น
  5. กรณีเป็นคำถามเกี่ยวกับ Programming เช่น VBA, VB.Net, C#, SQL ฯลฯ ต้องลองเขียนมาเองก่อนเสมอ ถามเฉพาะที่ติดปัญหา ระบุ Module, Procedure ที่ติดปัญหาให้ชัดเจน กรุณาโพสต์ Code ให้แสดงเป็น Code คือเปิดด้วย [code] และปิดด้วย [/code] ตัวอย่างเช่น [code]dim r as range[/code] เพื่อให้แตกต่างจากข้อความทั่วไป สะดวกในการอ่านและทดสอบ (คลิกเพื่อดูตัวอย่างเพิ่มเติม)
  6. กรุณาแจ้งผลการใช้งานเมื่อได้รับคำตอบว่าตรงกับความต้องการหรือไม่

Post a reply


This question is a means of preventing automated form submissions by spambots.
Smilies
:D :thup: :cp: :flw: :rz: :sg: :tt: :) ;) :( :o :shock: :? 8-) :lol: :x :P :oops: :cry: :evil: :twisted: :roll: :!: :?: :idea: :arrow: :ard: :arl: :aru: :| :mrgreen: :geek: :ugeek:
BBCode is ON
[img] is ON
[url] is ON
Smilies are ON
Topic review
   

Expand view Topic review: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#12

by thitikun817 » Fri Jun 12, 2020 9:36 pm

ขอบคุณครับอาจารย์

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#11

by snasui » Thu Jun 11, 2020 11:55 pm

:D มีคนเคยเจอเหมือนกันครับ https://stackoverflow.com/questions/357 ... int-export

สำหรับ Case นี้ผมไม่ทราบวิธีแก้ อาจจะลองทำตาม Link ที่ผมยกมา ในกรณีที่ต้องใช้ไฟล์ใด ๆ ตาม Link ขอให้ Backup ไฟล์เดิมไว้ก่อนเสมอครับ

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#10

by thitikun817 » Thu Jun 11, 2020 10:02 pm

1. ผมกดปรินจากปุ่ม Print ซ้ายมือบนสุดครับ คือในรูป "Test6" แสดงค่า แต่พอปรินจริงๆ เป็นadobeหรือปรินเป็นกระดาษ ค่าไม่ขึ้นครับ ตามรูปที่ส่งไปก่อนหน้าครับ
2. เรื่อง "คับ" ผมพยายามแก้ครับ ขอโทษครับอาจารย์
Attachments
PIC2.jpg
PIC2.jpg (38.01 KiB) Viewed 33 times

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#9

by snasui » Thu Jun 11, 2020 8:12 am

:D Code นี้ต้องเปิด Report มาก่อนเพราะใช้ Event Load ในการส่งค่าไป Sub Form

ในการทำงานจริงมีการเปิด Report ก่อน Print หรือไม่ อย่างไร กรุณาให้ข้อมูลเพิ่มเติมมาด้วยครับ

กรุณาตรวจสอบคำว่า "ครับ" ให้ตรงกับกฎการใช้ฟอรัมข้อ 1 ด้านบน :roll: เนื่องจากผิดมาหลายตำแหน่งครับ

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#8

by thitikun817 » Wed Jun 10, 2020 9:57 pm

อาจารย์คับ คือในคอมมันโชว์ขึ้นมาจริงคับ แต่เวลาปริน ไม่ว่าจะเป็นpdf หรือปรินเครื่องปรินเลย มันไม่ขึ้นมาครับ จะต้องแก้ยังไงคับ ขอบคุณคับ
Attachments
PIC1.jpg
PIC1.jpg (19.21 KiB) Viewed 39 times

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#7

by thitikun817 » Tue Jun 09, 2020 10:58 am

ขอบคุณครับอาจารย์

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#6

by snasui » Mon Jun 08, 2020 7:13 pm

:D ตัวอย่าง Code ครับ

Code: Select all

'///Main Report
Private Sub Report_Load()
    Me.txtTest3 = "Test3"
    Me![rptsubReport].Report![txtTest6] = "Test6"
End Sub

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#5

by thitikun817 » Sun Jun 07, 2020 9:29 am

เป้าหมายคือ จะสั่งปรินreport โดยในreport จะมี supreport ที่เอาข้อมูลมาจาก vba ครับ แต่มันไม่ยอมขึ้น ถ้าไม่ได้ผูก master-child ครับ
Attachments
test - Copy.rar
(29.38 KiB) Downloaded 4 times

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#4

by snasui » Sat Jun 06, 2020 1:32 pm

:D Zip มาก่อนครับ

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#3

by thitikun817 » Sat Jun 06, 2020 1:11 pm

1. ผมพยายามแนบไฟลแล้ว มันเตือนขึ้นมาอย่างงี้ ต้องทำยังไงครับ
2. ขนาดไฟล ผมพยายามทำให้เล็กสุดแล้วได้ 704kB ครับ ตัดทุกอย่างออกแล้วคับ
Attachments
Pic3.jpg
Pic3.jpg (22.05 KiB) Viewed 62 times

Re: แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#2

by snasui » Sat Jun 06, 2020 9:00 am

:D กรุณาแนบไฟล์ตัวอย่าง ตัดสิ่งที่ไม่เกี่ยวข้องทิ้งไป หากไฟล์ใหญ่ให้ Zip มาก่อนจะได้สะดวกต่อสมาชิกในการตอบครับ

แสดงข้อมูลจาก vba ไปที่ textbox ใน subreport

#1

by thitikun817 » Thu Jun 04, 2020 1:30 pm

ต้องการแสดงค่าให้ออกใน textbox ใน subreport ใช้ vba คับ มันไม่แสดงค่าครับ แต่ผมพยายามวิธีอื่นได้ แต่ผมจะต้องใช้ vba สร้างเงื่อนไขครับ

Code: Select all

'///Main Report โคตจาก main report คับ
Private Sub Report_Load()  
Me.txtTest3 = "Test3"  
End Sub

'///Subreport  โคตจาก sub report ครับ
Private Sub Report_Load()  
 Me.txtTest6 = "Test6"  
End Sub
Attachments
Pic1.jpg
Pic1.jpg (20.73 KiB) Viewed 66 times

Top