snasui.com

คอลัมน์ A ในไฟล์ที่แนบมาเป็นคอลัมน์ว่าง การอ้างข้อมูลให้อ้างถึงตำแหน่งเซลล์ ตำแหน่งพื้นที่จะได้เข้าถึงข้อมูลได้โดยไวครับ

เซลล์ H6 มีค่า A17010-1 มีการพิจารณาตัวเลขมากที่สุดอย่างไรจึงได้คำตอบมาเป็นค่านี้ครับ

ปลดรหัสไฟล์ followup.xlsx ด้วยครับ

ตัวอย่างการปรับสูตรครับ

=IF(MOD(INT(A7*1000),10)=0,ROUNDDOWN(A7,2),ROUNDUP(A7,2))

ตัวอย่างสูตรครับ

=IF(MOD(INT(A1*10000),10)=0,ROUNDDOWN(A1,4),ROUNDUP(A1,4))

ต้องการให้ขึ้นแบบไหน ได้ลองคลิกแล้วยัง ได้ผลเป็นเช่นไรครับ

:D ตัวอย่าง Code แบบกระชับครับ If Sheets("Master").Range("d2").Value > Sheets("Master").Range("a1").Value _ And Sheets("Master").Range("a1").Value >= Sheets("Master").Range("c2").Value Then Sheets("BZ_RTD").Ran...

:D เปิดไฟล์ data.xlsx เอาไว้ด้วยแล้วปรับสูตรเป็นด้านล่างครับ =HYPERLINK("#'[data.xlsx]data'!"&ADDRESS(ROW()+MATCH(MID(CELL("filename",A1),FIND("[",CELL("filename",A1))+1,FIND(".",CELL...

ขอบคุณ อ. ที่ชี้แนะวิธีโฟสต์ Code ครับ เรื่องการใช้งาน เจอปัญหาอยู่บ้างครับ คือเจอว่าหลังจาก copy ที่เวลาตามที่ตั้งใว้แล้ว แต่พอถึงรอบเวลาใหม่ คือ 5 นาทีถัดมา ข้อมูลที่คัดลอกใว้ก่อนหน้า มีการเปลี่ยนแปลงค่าไปตามข้อมูลที่เข้ามาใหม่ครับในแถวของcolumn C,D,E... ใน Sheet Deal,Vbuy, Vsell ครับ :D จากปัญหา...

การโพสต์ Code ให้อ่านกฎข้อ 5 ด้านบนจะมี Link แนะนำวิธีให้โพสต์แล้วแสดงเป็น Code จะได้สะดวกในการอ่านและนำไปทดสอบ สำหรับการปรับ Code ให้สั้นนั้นผมเห็นว่าไม่ใช่เหตุจำเป็นเร่งด่วน แต่หากมีปัญหาการใช้งาน ติดขัดตรงไหน อย่างไร สามารถถามมาได้เต็มที่ครับ

ขออภัยครับ ผมคีย์สูตรไม่ถูกต้อง แก้ให้แล้วครับ

ตรง D:\[data,xlsx] ต้องเป็น D:\[data.xlsx]

ผมอ่านแล้วไม่เข้าใจครับ

ช่วยแสดงคำตอบโดยอธิบายประกอบสัก 2-3 เซลล์ว่า ชีตใด เซลล์ใด ต้องเป็นค่าใด พิจาณาอย่างไรจึงได้ค่าเท่านั้นมาด้วยจะได้เข้าถึงปัญหาโดยเร็ว

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

ช่วยให้รายละเอียดเพิ่มเติมว่านับจากไหนถึงไหน มีขอบเขตในการนับหรือไม่ หรือว่านับทั้งคอลัมน์ หรือมีเงื่อนไขในการนับอย่างไร จะได้เข้าใจตรงกันครับ

แนบไฟล์ตัวอย่างมาด้วยครับ กรณีการโพสต์ Code อ่านกฎข้อ 5 ด้านบนประกอบ จะมี Link แนะนำวิธีการโพสต์ให้แสดงเป็น Code จะได้สะดวกในการคัดลอกไปใช้งานครับ

สูตรเดิมตามที่แนบมาก็มีลักษณะเป็นข้อความไม่ได้เป็นสูตรอยู่ก่อนแล้วครับ

วิธีการกำหนดค่าเซลล์ให้คีย์สูตรได้คือกำหนด Format Cell ให้เป็น General (Ctrl+1 > Format Cells > แถบ Number เลือก General > OK) แล้วค่อยคีย์สูตรครับ

กรณี Code ทำงานไม่ผิดพลาดยังไม่จำเป็นต้องรีบปรับครับ เมื่อใดทีทำงานผิดพลาดค่อยถามมาอีกทีครับ

:D ลองใช้ Text to columns แทนตามตัวอย่าง Code ด้านล่างครับ Sub Test0() Range("a2", Range("b2").End(xlDown)).Select For i = 1 To Selection.Columns.Count With Selection.Columns(i).Cells .TextToColumns Destination:=.Cells(1), _ DataType:=xlDelimited, _ FieldInfo:=Array(1, 4) End Wit...

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

ตัวอย่างสูตรที่ P3 ครับ

=IF(P3<>"","y","n")

:D ตัวอย่างสูตรที่เซลล์ A2 ซึ่งจะต้องเปิดไฟล์ data.xls ไว้พร้อมกับไฟล์ย่อยเสมอครับ =HYPERLINK("'D:\[data.xlsx]Sheet1'!"&ADDRESS(ROW()+MATCH(MID(CELL("filename",A1),FIND("[",CELL("filename",A1))+1,FIND...