Excel Forum

เรียน อาจารย์ norkaz และ อาจารย์ snasui

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

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

ลองปรับสูตรตามอาจารย์ แล้วลองวางข้อมูล
อาการช้ามากเลยครับ ประมวลผลช้า ต้องปรับสูตรอย่างไรครับ ขอบคุณครับ

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

ต้องการให้ Procedure ใน sheet Data มาแสดงใน Sheet Report โดย
แสดงข้อมูล Procedure ที่ไม่ซ้ำกัน และ แสดงค่า Max, Min ในส่วนของ Surgeon, Assist, Anes, Visit, OR, RR, ICU, WARD, Pre-Op

ที่นำมาเป็นแค่ตัวอย่างครับ ข้อมูลจริงอาจจะมีถึง 6X,XXX record ซึ่งทำให้การประมวลผลช้ามาก
อาจารย ...

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

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

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

ถ้า I4 เท่ากับค่าว่าง ให้แสดง ข้อความให้ใส่ HN
ถ้า I4 ไม่เท่ากับ ค่าว่าง ให้แสดงคำ หรือข้อความที่ค้นหา

ถ้า I4 เท่ากับค่าว่าง คลิกปุ่ม Search แล้ว Msg Box แสดงหลายครั้ง อยากให้แสดงแค่ครั้งเดียว
ต้องปรับ Code อย่างไรครับ ขอบคุณครับ


ListBox1.ColumnWidths = "40,100,100,100,100,100 ...

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

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

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

เลือก Package : จาก Dropdown list แล้วคลิกปุ่ม Calculate
Packge จาก sheet "Data" ที่ตรงกับ Dropdown list จะมาแสดงที่ Sheet "Display"
และอยากให้แสดงดังภาพ

ต้องปรับสูตรอย่างไรครับ ขอบคุณครับ

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

เลือก Package แล้วคลิกปุ่ม Calculate อยากให้ผลลัพธ์ที่ได้เป็นดังรูป (ไฟล์แนบ)
ต้องปรับ Code อย่างไรครับ ขอบคุณครับ

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

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

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

ต้องการเรียงข้อมูลตาม Dept ลงมาเรื่อยๆครับ โดยนำข้อมูลจาก sheet "List" มาแสดงใน Sheet "Input"
ต้องเขียนสูตรอย่างไรครับ ขอบคุณครับ

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

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

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

ต้องการให้ Column B แสดงราคาของแต่ละ รายการ เหมือน Column E
ต้องเขียนสูตรอย่างไรครับ ขอบคุณครับ

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

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

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

ต้องการให้ PayorName ที่ขึ้นต้น หรือมีคำว่า April ---> Payor Group 2 เท่ากับ April
ต้องการให้ PayorName ที่ขึ้นต้น หรือมีคำว่า AWP และ Payor Group เป็น Inter Insurance หรือ Local Insurance
---> Payor Group 2 เท่ากับ April
นอกจากนี้จะเป็น PayorName นั้น ๆ

ต้องปรับสูตรอย่างไรครับ ขอบค ...

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

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

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

ต้องการค้นหา HN หรือ Payor โดยพิมพ์แค่บางส่วนให้สามารถค้นหาเจอได้
เช่นค้นหา > "We" ให้เจอ ดังภาพ ต้องแก้ไข Code อย่างไรครับ
ขอบคุณครับ


'-----othercode
Me.ListBox1.ColumnCount = 8
Me.ListBox1.List = arr
ListBox1.ColumnWidths = "40,100,100,100,100,100,100"
For i = 3 To Sheet2.Range ...

เรียน อาจารย์ 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 ...