Excel Forum

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

ได้แล้วครับ ขอบคุณมากๆ ครับ

เรียน อาจารย์ ถ้าเลือก PK=Adult,Site=SVNH ค่าที่ได้เท่ากับ 50000 PK=Adult,Site=Other ค่าที่ได้เท่ากับ 65000 PK=Pediatric,Site=SVNH ค่าที่ได้เท่ากับ 50000 PK=Pediatric,Site=Other ค่าที่ได้เท่ากับ 65000 PK=Neonete,Site=SVNH ค่าที่ได้เท่ากับ 55000 PK=Neonete,Site=Other ค่าที่ได้เท่ากับ 95000 ต้องเขียนส...

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

ได้แล้วครับ ขอบคุณครับ

เรียน อาจารย์ ต้องการให้เมื่อค้นหาข้อมูลแล้ว คลิกข้อมูลใน List Box จะแสดงข้อมูลที่เลือกด้านซ้ายมือ (ดังภาพ) ต้องปรับ Code อย่างไรครับ ขอบคุณครับ Private Sub ListBox1_Click() Dim say, lastrow As Long, a As Byte, i As Integer On Error Resume Next i = Me.ListBox1.ListIndex If Me.ListBox1.Selected(i) = ...

เรียน อาจารย์ ต้องการให้เวลา Save เป็น PDF ให้แสดงหน้า 2 ก่อนหน้า 1 ต้องปรับ Code อย่างไรครับ ขอบคุณครับ Sub Button1_Click() Worksheets("Forms").Activate 'www.contextures.com 'for Excel 2010 and later Dim wsA As Worksheet Dim wbA As Workbook Dim strTime As String Dim strName As String Dim ...

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

ได้แล้วครับ ขอบคุณครับ

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

ต้องการตัดคำให้เหลือผลลัพธ์ที่ต้องการ ต้องเขียนสูตรอย่างไรครับ
ขอบคุณครับ

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

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

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

ถ้ากรอก Doctor, Nurse เป็นเลข 3 หรือ เลขอื่นๆ ที่ไม่มีในตาราง จะไม่แสดงผลลัพธ์
ถ้าเกิดไม่มีตาราง ถ้ากรอกตัวเลขอะไรให้แสดง
เช่น Doctor 4 , Nurse 2 แสดงเป็น 4 Doctors and 2 Nurses

สามารถทำได้หรือไม่ครับ ขอบคุณครับ

เรียน อาจารย์ ต้องการกรอกตัวเลข แล้วให้ได้ผลลัพธ์ที่ต้องการ เช่น กรอก Doctor --> 1 Nurse --> 0 จะได้ผลลัพธ์ Doctor กรอก Doctor --> 0 Nurse --> 1 จะได้ผลลัพธ์ Nurse กรอก Doctor --> 1 Nurse --> 1 จะได้ผลลัพธ์ One Doctor and One Nurse กรอก Doctor --> 1 Nurse --> 2 จะได้ผลลัพธ์ One Doctor and Two Nurses...

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

ได้แล้วครับ ขอบคุณมากครับ

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

ถ้าไม่มีข้อมูลให้แสดง "--No data--" เหมือน Sheet "สิ่งที่ต้องการ"
ต้องปรับสูตรอย่างไรครับ ขอบคุณครับ

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

ได้แล้วครับ ขอบคุณมากครับ

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

อยากให้ Name ที่อยู่ใน sheet "template" แยกตาม dept ใน sheet "List"
สามารถเขียนสูตรอย่างไรครับ ขอบคุณครับ

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

ลองศึกษาได้แล้วครับ ขอบคุณอาจารย์ที่แนะนำครับ
ขอบคุณครับ

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

ในการใช้งานจริงส่วนของ Row ที่ 31 เป็นต้นไป จะเป็น List ของ Combobox อื่นๆ ที่ไม่ได้ยกตัวอย่างครับ
ถ้าปรับหรือย้าย มันจะกระทบกับ Combobox อื่น ๆ ครับ
ขอบคุณครับ

เรียน อาจารย์ ลองปรับแล้วยังติดอยู่ครับ รบกวนอาจารย์ด้วยครับ ขอบคุณครับ 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:C29", .Range("C" & .Rows.Count).End...

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

ถ้า Fixed Rows แค่ 30 Rows
ต้องปรับ Code อย่างไรครับ ขอบคุณครับ

เรียน อาจารย์ Snasui ถ้าเพิ่ม WHC25,WHC26,WHC27,WHC28 RR7,RR8,RR9 TT4,TT5,TT6 ใน Sheet1 อยากให้ Case "SUR" For Each u In Sheet1.Range("C2:C4") --> For Each u In Sheet1.Range("C2:C8") . . . Case "WHC" For Each u In Sheet1.Range("A2:A25", "B2:B7&q...

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

ได้แล้วครับ

2. อยากให้เวลาเพิ่มหรือลด List ของ Combobox ใน "Sheet1" > Range เปลี่ยนเองอัตโนมัติ
ขอบคุณครับ