Excel Forum

J1=LET(a,G2:G31,b,F2:F31,c,E2:E31,u,UNIQUE(SORT(HSTACK(a,b,c))),IFERROR(VSTACK({"ผู้รับผิดชอบ","แผนก","NUMBER"},HSTACK(IF(XMATCH(TAKE(u,,1),TAKE(u,,1))=SEQUENCE(ROWS(u)),TAKE(u,,2),""),TAKE(u,,-1))),""))

ปรับตรงนี้ดูครับ

Q3=SUM(SUMIF(OFFSET(A2,,IFERROR(AGGREGATE(15,6,(COLUMN(A1:K1)-COLUMN(A1)+1)/(A1:K25=Q3),COLUMN(A:C))-1,999),25,1),Q3,OFFSET(C2,,IFERROR(AGGREGATE(15,6,(COLUMN(C1:O1)-COLUMN(C1)+1)/(LEFT(C1:O1,2)="RT"),COLUMN(A:C))-1,999),25,1)))

ลองแนบไฟล์ตัวอย่างมาดูครับ

B15=SUMIF(A1:N10,A15,B1:O10)

F2=IFERROR(INDEX(I$2:I$25,XMATCH(TRUE,ISNUMBER(SEARCH(I$2:I$25,E2)/(I$2:I$25<>"")))),"") Copy down

B2=TEXT(A2,"+660")

ลองปรับตามโค้ดนี้ดูครับ Sub UpdateDataSheet() Dim wsInput As Worksheet Dim wsData As Worksheet Dim i As Long Dim j As Long Set wsInput = ThisWorkbook.Sheets("Input") Set wsData = ThisWorkbook.Sheets("Data") For i = 3 To 100 For j = 2 To 10000 If wsInput.Cells(i, 2).Value = wsData...

อีกแบบ ที่ a2=IF(B2="","",ROWS(A$2:A2)) copy​ down ที่ b2=IFERROR(INDEX(List!B$3:F$3,AGGREGATE(15,6,ROW(List!B$1:F$24)/TRANSPOSE((List!B$4:F$24<>"")),ROWS(B$2:B2))),"") ctrl+shift+enter copy​ dow ที่ c2=IFERROR(INDEX(List!B$4:F$24,COUNTIF(B$2:B2,B2),MATCH(B2,L...

ต้องใช้ คอลัมน์ช่วยในเวอร์ชั่นนี้นะครับ ที่ E2:E6 คีย์ WHC EYE HEART SOC URO ที่ F2=COUNTIF(OFFSET(List!B$4,,MATCH(E2,List!B$3:F$3,0)-1,21,1),"<>") copy to F6 ที่ F7=SUM(F2:F6) ที่ G2=SUM(F$2:F2)-F2+1 copy to G6 ที่ A2=IF(B2="","",ROWS(A$2:A2)) copy down ที่ B2=IF(ROWS(...

poipoi wrote: ↑Wed Jun 19, 2024 7:54 am คำตอบในไฟล์ตัวอย่างคือผลลัพธ์ครับ

แต่ผมต้องดึงจากไฟล์ของ บ ทำให้ไม่สามารถขยับพวก column ได้ครับ

แล้วคำตอบที่ผมทำไปในไฟล์ ใช่คำตอบหรือไม่ครับ

poipoi wrote: ↑Tue Jun 18, 2024 5:28 pm ถ้าไม่สามารถไปขยับไฟล์ต้นฉบับได้ ควรทำอย่าางไรครับ

ไม่สามารถขยับไฟล์ต้นฉบับได้ความหมายคืออะไรครับ

คำตอบในไฟล์ใช่คำตอบคำผลลัพธ์หรือเปล่าครับ

poipoi wrote: ↑Tue Jun 18, 2024 3:05 pm ลองแอดแล้ว มาแค่ row เดียวครับ

ขอคำแนะนำเพิ่มครับ

ขอบคุณครับ

ต้องอัพเดตเป็นไฟล์ล่าสุดจะได้อ้างอิงตำแหน่งได้ตรงกันครับ

poipoi wrote: ↑Tue Jun 18, 2024 12:14 pm ลองใส่แล้วครับยังติด error ครับ

ลองเข้าไปดูในไฟล์ครับ

C2=LET(x,"https://docs.google.com/spreadsheets/d/ ... RAYFORMULA(XLOOKUP(1,(IMPORTRANGE(x,"Sheet1!B2:B")=A2)*(IMPORTRANGE(x,"Sheet1!A2:A")=B2),IMPORTRANGE(x,"Sheet1!F2:F")))) Copy down

poipoi wrote: ↑Tue Jun 18, 2024 10:10 am ยังไม่ได้เลยครับ ไม่แน่ใจว่าแทนค่าถูกไหม

ดูผลลัพธ์ ในไฟล์เลยครับ

A2=LET(x,IMPORTRANGE("https://docs.google.com/spreadsheets/d/ ... heet1!A2:C"),QUERY(x,"Select Col1,Col2,Col3 Where Col2 ='2024/016-S004'"))

โพสในหัวข้อนี้ครับ
https://snasui.com/viewforum.php?f=8

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

เท่าที่ทราบ การทำให้ Copy​ มาวางไม่ได้ ไฟล์​นั้นต้องใส่โค้ด Macro ที่ป้องกันการ Copy ไว้ครับ แลัวไฟล์นั้นต้อง Save เป็นนามสกุล .xls,.xlsb,.xlsm ครับ