Page 1 of 1

แปลงสูตรเป็นตัวเลขหรืออักษร

Posted: Sun Nov 03, 2019 9:17 pm
by yodpao.b
แปลงสูตรเป็นตัวเลขหรืออักษร

Code: Select all

    Range("B25").Select
    ActiveCell.FormulaR1C1 = "=""»Õ ""&RIGHT(R6C4,4)-2&""-""&R8C4&""-""&R10C4"
เวลาแสดง แสดงเป็นข้อความ แต่เวลาเข้าไปดูในเชลเป็นสูตร
ต้องการให้เวลาดูในเวลขัื้นข้อความหรือเป็นตัวเลขเลย "ปี 2558-กีฬาภายนอก-เทนนิส" ดังรูป
0.JPG
แบบนี้ต้องการ
1.JPG
แบบนี้ไม่ต้องการ

ขอบคุณครับ

Re: แปลงสูตรเป็นตัวเลขหรืออักษร

Posted: Sun Nov 03, 2019 9:26 pm
by snasui
:D ตัวอย่างการปรับ Code ครับ

Code: Select all

with Range("B25")
    .FormulaR1C1 = "=""»Õ ""&RIGHT(R6C4,4)-2&""-""&R8C4&""-""&R10C4"
    .value = .value
end  with

Re: แปลงสูตรเป็นตัวเลขหรืออักษร

Posted: Sun Nov 03, 2019 9:32 pm
by yodpao.b
ขอบคุณครับ