Snasui Excel Forum

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

เหมือน run ไปจะ error ที่
With GetObject(sFileName)
แล้วขึ้น error แล้วไปต่อไม่ได้ครับผม

ขอบคุณครับ

ขอบคุณครับ

เหมือนว่าถ้าไม่เปิด ไฟล์ data2.xls ไว้แล้วกด run จะ error

run time error 9

ขอถามอาจาร์ยอีกหน่อยนะครับ ถ้า data2.xls ไม่ได้เก็บไว้ที่เดียวกัน จะต้องเขียนโค๊ะอย่างไรครับ
ขอบคุณครับ

ขอคำ แนะนำจากอาจาร์ยนะครับ
ผมมีปัญหาเรื่อง Vlookup ข้ามไฟล์ ไม่ขึ้น Error ขอคำแนะนำหน่อยนะครับ
Sub mylookupPR()
Dim lastrow As Long
lastrow = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
Set myrange = Workbooks("G\B\tan\data2.xls").Sheets1.Range("A:D")
'...Other code
On Error Resume Next
For i ...

ขอบคุณครับ

SWITCH ใช้งานกับ Excel 2007-2013 ได้ไหมครับ :lol:
หรือใช้ได้เฉพาะ 2016 ถ้าจะใช้กับ 2007-2013 ต้องทำอย่างไรครับ

=SWITCH(WEEKDAY(A2),1,"วันอาทิตย์",2,"วันจันทร์",3,"วันอังคาร","ไม่มีค่าที่ตรงกัน")

=SWITCH(A4,1,"วันอาทิตย์",2,"วันจันทร์",3,"วันอังคาร","ไม่มีค่าที่ตรงกัน")

ขอบคุณครับ

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

อยากถามอาจาร์ยหน่อยนะครับ ประมาณวันอาทิตย์ผมได้ดู ไลด์สดจาก youtube ของอาจาร์ย
เรื่อง ifna กับ iferror
ถ้าใช้ vba ตัวนี้ จะครอบคุมทั้งสองตัวเลยใช่ไม่ครับ

เนื่องจากเป็นการ Vlookup ค่าที่ไม่มีอยู่จึงเกิด #N/A ทำให้ Code Error

เห็นอาจาร์ยบอกเป็น #N/A

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

Sub mylookup4()
Dim lastrow As Long
lastrow = Sheet1.Range("A" & Rows.Count ...

สวัสดีครับอาจารย์
สืบเนื่องจากกระทู้เก่า
http://snasui.com/viewtopic.php?p=77256#p77256
ที่อาจารย์ได้สอนไปผมติดปัญหาที่บอกเลยครับ
ถ้าข้อมูลเยอะๆแล้วทำให้ รันข้อมูลได้ช้ามากๆ พอจะมีวิธีทำให้เร็วไหมครับ
Data-New.zip
ผมใส่ Macro ตามนี้ครับ
Sub Macro1()
' Macro1 Macro
' นับจำนวนกระบวนการทั้งหมดของแต ...

ขอถามอาจาร์ยครับ
สามารถ
ปรับแต่งโค๊ด Macro ให้ดูง่ายขึ้นได้ไหมครับ
หรือจะทำอย่างไรให้ถูกต้องและสามารถดูได้งาน

ความเดิมตอนที่แล้ว
http://snasui.com/viewtopic.php?f=3&t=12517
ที่ทำจาก สูตร EXCEL

ผมทำได้ประมาณนี้ครับ
Sub Macro1()
Range("AC2").Select
ActiveCell.FormulaR1C1 = "=IF(RC[-28]=""JOB ...

ขอบคุณครับ
ตอนนี้ผมจะติดปัญหาเหมือนอาจารย์บอกแล้ว
ถ้าข้อมูลเยอะๆ มันจะช้ามาก เพราะประมวลผลช้า
แต่ตอนนี้ผมกำลังทำ Macro อยู่
แต่เดี๋ยวผมจะ ตั้งหัวข้อถามอาจารย์ใหม่โดยลิงค์เข้ามาบทความนี้ โดยใช้ VBA
ขอบคุณครับผม

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

ได้แล้วครัับผม

ถ้าอาจาร์ยว่างๆ รบกวนอีกนิดหนึ่งครับ
รบกวน ขยายกระบวนการทำงานของหมวดนี้ให้หน่อยนะครับ
ขอบคุณครับผม

ทำครับ แบบจัดกลุ่ม แต่ไม่ได้ไม่รู้เป็นไรครับ ขอบคุณครับ

จากข้อมูลที่ดึงมาครับ
ตัวเลขหลาย

ข้อมูลที่ผมได้ ตัวเลขไม่มาด้วยครับ

โทษนะครับ ทำไมข้อมูลตัวเลขไม่มาครับผม

ขอบคุณครับ

ช่วยแนะนำหน่อยนะครับ ขอบคุณครับ