Excel Forum

:D ผมให้แนวทางแล้วลองนำไปเขียนเองดูก่อน ติดแล้วค่อยถามกันต่อ โจทย์ลักษณะนี้ไม่ยากเกินไปที่จะฝึกเขียนให้เป็นครับ เซลล์ N2 เขียนสูตรเพื่อนับว่ามีข้อความ "ยังไม่สมัคร" ในช่วงอยู่กี่เซลล์ =Countif(h2:l2,"ยังไม่สมัคร") Enter > Copy ลงด้านล่าง หากได้คำตอบเป็น 0 แสดงว่าไม่เจอเลยหรือหมาย...

:D ตัวอย่าง Code ครับ 'Other code For i = 2 To lastRow If Worksheets("Bget").Cells(i, 11).Value = ProductId Then If IsNumeric(Worksheets("Bget").Cells(i, 3).Value2) Then If Worksheets("Bget").Cells(i, 3).Value2 < 200000 Then TextBox2.Text = Worksheets("Bget")....

สามารถทำได้ด้วย VBA ลองเขียนมาเองดูก่อน ติดตรงไหนค่อยถามกันต่อครับ

การเช็คค่าตรง ๆ แบบนั้นไม่ได้เขียนสั้น ๆ แบบที่เขียนมาได้ครับ วิธีที่ผมทำตัวอย่างไว้นี้เป็นการทำให้สามารถทำงานต่อได้ หากพบว่าวิธีเดิมทำได้แบบง่าย ๆ รบกวนนำมาแชร์ด้วยครับ

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

:D ตัวอย่างการ Query ข้อมูลจาก Google Sheet มาเทียบกับค่าเป้าหมายใน Excel ครับ Sub Import_Sheets_to_Excel() Dim QRT As QueryTable, ul As String, ky As String With Worksheets("Main") If .QueryTables.Count > 0 Then .QueryTables(1).Delete .Range("b1:b2").ClearContents End If ky = &q...

:D ตัวอย่างวิธีการทำงานครับ แทรกบรรทัดว่าง 2 บรรทัดแรก เซลล์ D3 คีย์ =SUMPRODUCT(--(A$3:A3="<tr>")) Enter > Copy ลงไปจนสุดข้อมูล (D17) เซลล์ E3 คีย์ =COUNTIF(D$3:D3,D3)<=3 Enter > Copy ลงไปจนสุดข้อมูล (E17) คลุม E2:E17 > เข้าเมนู Data > Filter > เลือกเฉพาะ True Copy ข้อมูลในคอลัมน์ D ที่ได...

กรุณาแนบข้อมูลต้นทางก่อนแทรกบรรทัดสีเหลืองประกอบมาด้วยครับ

ไม่สามารถช่วยได้เนื่องจากเข้าไม่ถึงแหล่งข้อมูลครับ

Group นี้สำหรับ Power BI ครับ

Data Studio ของ Google จะอยู่ที่หมวด Other และจากปัญหาที่ถามมาลองตรวจสอบว่า Scope ของข้อมูลที่นำมาแสดงใน Chart ครอบคลุมข้อมูลทั้งหมดที่จะนำมาใช้แล้วหรือไม่ เนื่องจากไม่สามารถตรวจสอบให้ได้จึงตอบได้แต่ภาพรวมเท่านั้นครับ

ที่ 31 เป็นต้นไป จะเป็น List ของ Combobox อื่นๆ ที่ไม่ได้ยกตัวอย่าง :D จะเป็นบรรทัดที่เท่าไรและมีอีกกี่บรรทัดก็ไม่ใช่ประเด็น ถ้าเข้าใจ Code ก็สามารถปรับใช้ได้ ที่สำคัญปรับใช้ง่ายมาก สงสัยหรือไม่เข้าใจบรรทัดไหนควรถามบรรทัดนั้นครับ หากศึกษาแล้วไม่เข้าใจควรเปลี่ยนวิธีการออกแบบไม่ให้ข้อมูลซ้อน ๆ กัน ให...

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

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

ผมต้องทดสอบอย่างไรให้พบปัญหานั้น ช่วยลำดับมาให้ด้วยจะได้เข้าถึงปัญหาโดยไวครับ

:D ตัวอย่างการปรับ Code ครับ Private Sub ComboBox1_Change() Dim u As Range, r As Range ComboBox2.Clear With ComboBox2 Select Case ComboBox1 Case "SUR" With Sheet1 For Each u In .Range("C2", .Range("C" & .Rows.Count).End(xlUp)) With Sheet2.ComboBox2 .AddItem u.Value ...

ถ้ายังตั้งใจแขียน "แล้ว" เป็น "แร้ว" มาอีกสักรอบผม Block นะครับ

ไม่เข้าใจ กรุณาอธิบายมาใหม่ครับ

:D ตัวอย่างคำถามที่อ่านแล้วเข้าใจคือ ต้องการเพิ่มรายการเข้าไปใน ComboBox2 จากการเลือก ComboBox1 ปัจจุบันบัญหาคือรายการที่เพิ่มเข้าไปใน ComboBox2 มีการเรียงรายการแบบสลับคอลัมน์แทนที่จะเรียงรายการไปทีละคอลัมน์ เช่น นำรายการในคอลัมน์ A มาเรียงให้หมดก่อนแล้วตามด้วยรายการในคอลัมน์ B เช่นนี้เป็นต้น วิธีกา...

ไม่เข้าใจว่าต้องการจะทำอะไร ช่วยอธิบายมาพอสังเขป

เมื่ออธิบายตามบรรทัดบนแล้ว จะต้องแจ้งสิ่งที่เป็นปัญหาต้อนนี้คืออะไร สิ่งที่ต้องการคืออะไร หากจะทดสอบให้เกิดปัญหาเดียวกันให้ทำสิ่งใด กี่ขั้นตอน อะไรบ้าง ฯลฯ จะได้เข้าถึงปัญหาโดยไวครับ

ช่วยโพสต์ให้เป็นไปตามกฎการใช้บอร์ดข้อ 1 ด้านบน แล้วแจ้งมาใหม่ครับ

:D ตัวอย่างสูตรตามด้านล่างครับ ที่ B2 คีย์ =IF(A2="ร","รอตัดสิน",IF(A2="มส","ไม่มีสิทธิ์สอบ",IF(A2>=4,"ดีเยี่ยม",IF(A2>=3.5,"ดีมาก",IF(A2>=3,"ดี",IF(A2>=2.5,"ค่อนข้างดี",IF(A2>=2,"ปานกลาง",IF(A2>=1.5,"พอใช...