Excel Forum

ขอคำแนะนำครับ

ความต้องการ คะแนนในช่อง "คะแนนที่ได้" โดยเรียงลำดับจาก "ผล" ที่มากที่สุด จะได้คะแนนมากสุด คะแนนที่น้อยลงมา ก็จะได้คะแนนลดลงมาตามตาราง คะแนน รายละเอียดตามไฟล์แนบครับ

ขอบคุณครับ

logic wrote: Tue Mar 24, 2020 8:23 am ผมลองคิดนะ ครบตาม cap ในแต่ละวัน วันเริ่ม วันสิ้นสุดอยู่บรรทัดเดียวกัน (I, K)

บรรทัดที่ 12 กับ 13 คอลัมน์ I, K เป็นคนละวันกันไปแล้ว ทีนี้ถ้าผลรวมบรรทัด 12 ยังไม่ครบตามคอลัมน์ F จะยกมาบรรทัด 13 ได้ยังไง เพราะมันคนละวัน

ขอบคุณครับ

:D กรุณาแนบไฟล์โดยใช้สูตรที่ผมตอบไปแล้วมาด้วย ชี้ให้เห็นว่าคำตอบเซลล์ไหนไม่ถูกต้อง ที่ถูกต้องจะต้องได้คำตอบเท่าใด จะได้ตอบต่อไปจากนั้นครับ

รับทราบครับ
ผมลองปรับสูตรตามที่อาจารย์แนะนำแล้วดังไฟล์แนบ แต่มีประเด็นเพิ่มเติมดังนี้ครับ
อยากควบคุม AB12 ถึง AL31 ผ่านคอลัมน์ I และ K ครับ

กรณีตัวอย่าง
เช ...

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

เซลล์ AB12 คีย์

=MAX(0,MIN($F12,$F12-SUM($AA12:AA12),MIN(AB$7,AB$7-SUM(AB$11:AB11))))

Enter > Copy ไปด้านขวาและลงด้านล่าง


เรียนอาจารย์ ผมใช้ คอลัมน์ I และ J เป็นตัวควบคุม ให้แสดงผลของ AB12 ถึง AL31
โดยKey เริ่มต้นที่ I12 จากนั้น K12 คำนวณ กำหนดเสร็จ โดยอ้างอิงจาก Cap ...

เรื่องวางแผนงานตามCap

รบกวนขอคำแนะนำสูตรที่ใช้ครับ รายละเอียดผมได้อธิบายไว้ในไฟล์แนบครับ

ขอบคุณครับ

ใช้ได้แล้วครับ ขอบคุณมากครับอาจารย์


และต้องขออภัยในข้อผิดพลาดเรื่องการโพส Code ด้วยครับ

ขอคำชี้แนะครับ คือผมต้องการลบข้อความที่column : C โดยเมื่อ column : D มีค่าค่าเป็น0 ขอคำชี้แนะ ปรับ Code ให้ที่ครับ

Sub Project1()
Range("D1").Select
Do Until Selection.Value = ""
If Selection.Value = "0" Then
Selection.ClearContents '.Delete
Else
Selection.Offset(1, 0).Select
End If
Loop
End ...

ปรับสูตรตาม อาจารย์ให้มา Excel คำนวณเร็วขึ้นแล้วครับ

ขอบคุณครับ

เนื่องจาก มีความต้องการคำนวณปริมาณการใช้วัตถุดิบของแต่ละวัน ซึ่งเดิมผมใช้สูตร =IFERROR(INDEX(ความต้องการผลิต!$B$2:$HH$121,MATCH(จำนวนวัตถุดิบที่ต้องใช้!$D3,ความต้องการผลิต!$B$2:$B$121,0),MATCH(จำนวนวัตถุดิบที่ต้องใช้!E$2,ความต้องการผลิต!$B$2:$HH$2,0))*$C3,"") (ดังไฟล์แนบ) เพื่อดึงข้อมูลจากอีก Sheet ...

จากที่สูตร อาจารย์ให้มา ใช้ได้ตามความต้องการครับ ขอบคุณมากครับ

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

ขอบคุณครับ

เรียนอาจารย์

ได้แล้วครับ ผมตกหล่นเอง ไม่ได้ใส่เลข2 ต่อท้ายValue

w = Worksheets("Im - Ex").Range("B4").Value2


ขอบคุณสำหรับคำชี้แนะครับ

ขออภัยสำหรับข้อผิดพลาดครับ


เรียนอาจารย์ ผมลองปรับ Code ตามคำแนะนำและ ลอง คีย์ ข้อมูลและ Run ดูแล้วครับ โดย ผมกำหนด คีย์ข้อมูลเข้า เป็น 2/5/2018 (วันที่ 2 เดือน5 ปี2561) แต่เมื่อ ข้อมูลถูกบันทึกไปที่ Sheet 01 แล้ว ได้ ค่า 05/02/61 ผมลองตรวจสอบดูว่า ใช้ค่าที่ต้องการหรือเปล่า ปรากฏว่า ไม่ใช้ ทั้ง ว ...

แก้ไข Code ครับ


Option Explicit
Public Sub myrecord01()
Application.ScreenUpdating = False
Dim w As String
Dim p As String
Dim a As Variant
Dim s As String
Dim fr As Long

w = Worksheets("Im - Ex").Range("B4").value
p = Worksheets("Im - Ex").Range("C4").value
a = Worksheets("Im - Ex").Range("D4 ...

เรียนสอบถามขอคำชี้แนะครับ
เนื่องจาก ผมเขียนVBA แล้วทำการบันทึกไปที่ Sheet 01 (รหัสขยะ) แต่เมื่อบันทึกไปแล้ว วันที่ไม่ตรง Format วันที่เปลี่ยนไปเป็น เดือน/วัน/ปี

รบกวนขอคำชี้แนะด้วยครับ

Application.ScreenUpdating = False
Dim w As String
Dim p As String
Dim a As Variant
Dim s As String
Dim fr As ...

สอบถามครับ
ต้องการหา ค่าที่ไม่ซ้ำกัน ในแต่ละ column ถัดไป เช่น
Size ที่ใช้ได้
240
230
220
210
200
190
180
170

Num Size1 Size2 ... ... ... Size x
1 240 240 200
2 230 220 190
3 220 210 180
4 210 200 170

(ตัวอย่างดังไฟล์แนบ)

รบกวนขอคำชี้แนะด้วยครับ

ขอบคุณครับ

ขอบคุณครับ