Excel Forum

ขอบคุณครับสำหรับคำแนะนำครับ ผมอาจจะอธิบายไม่ครบ แต่ที่ต้องการให้ช่วยแนะนำจริงๆ คือส่วนของโค๊ด Sub บันทึกข้อมูลอวนปัญหา() โค๊ดช่วง With Worksheets("Database") คือตอนนี้เมื่อใส่ข้อมูลลงในฟอร์มในชีทแรก แล้วกดปุ่มบันทึกข้อมูล มันจะบันทึกลงชีทที่ 2 คือชีท Database ความต้องการคืออยากให้ชื่อชีทตร...

ผมสร้างไฟล์เพื่อใช้เป็นฟอร์มบันทึกข้อมูล และบันทึกข้อมูลไว้ในอีกชีท คือ ชีท Database ปัญหาคือ ผมต้องการเปลี่ยนการบันทึกข้อมูลใหม่ จากเดิมบันทึกลงชีท Database ให้ไปบันทึกในชีทที่สร้างขึ้นมาใหม่ โดยเมื่อเปิดไฟล์ได้เขียนโค๊ดให้สร้างชีทใหม่ และตั้งชื่อชีทตามวันที่ปัจจุบัน ซึ่งชื่อชีทจะเปลี่ยนไปตามวันที่...

จากเอกสารที่แนบ วันที่ในคอลัมน์ A,B และ C หากมองปกติจะเห็นเป็นวันที่ธรรมดา แต่ถ้ากดดูที่เซลล์จะมีเครื่องหลาย ' อยู่หน้าวันที่ เช่น '22/1/2019 พอลองตั้งค่ารูปแบบวันที่แล้วไม่สามารถทำได้ วิธีแก้ไขที่ผมใช้คือ ใช้สูตร =Right(... ,Len()) ในคอลัมน์อื่นแล้วค่อยคัดลอกมาวางทับแล้วตั้งค่ารูปแบบวันที่ใหม่ มีว...

จากเอกสารที่แนบ วันที่ในคอลัมน์ A,B และ C หากมองปกติจะเห็นเป็นวันที่ธรรมดา แต่ถ้ากดดูที่เซลล์จะมีเครื่องหลาย ' อยู่หน้าวันที่ เช่น '22/1/2019 พอลองตั้งค่ารูปแบบวันที่แล้วไม่สามารถทำได้ วิธีแก้ไขที่ผมใช้คือ ใช้สูตร =Right(... ,Len()) ในคอลัมน์อื่นแล้วค่อยคัดลอกมาวางทับแล้วตั้งค่ารูปแบบวันที่ใหม่ มีวิ...

ตามหัวข้อเลยครับ ไม่ทราบว่าในexcel สามารถเขียนโค๊ดให้เปิดไฟล์เมื่อถึงเวลาที่กำหนด ได้หรือไม่ครับ หรือตั้งค่าใน windows ก็ได้ครับ สามารถทำได้หรือไม่ครับ

ทำเองได้แล้วครับแต่ติดปัญหาตรงที่ ต้องการเพิ่ม ComboBox จากอันเดียวเป็น 2 อันต้องเพิ่มโค๊ดยังไงครับ เพราะผมลองเพิ่มแล้วมัน Error ตอนรันมาโครบางตัวครับ ส่วนนี่เป็นโค๊ดที่ใช้อยู่ครับ Private Sub Workbook_Open() 'ส่วนนี้อยู่ใน Workbook With Worksheets("ตัดสรุป").ComboBox1 .Clear .AddItem &quo...

ในทำนองเดียวกันถ้าเปลี่ยนจากdrop down list เป็น combo box สามารถทำได้หรือไม่ครับ

ได้แล้วครับ พอดีหาในเว็ปเจอ ตอนแรกไม่ได้เพราะไปสร้างโมดูลใหม่ ต้องไปคลิ๊กที่ชื่อ sheet ที่ต้องการถึงรันได้ ตัวอย่างโค๊ดครับเผื่อมีคนสนใจ Sub worksheet_change(ByVal target As Range) Set target = Range("C1") 'เซลล์ที่มีการเปลี่ยนแปลงค่า(ทำเป็น drop down list) If target.Value = "ตะกั่ว/ล...

ตอนนี้ผมใช้ปุ่มในการสั่งรันมาโคร ซึ่งตัวมาโครเป็นการกรองข้อมูลในตารางตามที่กำหนด ซึ่งมีการกรองข้อมูลหลายแบบ ทำให้ต้องสร้างปุ่มสั่งรันมาโครหลายปุ่มมาก ผมเลยอยากทราบว่าสามารถกำหนดให้มาโครรันตามค่าที่เปลี่ยนแปลงไปในเซลล์ๆ หนึ่งได้หรือไม่ครับ และเซลล์ที่ข้อมูลเปลี่ยนแปลงดังกล่าวผมสามารถทำให้อยู่ในรูปแบบ...

สอบถามเพิ่มเติมครับ โค๊ดส่วนนี้หมายความว่าอย่างไรครับ

ขอขอบคุณด้วยเช่นกันครับ กำลังหาอยู่เลยครับ

ทำได้แล้วครับเปลี่ยนแปลงโค๊ดนิดหน่อย ขอบคุณที่แนะนำครับ Sub ClearContents() Application.ScreenUpdating = True Dim r1, r2 As Range Dim i As Integer With Worksheets("ตัดสรุป") Set r1 = .Range(.Range("E5"), .Range("E65536").End(xlUp)) Set r2 = .Range(.Range("G5")...

หากต้องการตรวจสอบแค่ "รวม B/C จัดเตรียม" จาก "รวม B/C จัดเตรียม 10 รายการ" สามารถทำได้หรือไม่ครับ เนื่องจากจำนวนรายการจะมีการเปลี่ยนแปลงอยู่ตลอด

เนื่องจากผมได้ศึกษาข้อมูลจากเวป แล้วเอามาประยุกต์ใช้กับงานของตัวเองซึ่งเป็นการตัดรายงานสรุปข้อมูลต่างๆ โดยตัดเอาข้อมูลที่ไม่จำเป็นบางส่วนออกออก โดยเบื้องต้นโค๊ดปัจจุบันได้ผลตามต้องการ แต่ยังมีโค๊ดบางส่วนที่ผมไม่เข้าใจ และอาจมีบางส่วนในโค๊ดที่ไม่จำเป็นต้องเขียนลงไป(เนื่องจากคัดลอกมา) เลยอยากฝากทุกท่า...

ขอบคุณอาจารย์มากครับที่ให้คำแนะนำ โดยส่วนตัวจะพยายามทำเองก่อนหากไม่ติดปัญหาหรือต้องการใช้งานจริงๆ ก็ไม่ค่อยอยากนำมาโพสต์ถามสักเท่าไหร่ เพราะโดยส่วนตัวแล้วคิดว่าหากทำสำเร็จโดยการศึกษาเองจะรู้สึกว่าเข้าใจได้มากกว่า และส่วนหนึ่งก็เกรงใจหลายๆท่านที่กรุณาสละเวลามาให้คำแนะนำอยู่บ่อยครั้ง ขอขอบคุณอีกครั้งค...

ผมมีความต้องการที่จะหัดเขียนโค๊ด VBA เพื่อมาใช้กับการทำงานครับ ตอนนี้ผมเริ่มจากการบันทึกมาโครเพื่อช่วยลดเวลาและขั้นตอนในการทำงานต่างๆใน Excel แล้วก็ศึกษาการเขียนโค๊ดตามเว็ปต่างๆ รวมถึงเว็ปนี้ด้วยครับ ซึ่งผมติดอยู่ที่การศึกษาการเขียนโค๊ดจากเว็ป เพราะโค๊ดที่เขียนขึ้นเองจะแตกต่างจากการบันทึกมาโคร และมี...

ขอบคุณมากครับ ตอนนี้กำลังดูกระทู้ที่ใกล้เคียงกันในฟอรัมนี้อยู่ครับ

รบกวนอาจารย์อีกหน่อยครับ กรณีไฟล์ต้นทางเปิดอยู่รูปแบบโค๊ดเป็นแบบไหนครับพยายามค้นหาในเว็ปแล้วยังไม่เจอเลยครับ

ผมมีไฟล์ที่exportออกมาจากโปรแกรมที่ใช้งานอยู่. และจะ copyไปใส่ในอีกไฟล์หนึ่ง ไม่ทราบว่าสามารถเขียนโค๊ดให้copyข้อมูลจากไฟล์ต้นทางเมื่อเปิดไฟล์ปลายทางอัตโนมัติได้หรือไม่ครับ ตอนนี้ใช้วิธีเปิดทั้ง2ไฟล์แล้วตั้งมาโครไว้สำหรับกดcopyข้อมูลที่ไฟล์ปลายทางครับ

หาอยู่เหมือนกันครับ.ขอบคุณครับ