![รูนเมืองตรัง](/img/default-banner.jpg)
- Видео 255
- Просмотров 1 741 444
รูนเมืองตรัง
Таиланд
Добавлен 11 июн 2020
สร้าง Form เขียน Code คัดลอกไฟล์รูปภาพ : VBA copy files from one folder to another folder
#excelcopyfile #copyfilevba #copyfiletoanothorfolder
เลือกรับชมตามต้องการครับ
00:00 แนะนำการทำงานของ Form
04:10 เริ่มสร้างฟอร์ม
07:05 การสร้างปุ่มโหลด Form
09:00 เริ่มเขียน Code
ดาวน์โหลด file ตามลิงค์ด้านล่างน่ะครับ
drive.google.com/file/d/1aw-Lmkcqn3yPX8t5HEPKxFRBF6qeb6rZ/view?usp=sharing
เลือกรับชมตามต้องการครับ
00:00 แนะนำการทำงานของ Form
04:10 เริ่มสร้างฟอร์ม
07:05 การสร้างปุ่มโหลด Form
09:00 เริ่มเขียน Code
ดาวน์โหลด file ตามลิงค์ด้านล่างน่ะครับ
drive.google.com/file/d/1aw-Lmkcqn3yPX8t5HEPKxFRBF6qeb6rZ/view?usp=sharing
Просмотров: 134
Видео
จัดเอกสาร Excel ให้อยู่กึ่งกลางหน้ากระดาษ
Просмотров 123Месяц назад
#จัดเอกสารexcel #จัดหน้าexcel #กึ่งกลางหน้าexcel
Excel : EP 180 เปรียบเทียบ % ยอดขายแบบเดือนต่อเดือน MOM (Month over Month)
Просмотров 123Месяц назад
#เปรียบเทียบยอดขายเดือนต่อเดือน #momexcel #monthovermonth
Excel User Form สร้างฟอร์มกรอกข้อมูล | แสดงข้อมูลใน List Box มากกว่า 10 Column
Просмотров 9562 месяца назад
#listboxmore10column #vbalistboxmore10column Sub showdata() Dim i As Integer Dim datarow(1 To 100000, 1 To 11) 'กำหนดตัวแปร arrary For i = 1 To Sheet4.Range("A100000").End(xlUp).Row 'จำนวนแถวใน sheet c = 11 '¨Ó¹Ç¹ column For x = 1 To c datarow(i, x) = Sheet4.Cells(i, x) 'เก็บข้อมูลทั้งหมดลงในตัวแปร array ที่ชื่อ datarow Next x Next i Me.ListBox1.ColumnWidths = "70,200,50,60,90,100,200,150,200,1...
ยกเลิกแสดงเลขหน้าในหน้าแรก ของ Word และ Excel
Просмотров 2422 месяца назад
#ไม่แสดงเลขหน้าหน้าแรก #ยกเลิกเลขหน้าหน้าแรก
เครื่องหมาย + และฟังก์ชั่น Sum() | ใช้คำนวณแทนกันได้
Просмотров 953 месяца назад
#เครื่องหมาย #functionsum # andsum
Excel : EP177 ข้อจำกัดของการเรียงลำดับข้อมูลใน Excel
Просмотров 1583 месяца назад
#เรียงข้อมูลexcel #เรียงลำดับข้อมูลexcel
แต่ลืมตั้ง Tab..!? ดูคลิปนี้...| วิธีตั้ง Tab หลังจากพิมพ์เอกสารไปแล้ว
Просмотров 2324 месяца назад
#ลืมตั้งtab #ตั้งtabหลังพิมพ์เอกสาร #ลืมตั้งแท็ป
ยกเลิก Auto Number ใน ms-word | คลิปนี้เหมาะสำหรับผู้เริ่มต้นใช้ word
Просмотров 2784 месяца назад
#ยกเลิกautonumber #ยกเลิกตัวเลขอัตโนมัติ
Excel : EP175 วิธีคำนวณหาผลรวมตัวเลขเบอร์โทรศัพท์ | บวกเลขเบอร์โทร
Просмотров 1914 месяца назад
#รวมตัวเลขเบอร์โทร #บวกเลขเบอร์โทร #รวมเลขมือถือ
Excel:EP13 นับจำนวนรายการ ในช่วงของข้อมูลที่ระบุ ด้วยสูตร Countifs() | ง่ายมากๆๆ
Просмотров 1855 месяцев назад
#countbetween #นับจำนวนรายการ #countdate
Excel User Form สร้างฟอร์มกรอกข้อมูล | PART#12 ค้นหาและแสดงข้อมูลใน List box
Просмотров 1,6 тыс.5 месяцев назад
#searchinlistboxvba #ค้นหาข้อมูลในlistbox File Excel โหลดไปประยุกต์ ตามลิงค์ด้านล่างน่ะครับ drive.google.com/file/d/1PIqGo2osSAdCfYl4VlYIMwlMJrjBXNxO/view?usp=sharing PART #1 เริ่มต้นสร้างฟอร์ม คลิกลิงค์ ด้านล่าง ruclips.net/video/NIAcjtS6JS8/видео.html PART #2 แสดงข้อมูลใน List Box ของฟอร์ม ruclips.net/video/Uh_7FBLCvDU/видео.html PART #3 ใส่ข้อมูล Combo Box & นำข้อมูล List Box มาแสดงในฟอร์ม r...
Excel User Form สร้างฟอร์มกรอกข้อมูล | PART#11 ปุ่มกำหนดรหัสพนักงานแบบอัตโนมัติ Auto Id Number
Просмотров 1,3 тыс.5 месяцев назад
#searchinlistboxvba #ค้นหาข้อมูลในlistbox File Excel โหลดไปประยุกต์ ตามลิงค์ด้านล่างน่ะครับ drive.google.com/file/d/1PIqGo2osSAdCfYl4VlYIMwlMJrjBXNxO/view?usp=sharing PART #1 เริ่มต้นสร้างฟอร์ม คลิกลิงค์ ด้านล่าง ruclips.net/video/NIAcjtS6JS8/видео.html PART #2 แสดงข้อมูลใน List Box ของฟอร์ม ruclips.net/video/Uh_7FBLCvDU/видео.html PART #3 ใส่ข้อมูล Combo Box & นำข้อมูล List Box มาแสดงในฟอร์ม r...
ดึงข้อมูลมาแสดงด้วยคำสั่ง Filter ใน Microsoft Excel 365 | ง่ายมากกกๆๆๆๆ!
Просмотров 1 тыс.5 месяцев назад
#filterข้อมูล #ค้นหาแสดงข้อมูลexcel
Excel : EP169 เพิ่มข้อมูลใน Drop down list แบบอัตโนมัติ | Autometic update Drop down list
Просмотров 1,8 тыс.5 месяцев назад
Excel : EP169 เพิ่มข้อมูลใน Drop down list แบบอัตโนมัติ | Autometic update Drop down list
Excel : EP168 วิธีใช้สูตรคำนวณหาช่วงเวลา Time Period
Просмотров 6346 месяцев назад
Excel : EP168 วิธีใช้สูตรคำนวณหาช่วงเวลา Time Period
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #11 : ออก ใบ Invoice เป็น PDF (ใหม่ฉบับปรับปรุง)
Просмотров 7306 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #11 : ออก ใบ Invoice เป็น PDF (ใหม่ฉบับปรับปรุง)
คำนวณ! เพื่อแจ้งเตือนวันหมดอายุล่วงหน้า | อีก 5 เดือนข้างหน้าสินค้าใดจะหมดอายุบ้าง?
Просмотров 1,3 тыс.6 месяцев назад
คำนวณ! เพื่อแจ้งเตือนวันหมดอายุล่วงหน้า | อีก 5 เดือนข้างหน้าสินค้าใดจะหมดอายุบ้าง?
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #10 : ออก ใบ Invoice เป็น PDF File
Просмотров 7357 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #10 : ออก ใบ Invoice เป็น PDF File
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #9 : Delete Invoice ลบ หรือ ยกเลิกใบ Invoice
Просмотров 7447 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #9 : Delete Invoice ลบ หรือ ยกเลิกใบ Invoice
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #8 : Search Invoice ค้นหาใบ Invoice
Просмотров 5087 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #8 : Search Invoice ค้นหาใบ Invoice
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #7 : เพิ่ม | แก้ไข | Save ใบ Invoice
Просмотров 6467 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #7 : เพิ่ม | แก้ไข | Save ใบ Invoice
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #6 : ค้นหาข้อมูลลูกค้าและข้อมูลสินค้าจาก Textbox ของฟอร์ม
Просмотров 5867 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #6 : ค้นหาข้อมูลลูกค้าและข้อมูลสินค้าจาก Textbox ของฟอร์ม
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #5 : เพิ่มหมายเลข Invoice แบบอัตโนมัติ Auto Invoice Id
Просмотров 5827 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #5 : เพิ่มหมายเลข Invoice แบบอัตโนมัติ Auto Invoice Id
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #3 : สร้างฟอร์มค้นหาลูกค้า และ ฟอร์มค้นหารายการสินค้า
Просмотров 1 тыс.7 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #3 : สร้างฟอร์มค้นหาลูกค้า และ ฟอร์มค้นหารายการสินค้า
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #4 : เพิ่ม แก้ไข ยกเลิกรายการสินค้าของใบ Invoice
Просмотров 8317 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #4 : เพิ่ม แก้ไข ยกเลิกรายการสินค้าของใบ Invoice
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #2 : เริ่มสร้างฟอร์มใบ Invoice
Просмотров 1,3 тыс.8 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #2 : เริ่มสร้างฟอร์มใบ Invoice
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #1 : แนะนำการทำงานเบื้องต้นก่อนการสร้างฟอร์ม
Просмотров 1,6 тыс.8 месяцев назад
สร้างฟอร์มเขียน Code เก็บใบ Invoice | Part #1 : แนะนำการทำงานเบื้องต้นก่อนการสร้างฟอร์ม
Excel : EP157 การใช้ฟังก์ชั่น Vlookup และ Xlookup ดึงข้อมูลข้าม File
Просмотров 7278 месяцев назад
Excel : EP157 การใช้ฟังก์ชั่น Vlookup และ Xlookup ดึงข้อมูลข้าม File
คลิปเป็นประโยชน์มากครับ ขอบคุณครับ
@@saharatsaengyuan3781 ยินดีครับ ขอบคุณครับ
ตอนนี้ทำได้แล้วครับ แต่อยากได้เพิ่มเติมในส่วนของไฟล์ภาพ ถ้ามีรูปภาพในเซลล์ของExcel สามารถเขียน code ให้ภาพไปอยู่ใน word สามารถทำได้ไหมครับ
ถ้า Rowsource ไม่ต้องการที่คอลัมน์ที่ติดกัน 1-5แต่ต้องการคอลัมน์1,3,5 แบบนี้ค่ะต้องทำยังไงหรอคะ
กรณีถ้าเข้างานปกติ 8 โมง แต่มีโอทีเช้าให้เข้า 6 โมง เป็นบางวัน ต้องเขียนสูตรยังไงคะ
สอบถามค่ะ เวลาทำงานจริงเข้า 8 โมงเช้า แต่มีโอทีตอนเช้าบางวัน ต้องเข้า 6 โมงเช้า บริษัทคิดเป็นโอทีเช้า 2 ชม. ต้องเขียนสูตรยังไงคะ
รับสอนเเบบตัวต่อตัวมั้ยครับ อยากเรียนมาก อยู่เเถวสมุทรปราการ
ตัวอักษรในlistboxจัดเรียงไม่สวยครับแก้ยังไงครับ
ลอง insert แล้ว มันไปเขียนทับที่บรรทัดที่ 6 ไม่ไปบรรทัดสุดท้าย เพิ่มไปอีก ก็จะไปทับที่เดิม แก้ไม่ตกครับ
@@jarinsrisuwan196 ลืมบวก 1 หรือเปล่าครับ
@roon อาจารย์ครับ มีวิธีทำใน google sheet มั้ยครับ
มีคอร์สสอน vba มั้ยครับ
สุดยอดครับ ขอบคุณเทคนิคดีๆครับ
@@foryouilove3257 ขอบคุณครับ
ติดปัญหา ตรงนี้ With Me.ListBox1 มันไม่มีหัวข้อ listbox1
ป้าอายุ58เรียนรู้ไว้ได้สอนหลานขอบคุณค่ะ
@@nonglscjsen1618 ยินดีมากครับ ขอบคุณครับ
สอบถามค่ะ ถ้าเขียนตัวนี้ มีโค้ดที่run แล้ว ขึ้นเตือนmsgbox ว่าข้อมูลซ้ำไหมคะ
@@Phetyodmongkut มีการตรวจสอบข้อมูลช้ำครับ
พี่ครับผมขอแอดไลน์พีีได้ไหมครับ ผมมีโค๊ด showdata อันนึงสามารถแสดงข้อมูลจำนวนมากโดยไม่มีดีเลย์แต่ติดปัญหาเมื่อเราอัพเดทข้อมูล ข้อมูลในคอลัมน์มันไม่อัพเดทครับ
สวัสดีค่ะ รับสอนไหมคะ
@@SarahKohlyn ไม่มีเวลาจริงๆครับ มีอะไรให้ช่วยเหลือยินดีเลยครับ ขอบคุณครับ
ขอบคุณมากๆนะคะ สอนชัดเจนมาก
@@roseonsa ยินดีครับ ขอบคุณครับ
ຂອຍໃຈເດີ🙏
@@Boun-vy8hu ยินดีครับ
ขอช่องทางติดต่อสอบถามหน่อยคะ เราใช้กับการคำนวณสถิติหวยย้อนหลังได้ไหมคะ
@@methiniphikunsri1566 การคำนวณหวยต้องเก็บสถิติย้อนหลังหลายปีครับ
ถ้าเราสร้างFromแต่งให้กรอกลงใด้ในหลาย Sheet ได้ไหมคะ เช่น ตัวอย่าง รหัส กับ ชื่อ-นาม เราต้องการให้กรอกลงใน sheet 2 และ sheet3 หรือ รหัส กับ เงินเดือนให้อยู่ใน sheet 4 และsheet 5 ในช่องเงินเดือนให้ Sum รวมยอดให้ด้วยได้ไหมคะ
@@tangdididi2958 ทำได้ครับ แต่ต้องเขียน code เพิ่มพอสมควรครับ
ผมกดloadรูปพอถึงfolderที่เก็บรูปกดcancleออกโดยไม่ได้เลือกรูปเกิดerror 53ครับ
@@kamonratpromjiam5616 ในคลิปนี้ผมลืมเช็ค error ครับ ลอง load file ในคลิปหลังๆ หรือ คลิป part 11 จะสมบูรณ์กว่า
ผมลองแล้มไม่ได้
👍
ขอบคุณครับพี่นั่งมึดมาหลายวัน
ยินดีครับ
ถ้าอยากเอารายสินค้ามาใส่ต้องทำอย่างไรครับ
เคยเรียนกับอาจารย์ ปัจจุบันก้อได้คลิปจากอาจารย์ในการทบทวนเสมออาจารย์ อัพใหม่ๆให้ด้วยนะคะ
เชิญได้ตลอดครับ ยินดีครับ ขอบคุณครับ
ขอบคุณครับงานตั้งค่าตามกำหนดทุกอย่างตัวอย่างมี3หน้าพิมพ์โดดไปหน้าที่4สิบกว่าบรรทัดกำลังหาวิธีจัดการพอดีเลย
ยินดีครับ
อาจารย์มีช่องทางในการติดต่อทางไลน์หรือเปล่าคะ
ติดต่ออาจารย์ได้ช่องทางไหนบ้างครับ
กรณีค้นหา รหัสว่าเคยมีแล้วหรือยัง ถ้ามีแล้วให้ดึงข้อมูลเดิมขึ้นมา แก้ไข สามารถเลือกได้ว่าจะ save ซ้ำที่เดิม หรือ Save ไว้ cell ใหม่จะทำอย่างไรคะ
ต้องปรับ code พอสมควรครับ เพราะ รหัสเหมือนกัน ตอนค้นถ้าเจอจะเอาตัวไหนมาแสดง
สอบถามครับ ต้องการบันทึกข้อมูล ประมาณ 46 combobox(46คอลัมน์) ใช้คำสั่ง Me.ComboBox46.Value = Me.ListBox1.List(Me.ListBox1.ListIndex, 45) ตั้งแต่ combobox1-46 ขึ้น run-time error '-2147024809980070057)': could not get the list property.invalid argument
ขอมูลเยอะมากครับ ผมขอลองทำดูก่อนนะครับ
@@roonขอบคุณครับ
❤
ขอบคุณครับ
ครูคะหนูตามศุตรแต่ก็ยังผิดทำไงดีค่ะ
Lode ตัวอย่างไปดูได้เลยครับ
หรือมัน error แบบไหนครับ
สอบถามค่ะอาจารย์ txtid ถ้าให้กรอกแค่ตัวเลขให้ ครบ 10 หลัก ถ้ากรอกไม่ครบหรือเกิน ให้ขึ้นข้อความแจ้งเตือน ทำยังไงค่ะ
Me คือ ตัวแปรอะไรครับอาจารย์
Me แค่บอกว่าเป็นตัวฉัน หรือ form นี้ครับ
@@roon ขอบคุณมากครับผม
ผมเอาep70-74 มารวมกับคลิปนี้ ep132 ได้ใบซื้อขายสินค้าหน้าร้านที่สมบูรณ์แบบมาก ค้นหาสินค้าก็ง่ายซะเหลือเกิน ขอบคุณพี่มากๆเลยนะครับ ที่แบ่งปันความรู้ให้ขอให้เจริญยิ่งๆขึ้นไปนะครับ😊😊😊
สาธุ ขอบคุณครับ
สามารถเขื่อมกับเครื่องพิมพ์สติกเกอร์แล้วสั่งพิมพ์ชื่อออกมาเเป็นบาร์โค้ดได้ไหมคะ
ต้องลองดูก่อนครับ เบื้องต้นน่าจะได้ครับ
รบกวนสอนวิธีทำเลข 001 และการเขียนโค๊ดให้เลขมันรัน newinvoice ครับ
ถ้าเราอยากได้ ตัวอักษรนำหน้าตัวเลข ต้องเขียนแบบไหนหรอครับ
ในบรรทัดนี้ Me.txtid.Value = tempid เพิ่มแบบนี้ได้เลยครับ Me.txtid.Value = "ข้อความที่ต้องการ" & tempid ขอบคุณครับ
@@roon ขอบคุฯมากครับ เดี๋ยวลองดู
@@roon ผมลองใส่ตามแล้ว แต่พอมันหาเลขต่อไป มันขึ้น error missmatch เด้งไปที่ vid = CInt(Sheet1.Cells(i, "A").Value) ครับ
ทำไม่ได้ค่ะ มันไม่ขึ้นให้
ลอง save เป็น .doc ครับ
ขอบคุณครับ ทำได้แล้ว แต่ของผม เวลาค้นหาชื่อแล้ว พิมอังกฤษได้ แต่ภาษาไทยเป็น ?? แก้ไงหรอครับ
ไปเลือก region เป็น Thailand ครับ
code call me Clear_data มันไม่ทำงานอะครับ ต้องแก้ไงหรอครับ
Call clear_data ไม่มี me
@@roon .ใช่ๆพิมผิดครับ call clear_data เวลาีันโปรแกรม กรอกข้อมูล แล้วมันไม่เคลียให้ครับ ข้อมูลยังค้างอยู่ในช่อง
ถ้ามี2เงื่อนไขเช่นอยากดึง เดือน มาด้วยทำยังไงดีคะ
อาจารย์คะ อยากได้ไฟล์ค่ะ
ขอสูตรใส่ชื่อพนักงานเฉพาะแค่วันเสาร์-อาทิตย์ในตารางทำงาน โดยเอาชื่อพนักงานจาก อีกตารางมาใส่แบบอัตโนมัติ ตัวอย่างครับ เสาร์ ใส่ชื่อคนที่1 อาทิตย์ ใส่ชื่อคนที่2 และข้ามจันทร์-ศุกร์ มาใส่วันเสาร์เลยใส่ชื่อคนที่ 3 ประมาณนี้ครับ โดยที่ตารางทำงานจะใส่วันที่ทุกวันครับ
แนะนำใช้การทำ filter เลือกเฉพาะ ส อา (text filter) เสร็จแล้วคัดลอกเอาเลยครับ
สอบถามค่ะ หากกรณี insert ข้อมูลใหม่เข้าไปแต่ไม่อยากให้ข้อมูลใหม่ไปต่อแถวสุดท้าย อยากให้ข้อมูลเรียงจากรหัสน้อย>>มาก ต้องทำอย่างไรคะ ขอบคุณค่ะ🙏🏻
ทำได้ครับ แต่เบื้องต้น แนะนำใช้การเรียงลำดับใน sheet ก่อนนะครับ
@@roon ก็คือ insert ให้ข้อมูลลงไปอยู่แถวล่างสุดแล้วกดเรียงข้อมูลใน sheet อีกทีเลยใช่ไหมคะ🙏🏻
สามารถเพิ่มขนาดตัวหนังสือDrop down listได้ไหมครับ ตัวเล็กจนต้องใส่แว่น
ไปที่ developer เอา mouse ชี้ที่ sheet แล้วคลิกขวา 1 ครั้ง เลือกคำสั่ง view code วางคำสั่งนี้ลงไป Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error GoTo SetZoom Dim ZoomAmt As Integer ZoomAmt = 100 If Target.Validation.Type = 3 Then ZoomAmt = 300 SetZoom: ActiveWindow.Zoom = ZoomAmt End Sub แล้วลองรันดูครับ ขอบคุณครับ
@@roon ขอบคุณมากครับ
@@user-th1um2lq3c ยินดีครับ
พี่ค่ะ ถ้าไม่มี Microsoft ActiveX Data Objects 6.1 Library ค่ะ มีแต่ 6.0 ต้องทำยังไงค่ะ
เลือกมาแล้ว ใช้งานไม่ได้ใช่มั้ยครั ถ้าไม่มีต้อง load เพิ่มครับ stackoverflow.com/questions/35269948/how-to-add-microsoft-activex-data-objects-6-1-library-and-microsoft-vbscript-reg
กรอกข้อมูลครบแต่ปุ่มinsert เป็นสีเทาครับกดไม่ได้
ลืม สั่งให้ปูม enable ครับ ตรวจสอบอีกครั้งนะครับ น่าจะพิมพ์ตกไป
ของผม error เป็น Run-time error ‘481’ : invalid picture ตอน เลือกรูป ไฟล์ .png ครับ แก้ไขอย่างไรครับ
รูป . jpg ได้ใช่มั้ยครับ .PNG อาจจะมีข้อจำกัด ผมขอดูก่อนนะครับ
@@roon .jpg ใช้ได้ครับ