Snasui Excel Forum

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

รบกวนขอสูตร VBA ตัดอักษร ออกจากตัวเลข

ต้องการเก็บแต่ตัวเลขไว้ครับ

แนบไฟล์ ตัวอย่าง

รบกวนนะครับอาจารย์

รายละเอียด

ไฟล์ มี 192 sheet ครับ
กระผมต้องการดึงข้อมูลจาก 3 ตำแหน่ง ของแต่ละ sheet มาสรุปใน sheet เดียวครับ
ตำแหน่งข้อมูลของแต่ละ sheet เหมือนกัน ครับ

= F5 , B11 , F11

ช่วยแนะนำแนวทาวด้วยนะครับ อาจารย์

ใช้ VBA
ช่วยด้วยครับผมทำไงขอคิดไม่ออกเลยครับ

ตัวอย่าง ผมต้องเช็ควันที่ (column C ของ 24hr) ตามด้วยเวลา(column E ของ 24hr)..แล้วหาค่า Max Average count ตรง column P ครับ

ส่วนคำตอบ ตอบตรง column M,N,O ของ truck ครับ

เพราะผมมีข้อมูลค่อยๆกันอีกเลยอันเลยครับ เลยอยากได้แถวทางในการเขียน

ขอบคุณครับ ...

ขอบคุณครับ อาจารย์ที่ช่วยหาคำตอบให้...

แต่ที่ผมต้องใช้ VBA ในการหาค่าMaximum,Average,Count...เพราะข้อมูลผมต้องหาค่าเป็นพันเชลล์เลยครับอาจารย์
ผมเลยอยากได้สูตรเพื่อมาดัดแปลงในการใช้งานครับ เพราะเชลล์ที่จะหาค่าMaximum,Average,Count... มีความกว้างของเชลล์ไม่เท่ากันครับ เลยต้องพิจารณา จากวันท ...

สวัสดี ครับ อาจารย์
ผมมีเรื่องรบกวนอีกแล้วครับ

คือ ผมต้องการคำนวณหาค่า Maximum,Average,Count... โดยการใช้ VBA ครับ เพราะข้อมูลผมมีเยอะมากเลยครับ...

1. ตรวจสอบค่าวันที่ตรง คอลัมน์ B ว่าวันที่กันหรือเปล่า (Sheet1)

2. ตรวจสอบค่าเวลาตรง คอลัมน์ D ว่าเวลาเดียวกันมีกี่เชลล์ (ตรวจสอบเฉพาะชั่วโมง ...

ได้แล้วครับ

ขอบคุณมากกก ครับ

เพิ่มเติมครับ

เวลา เริ่มต้นจาก 0 ห่าง 2 นาที ครับ

ผมลอง เขียนโค้ต VBA แล้วครับ
ได้นี้ครับ

ตัวอย่าง ครับ
โค้ต VBA


Sub Time()
Dim r As Range, rAll As Range
Dim i As String, k As String
With Worksheets("Sheet1")
Set rAll = .Range("B3", .Range("B" & Rows.Count).End(xlUp))
End With
For Each r In rAll
i = Left(r, 2)
k = Right(r, 2)
r = i ...

คือ ผมอยากเปลี่ยนตรงคอลัมน์ B ทั้งหมดได้เลยหรือเปล่าครับ

โดยการเขียนโค้ดตรง VBA ครับ

เช่น โดยการใช้ฟังก์ชัน string

แล้วรันเปลี่ยนค่าตรงคอลัมน์ B ข้อมูลทั้งหมดเลยครับ

เพราะข้อมูลผมมีมากเลยครับ

พอดีมีคนแนะนำผมมาครับ แต่ผมยังทำไม่ได้เลยครับ



รบกวนด้วยนะครับ

ขอโทษ นะครับ รบกวนอีกรอบนะครับ

พอดีผมต้องการแก้ไขข้อมูล ตรงคอลัมน์ B ทั้งหมดเลยครับ

และข้อมูลมีตั้งแต่ 1 หลัก จนถึง 4 หลัก ครับ

เช่น 1 เปลี่ยนเป็น 00:01
10 เปลี่ยนเป็น 00:10
111 เปลี่ยนเป็น 01:11
1111 เปลี่ยนเป็น 11:11

โดยการใช้ VBA ครับ

http://image.free.in.th/z/im/0k311.jpg



http ...

โจทย์คือ ผมต้องการทำตัวเลขจำนวนเต็ม ให้เป็นรูปแบบของเวลา โดยใช้ VBA ครับ เช่น 1203 เป็น 12:03

รบกวนด้วนนะครับผม