Excel Forum

กรุณาตรวจสอบและตอบกลับมาในไฟล์ ผมอธิบายไปแล้วว่าต้องตรวจสอบส่วนไหน ค่อย ๆ ถามตอบกันไปทีละขั้นตอนครับ

:D ตัวอย่างการปรับ Code ครับ

Sub test()

Dim wsSource As Worksheet
Dim wsTarget As Worksheet
Dim rng As Range
Dim cell As Range
Dim lastRow As Long
Dim targetRow As Long
Dim col As String

' Create a new worksheet for the target
Set wsTarget = Worksheets.Add
wsTarget.Name = "TargetSheet ...

:D ตอนนี้ผมได้แยกวันที่และเวลาออกจากกันเพื่อจะได้ง่ายต่อการใช้งาน

จากไฟล์แนบช่วยตรวจสอบว่าคอลัมน์ N, O และ P ให้ค่าที่ถูกต้องหรือไม่ ถ้าไม่ ช่วยตรวจสอบว่าเงื่อนไขที่ให้มาสอดคล้องกันแล้วยัง

กะเช้า เริ่มเวลาไหน ถึงเวลาไหน โอทีของกะเช้าก็ต้องอยู่ในช่วงเวลานั้นด้วย
กะดึก เริ่มเวลาไหน ถึงเวลาไหน โอท ...

คอ่ย ๆ ถามตอบกันไปครับ

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

:D ต้องขออภัย ผมไม่ได้ศึกษา AppSheet ว่ามีการทำงานอย่างไร ด้านล่างนี้คือใช้ Copilot เข้ามาช่วยตอบให้ครับ

สามารถใช้ฟังก์ชันหรือสูตรใน AppSheet เพื่ออัพเดทหลายรายการพร้อมกันได้ โดยใช้การตั้งค่าและการเขียนสูตรใน AppSheet ดังนี้:

1. ใช้ Action: คุณสามารถสร้าง Action ใน AppSheet เพื่ออัพเดทหลายรายการพร ...

ใช้ Excel Version ใดช่วย Update ใน Profile ด้วยเพื่อจะได้ตอบแบบกระชับและตรงกับ Version ที่ใช้อยู่จริง โดยเข้าไป Update ตามตัวอย่างใน Link ด้านล่างครับ

https://snasui.com/viewtopic.php?p=103177#p103177

ตัวอย่างการปรับสูตรที่เซลล์ A9 ครับ

=IF(INDIRECT("rc[1]",0)=INDIRECT("r[-1]c[1]",0),INDIRECT("r[-1]c",0),IF(INDIRECT("r[-1]c",0)=1,2,1))

Enter > Copy ลงด้านล่าง

เมื่อเกิดจากการตั้งค่าลองยกเลิกดูก่อน หลังจากนั้นดูผลลัพธ์ที่ได้ แล้วค่อยกลับมาตั้งค่าใหม่ สังเกตด้วยว่าจะต้องตั้งให้แสดงเพียงครั้งเดียวครับ

แสดงซ้อนมาทุก Chart หรือไม่ครับ

หากไม่เป็นทุก Chart ลองเช็คดูว่าที่มีปัญหามีการแสดง Chart ซ้อนกันหรือไม่ครับ

หากไม่ซ้อนลองสร้าง Chart ใหม่ขึ้นมาอีกแถบ แล้วเช็คดูว่ายัง Error เช่นนี้หรือไม่ครับ

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

เซลล์ A1 คีย์

=IFERROR(INDEX(Sheet1!$A$1:$A$4,INT((ROWS(A$1:A1)-1)/4)+1)&TEXT((MOD((ROWS(A$1:A1)-1),4)+1)*5,"\L0"),"")

Enter > Copy ลงด้านล่าง

:D ตัวอย่างการปรับ Macro ครับ

Sub Macro2xxxx()
'
' Macro2xxxx Macro
'

'
' ActiveCell.Select
' ActiveCell.SpecialCells(xlLastCell).Select
' Range("AJ12").Select
' Selection.End(xlToLeft).Select
Sheets("Sieve_table").Select
Range("a2:aj10").Select
Selection.Copy
Sheets("Sieve-Brown").Select ...

:D ปรับสูตรที่ A4 เป็น

=IFERROR(INDEX(Data!$S:$S,AGGREGATE(15,6,ROW(Data!$S$2:$S$20000)/(0<FREQUENCY(MATCH("~"&Data!$S$2:$S$20000,Data!$S$2:$S$20000&"",0),ROW(Data!$S$2:$S$20000)-ROW(Data!$S$2)+1)),ROWS(A$4:A4))),"")

Enter > Copy ลงด้านล่าง แล้วสังเกตว่าเร็วขึ้นกว่าเดิมหรือไม่ครับ

:D หากต้องการหยุดเวลาเมื่อเข้าเงื่อนไขสามารถเขียนเป็น Google Script เพื่อแปลงเวลาทั้งหมดให้เป็นค่าคงที่แทนเป็นสูตร เพื่อสูตรมันจะคำนวณไปเรื่อย ๆ ครับ

ตัวอย่าง Google Script

function copyAndPasteAsValues() {
// เปิดสเปรดชีตและเลือกชีตที่ต้องการ
var spreadsheet = SpreadsheetApp ...

ชีท Brought Forward หากเรา Filter รายการสินค้าในช่อง E จะพบว่า มีโลเคชั่นของสินค้านั้นๆอยู่ในคอลัมน์ A ก็คือ 31Le, 31Ri และ 1GRi
ชีท Received หากเรา Filter รายการสินค้าในช่อง E จะพบว่า มีโลเคชั่นของสินค้านั้นๆอยู่ในคอลัมน์ L ก็คือ Reserve และ 1GRi
ดังนั้น จากชีท Issued ช่อง L6 หากเราเลือกรายการส ...

1. ก็คือว่าในชีท Issued ในช่อง M ผมอยากให้มันรวมผลลัพธ์ของรายการสินค้าที่เหมือนกับเท่านั้นครับ เพราะตอนนี้มันไปหักลบยอดของสินค้าโลเคชั่นอื่นด้วยครับ อยากได้เฉพาะโลเคชั่นเดียวกันครับ (ตามรายการในไฟล์แนบ "SINH" โลเคชั่น "Reserve" มียอดคงเหลือ 260 หักออก 10 จะเหลือ 250 และบรรทัดต่อไปรหัสสินค้าเดียวก ...

:D The example VBA code for transforming data is below,

Sub TransformData()
Dim i As Integer, srAll As Range, tgAll As Range, r As Range
With Worksheets("RawData")
Set srAll = .Range("a6", .Range("d" & .Rows.Count).End(xlUp))
End With
With Worksheets("required")
.UsedRange.ClearContents ...

:D การทำงานเพื่อให้ค่าเดิมยังคงอยู่คือไม่ต้อง Save ครับ

ค่าใด ๆ ที่กำหนดแล้วเกิดการเปลี่ยนแปลงในระดับไฟล์จะสามารถทำตามลำดับดังนี้

ลักษณะการทำงานคือ เปิดไฟล์ > กำหนดค่าเพื่อการพิมพ์ตามต้องการ > พิมพ์ > ปิดไฟล์โดยไม่ Save

เมื่อไม่ Save ค่าเดิมก็ยังคงอยู่

แต่หากเป็นค่าใด ๆ ที่กำหนดแล้วเกิดการเปล ...

:D ผมไม่ได้ใช้ Microsoft Office 2003 ด้านล่างนี้คือคำตอบที่ได้จาก Copilot ครับ

ขั้นตอนการพิมพ์เอกสาร Word โดยไม่ให้แสดงสีที่ไฮไลต์ใน Word 2003:

เปิดเอกสาร Word ของคุณ
ไปที่เมนู เครื่องมือ (Tools) และเลือก ตัวเลือก (Options)
ในกล่องโต้ตอบตัวเลือก (Options) ให้คลิกที่แท็บ มุมมอง (View)
ยกเล ...

Upgrade Forum จาก Version 3.3.13 เป็น 3.3.14 เมื่อ 22 Nov 2024 เพื่อให้มวลมหาสมาชิกได้ใช้ Forum ที่ทันสมัยอยู่ตลอดเวลาไม่น้อยหน้าใครในโลกครับ

:D คำตอบจาก AI ครับ

การฝังไฟล์ Excel เข้าไปใน Google Sheets โดยไม่ให้เปิด Tab ใหม่ แต่แสดงอยู่ใน Sheet เดียวกัน สามารถทำได้โดยใช้วิธีการแปลงไฟล์ Excel ให้กลายเป็น Sheet แทน หรือแนวทางการทำงานแบบฝังลิงก์หรือรูปภาพตัวอย่างแทน ขึ้นอยู่กับความต้องการของคุณ:

วิธีที่ 1: แปลงไฟล์ Excel เป็น Google Sheet ...